/usr/lib/ocaml/camlimages/ximage.mli is in libcamlimages-ocaml-dev 1:4.2.0-1build1.
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 | (***********************************************************************)
(* *)
(* Objective Caml *)
(* *)
(* Jun Furuse, projet Cristal, INRIA Rocquencourt *)
(* *)
(* Copyright 1999-2004, *)
(* Institut National de Recherche en Informatique et en Automatique. *)
(* Distributed only by permission. *)
(* *)
(***********************************************************************)
(* $Id: Exp *)
type elt = int;; (* must be int32, but lablgtk uses int *)
(** ximage data structure with size information *)
type t = {
width: int;
height: int;
data : Gdk.image;
};;
val destroy : t -> unit;;
(** You need manual destroy *)
val create :
kind:Gdk.Image.image_type -> visual:Gdk.visual ->
width: int -> height: int -> t;;
(** Same as Gdk.Image.create, but with size info *)
val unsafe_get : t -> int -> int -> elt;;
val unsafe_set : t -> int -> int -> elt -> unit;;
val get : t -> int -> int -> elt;;
val set : t -> int -> int -> elt -> unit;;
val get_image : [>`drawable] Gobject.obj -> x:int -> y:int ->
width:int -> height:int -> t
(* Same as Gdk.Image.get, but with size info *)
val of_image : Gdk.visual -> (float -> unit) option -> Images.t -> t;;
val get_mono_gc : Gdk.window -> Gdk.gc;;
val plain_mask : Gdk.window -> int -> int -> Gdk.bitmap;;
val pixmap_of : Gdk.window -> t -> Gdk.pixmap;;
val mask_of_image : Gdk.window -> Images.t -> Gdk.bitmap option;;
val pixmap_of_image :
Gdk.window -> (float -> unit) option -> Images.t -> GDraw.pixmap;;
module Truecolor : sig
val color_creator : Gdk.visual -> Images.rgb -> int
val color_parser : Gdk.visual -> int -> Images.rgb
end;;
|