This file is indexed.

/usr/lib/ocaml/lambda-term/lTerm_key.mli is in liblambda-term-ocaml-dev 1.9-4.

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
(*
 * lTerm_key.mli
 * -------------
 * Copyright : (c) 2011, Jeremie Dimino <jeremie@dimino.org>
 * Licence   : BSD3
 *
 * This file is a part of Lambda-Term.
 *)

(** Keys *)

open CamomileLibrary

(** Type of key code. *)
type code =
  | Char of UChar.t
      (** A unicode character. *)
  | Enter
  | Escape
  | Tab
  | Up
  | Down
  | Left
  | Right
  | F1
  | F2
  | F3
  | F4
  | F5
  | F6
  | F7
  | F8
  | F9
  | F10
  | F11
  | F12
  | Next_page
  | Prev_page
  | Home
  | End
  | Insert
  | Delete
  | Backspace

(** Type of key. *)
type t = {
  control : bool;
  (** Is the control key down ? *)
  meta : bool;
  (** Is the meta key down ? *)
  shift : bool;
  (** Is the shift key down ? *)
  code : code;
  (** The code of the key. *)
}

val compare : t -> t -> int
  (** Same as [Pervasives.compare]. *)

val control : t -> bool
val meta : t -> bool
val code : t -> code

val to_string : t -> string
  (** Returns the string representation of the given key. *)

val to_string_compact : t -> string
  (** Returns the string representation of the given key in the form
      "C-M-a". *)