This file is indexed.

/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;;