anil.recoil.org
My working unpac repository
1(**************************************************************************)
2(* *)
3(* OCaml *)
4(* *)
5(* Jacques Garrigue, Kyoto University RIMS *)
6(* *)
7(* Copyright 2001 Institut National de Recherche en Informatique et *)
8(* en Automatique. *)
9(* *)
10(* All rights reserved. This file is distributed under the terms of *)
11(* the GNU Lesser General Public License version 2.1, with the *)
12(* special exception on linking described in the file LICENSE. *)
13(* *)
14(**************************************************************************)
15
16(** Standard labeled libraries.
17
18 This meta-module provides versions of the {!Array}, {!Bytes},
19 {!List} and {!String} modules where function arguments are
20 systematically labeled. It is intended to be opened at the top of
21 source files, as shown below.
22
23 {[
24 open StdLabels
25
26 let to_upper = String.map ~f:Char.uppercase_ascii
27 let seq len = List.init ~f:(fun i -> i) ~len
28 let everything = Array.create_matrix ~dimx:42 ~dimy:42 42
29 ]}
30
31*)
32
33module Array = ArrayLabels
34module Bytes = BytesLabels
35module List = ListLabels
36module String = StringLabels