package lablgtk3

  1. Overview
  2. Docs
OCaml interface to GTK+3

Install 

dune-project
 Dependency

github.com Readme Changelog Edit opam file Versions (16)

Authors

  1. Jacques Garrigue

Maintainers

  1. G
    garrigue@math.nagoya-u.ac.jp

Sources

lablgtk3-3.1.5.tbz
sha256=d4821cdbecf3ae374f20317d63e43fe58030c3ba9657b51a2e83e652197e8eac
sha512=83f0be38a1e21737de93f88b0adac15cdcc50cf712d773720b9bc1e8d8ffdb2c660d35840f25d326a42a9d4e6537e6cef466099bf72494196b2cc79977e703e3

doc/src/lablgtk3/pangoEnums.ml.html

Source file pangoEnums.ml

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
(** pango enums *)

type style = [ `NORMAL | `OBLIQUE | `ITALIC ]
type weight =
  [ `ULTRALIGHT | `LIGHT | `NORMAL | `BOLD | `ULTRABOLD | `HEAVY ]
type variant = [ `NORMAL | `SMALL_CAPS ]
type stretch =
  [ `ULTRA_CONDENSED | `EXTRA_CONDENSED | `CONDENSED | `SEMI_CONDENSED
  | `NORMAL | `SEMI_EXPANDED | `EXPANDED | `EXTRA_EXPANDED
  | `ULTRA_EXPANDED ]
type underline = [ `NONE | `SINGLE | `DOUBLE | `LOW ]
type wrap_mode = [ `WORD | `CHAR | `WORD_CHAR ]
type ellipsize_mode = [ `NONE | `START | `MIDDLE | `END ] 

(**/**)

module Conv = struct
  open Gpointer

  external _get_tables : unit ->
      style variant_table
    * weight variant_table
    * variant variant_table
    * stretch variant_table
    * underline variant_table
    * wrap_mode variant_table
    * ellipsize_mode variant_table
    = "ml_pango_get_tables"

  let style_tbl, weight_tbl, variant_tbl, stretch_tbl, underline_tbl,
      wrap_mode_tbl, ellipsize_mode_tbl = _get_tables ()

  let style = Gobject.Data.enum style_tbl
  let weight = Gobject.Data.enum weight_tbl
  let variant = Gobject.Data.enum variant_tbl
  let stretch = Gobject.Data.enum stretch_tbl
  let underline = Gobject.Data.enum underline_tbl
  let wrap_mode = Gobject.Data.enum wrap_mode_tbl
  let ellipsize_mode = Gobject.Data.enum ellipsize_mode_tbl
end