/usr/lib/ocaml/lablgtk2/gnoCanvas.mli is in liblablgtk2-gnome-ocaml-dev 2.18.3+dfsg-2.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
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 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 178 179 180 181 182 183 184 185 186 187 188 189 190 191 192 193 194 195 196 197 198 199 200 201 202 203 204 205 206 207 208 209 210 211 212 213 214 215 216 217 218 219 220 221 222 223 224 225 226 227 228 229 230 231 232 233 234 235 236 237 238 239 240 241 242 243 244 245 246 247 248 249 250 251 252 253 254 255 256 257 258 259 260 261 262 263 264 265 266 267 268 269 270 271 272 273 274 275 276 277 278 279 280 281 282 283 284 285 286 287 288 289 290 291 292 293 294 295 296 297 298 299 300 301 302 303 304 305 306 | (**************************************************************************)
(* Lablgtk *)
(* *)
(* This program is free software; you can redistribute it *)
(* and/or modify it under the terms of the GNU Library General *)
(* Public License as published by the Free Software Foundation *)
(* version 2, with the exception described in file COPYING which *)
(* comes with the library. *)
(* *)
(* This program is distributed in the hope that it will be useful, *)
(* but WITHOUT ANY WARRANTY; without even the implied warranty of *)
(* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the *)
(* GNU Library General Public License for more details. *)
(* *)
(* You should have received a copy of the GNU Library General *)
(* Public License along with this program; if not, write to the *)
(* Free Software Foundation, Inc., 59 Temple Place, Suite 330, *)
(* Boston, MA 02111-1307 USA *)
(* *)
(* *)
(**************************************************************************)
(* $Id$ *)
(** [libgnomecanvas] bindings *)
type items_properties = [
| `NO_WIDGET
| `NO_FILL_COLOR
| `NO_OUTLINE_COLOR
| `NO_FONT
| `NO_TEXT
| `NO_BPATH
| `NO_PIXBUF
| `ANCHOR of Gtk.Tags.anchor_type
| `ARROW_SHAPE_A of float
| `ARROW_SHAPE_B of float
| `ARROW_SHAPE_C of float
| `BPATH of GnomeCanvas.PathDef.t
| `CAP_STYLE of Gdk.GC.gdkCapStyle
| `CLIP of bool
| `CLIP_HEIGHT of float
| `CLIP_WIDTH of float
| `CURSOR_BLINK of bool
| `CURSOR_VISIBLE of bool
| `DASH of float * float array
| `EDITABLE of bool
| `FAMILY of string
| `FILL_COLOR of string
| `FILL_COLOR_RGBA of int32
| `FILL_STIPPLE of Gdk.bitmap
| `FIRST_ARROWHEAD of bool
| `FONT of string
| `GROW_HEIGHT of bool
| `HEIGHT of float
| `JOIN_STYLE of Gdk.GC.gdkJoinStyle
| `JUSTIFICATION of Gtk.Tags.justification
| `LAST_ARROWHEAD of bool
| `LEFT_MARGIN of int
| `LINE_STYLE of Gdk.GC.gdkLineStyle
| `MARKUP of string
| `OUTLINE_COLOR of string
| `OUTLINE_COLOR_RGBA of int32
| `OUTLINE_STIPPLE of Gdk.bitmap
| `PIXBUF of GdkPixbuf.pixbuf
| `POINTS of float array
| `RIGHT_MARGIN of int
| `RISE of int
| `SCALE of float
| `SIZE of int
| `SIZE_PIXELS of bool
| `SIZE_POINTS of float
| `SMOOTH of bool
| `TEXT of string
| `VISIBLE of bool
| `WEIGHT of int
| `WIDGET of GObj.widget
| `WIDTH of float
| `WIDTH_PIXELS of int
| `WIDTH_UNITS of float
| `X of float
| `X1 of float
| `X2 of float
| `X_OFFSET of float
| `Y of float
| `Y1 of float
| `Y2 of float
| `Y_OFFSET of float
]
val propertize : [< items_properties] -> string * unit Gobject.data_set
type item_event = [
| `BUTTON_PRESS of GdkEvent.Button.t
| `TWO_BUTTON_PRESS of GdkEvent.Button.t
| `THREE_BUTTON_PRESS of GdkEvent.Button.t
| `BUTTON_RELEASE of GdkEvent.Button.t
| `MOTION_NOTIFY of GdkEvent.Motion.t
| `KEY_PRESS of GdkEvent.Key.t
| `KEY_RELEASE of GdkEvent.Key.t
| `ENTER_NOTIFY of GdkEvent.Crossing.t
| `LEAVE_NOTIFY of GdkEvent.Crossing.t
| `FOCUS_CHANGE of GdkEvent.Focus.t ]
class item_signals :
'b Gtk.obj ->
object
constraint 'b = [> GnomeCanvas.item]
inherit GObj.gtkobj_signals
val obj : 'b Gtk.obj
method event : callback:(item_event -> bool) -> GtkSignal.id
end
(** @gtkdoc libgnomecanvas GnomeCanvasItem *)
class base_item : ([> GnomeCanvas.item] as 'b) Gtk.obj ->
object
inherit GObj.gtkobj
val obj : 'b Gtk.obj
method parent : group
method reparent : group -> unit
method as_item : GnomeCanvas.item Gtk.obj
method connect : item_signals
method get_bounds : float array
method grab : Gdk.Tags.event_mask list -> Gdk.cursor -> int32 -> unit
method grab_focus : unit -> unit
method hide : unit -> unit
method i2c_affine : float array
method i2w : x:float -> y:float -> float * float
method i2w_affine : float array
method lower : int -> unit
method lower_to_bottom : unit -> unit
method move : x:float -> y:float -> unit
method canvas : canvas
method xform : [`IDENTITY|`TRANSL of float array|`AFFINE of float array]
method affine_relative : float array -> unit
method affine_absolute : float array -> unit
method raise : int -> unit
method raise_to_top : unit -> unit
method show : unit -> unit
method ungrab : int32 -> unit
method w2i : x:float -> y:float -> float * float
end
(** @gtkdoc libgnomecanvas GnomeCanvasGroup *)
and group : GnomeCanvas.group Gtk.obj ->
object
inherit base_item
val obj : GnomeCanvas.group Gtk.obj
method as_group : GnomeCanvas.group Gtk.obj
method get_items : base_item list
method set : GnomeCanvas.group_p list -> unit
end
(** @gtkdoc libgnomecanvas GnomeCanvas *)
and canvas : GnomeCanvas.canvas Gtk.obj ->
object
inherit GPack.layout
val obj : GnomeCanvas.canvas Gtk.obj
method aa : bool
method c2w : cx:float -> cy:float -> float * float
method get_center_scroll_region : bool
method get_item_at : x:float -> y:float -> base_item (** @raise Not_found . *)
method get_scroll_offsets : int * int
method get_scroll_region : float array
method root : group
method scroll_to : x:int -> y:int -> unit
method set_center_scroll_region : bool -> unit
method set_pixels_per_unit : float -> unit
method set_scroll_region :
x1:float -> y1:float -> x2:float -> y2:float -> unit
method update_now : unit -> unit
method w2c : wx:float -> wy:float -> int * int
method w2c_affine : float array
method w2c_d : wx:float -> wy:float -> float * float
method window_to_world : winx:float -> winy:float -> float * float
method world_to_window : wox:float -> woy:float -> float * float
end
(** @gtkdoc libgnomecanvas GnomeCanvasItem *)
class ['p] item : ([> GnomeCanvas.item] as 'a) Gtk.obj ->
object
inherit base_item
val obj : 'a Gtk.obj
constraint 'p = [< items_properties]
method set : 'p list -> unit
end
(** @gtkdoc libgnomecanvas GnomeCanvas *)
val canvas :
?aa:bool ->
?border_width:int ->
?width:int ->
?height:int ->
?packing:(GObj.widget -> unit) ->
?show:bool ->
unit -> canvas
(** @gtkdoc libgnomecanvas GnomeCanvasGroup *)
val group : ?x:float -> ?y:float -> #group -> group
val wrap_item :
[> GnomeCanvas.item] Gtk.obj -> ('a, 'p) GnomeCanvas.Types.t -> 'p item
type rect = GnomeCanvas.re_p item
(** @gtkdoc libgnomecanvas GnomeCanvasRect *)
val rect :
?x1:float -> ?y1:float ->
?x2:float -> ?y2:float ->
?fill_color:string ->
?props:GnomeCanvas.re_p list ->
#group -> rect
type ellipse = GnomeCanvas.re_p item
(** @gtkdoc libgnomecanvas GnomeCanvasEllipse *)
val ellipse :
?x1:float -> ?y1:float ->
?x2:float -> ?y2:float ->
?fill_color:string ->
?props:GnomeCanvas.re_p list ->
#group -> ellipse
(** @gtkdoc libgnomecanvas GnomeCanvasText *)
class text : GnomeCanvas.text Gtk.obj ->
object
inherit [GnomeCanvas.text_p] item
val obj : GnomeCanvas.text Gtk.obj
method text_height : float
method text_width : float
end
(** @gtkdoc libgnomecanvas GnomeCanvasText *)
val text :
?x:float -> ?y:float -> ?text:string ->
?font:string -> ?size:int -> ?anchor:Gtk.Tags.anchor_type ->
?props:GnomeCanvas.text_p list ->
#group -> text
type line = GnomeCanvas.line_p item
(** @gtkdoc libgnomecanvas GnomeCanvasLine *)
val line :
?points:float array ->
?fill_color:string ->
?props:GnomeCanvas.line_p list ->
#group -> line
type bpath = GnomeCanvas.bpath_p item
(** @gtkdoc libgnomecanvas GnomeCanvasBpath *)
val bpath :
?bpath:GnomeCanvas.PathDef.t ->
?fill_color:string ->
?props:GnomeCanvas.bpath_p list ->
#group -> bpath
type pixbuf = GnomeCanvas.pixbuf_p item
(** @gtkdoc libgnomecanvas GnomeCanvasPixbuf *)
val pixbuf :
?x:float -> ?y:float -> ?pixbuf:GdkPixbuf.pixbuf ->
?width:float -> ?height:float ->
?props:GnomeCanvas.pixbuf_p list ->
#group -> pixbuf
type polygon = GnomeCanvas.polygon_p item
(** @gtkdoc libgnomecanvas GnomeCanvasPolygon *)
val polygon :
?points:float array ->
?fill_color:string ->
?props:GnomeCanvas.polygon_p list ->
#group -> polygon
type widget = GnomeCanvas.widget_p item
(** @gtkdoc libgnomecanvas GnomeCanvasWidget *)
val widget :
?widget:< coerce: GObj.widget; .. > ->
?x:float -> ?y:float ->
?width:float -> ?height:float ->
?props:GnomeCanvas.widget_p list ->
#group -> widget
(** @gtkdoc libgnomecanvas GnomeCanvasRichtext *)
class rich_text : GnomeCanvas.rich_text Gtk.obj ->
object
inherit [GnomeCanvas.rich_text_p] item
val obj : GnomeCanvas.rich_text Gtk.obj
method copy_clipboard : unit -> unit
method cut_clipboard : unit -> unit
method paste_clipboard : unit -> unit
method get_buffer : GText.buffer
end
(** @gtkdoc libgnomecanvas GnomeCanvasRichtext *)
val rich_text :
?x:float -> ?y:float ->
?text:string ->
?width:float -> ?height:float ->
?props:GnomeCanvas.rich_text_p list ->
#group -> rich_text
|