-
Notifications
You must be signed in to change notification settings - Fork 2
Expand file tree
/
Copy pathExample.mli
More file actions
36 lines (34 loc) · 2.84 KB
/
Example.mli
File metadata and controls
36 lines (34 loc) · 2.84 KB
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
(* ********************************************************************************************** *
* MetaStack Solutions Ltd. *
* ********************************************************************************************** *
* BitMask Sets Example (as given in documentation) *
* ********************************************************************************************** *
* Copyright (c) 2013-14 MetaStack Solutions Ltd. *
* ********************************************************************************************** *
* Author: David Allsopp *
* 5-Mar-2014 *
* ********************************************************************************************** *
* Redistribution and use in source and binary forms, with or without modification, are permitted *
* provided that the following two conditions are met: *
* 1. Redistributions of source code must retain the above copyright notice, this list of *
* conditions and the following disclaimer. *
* 2. Neither the name of MetaStack Solutions Ltd. nor the names of its contributors may be *
* used to endorse or promote products derived from this software without specific prior *
* written permission. *
* *
* This software is provided by the Copyright Holder 'as is' and any express or implied *
* warranties, including, but not limited to, the implied warranties of merchantability and *
* fitness for a particular purpose are disclaimed. In no event shall the Copyright Holder be *
* liable for any direct, indirect, incidental, special, exemplary, or consequential damages *
* (including, but not limited to, procurement of substitute goods or services; loss of use, *
* data, or profits; or business interruption) however caused and on any theory of liability, *
* whether in contract, strict liability, or tort (including negligence or otherwise) arising in *
* any way out of the use of this software, even if advised of the possibility of such damage. *
* ********************************************************************************************** *)
module BMSet :
sig
type elt = A | B | C | D | E
include BitMaskSet.S with type elt := elt
with type storage = int
with type t = private int
end