git.annexia.org
/
ocaml-bitstring.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
92b147002135b55c46bb377b47b74af39307cf60
[ocaml-bitstring.git]
/
tests
/
10_constr2.ml
1
(* Test a simple constructor.
2
* $Id: 10_constr2.ml,v 1.2 2008-04-25 11:08:43 rjones Exp $
3
*)
4
5
let version = 1 ;;
6
let data = 10 ;;
7
let bits =
8
BITSTRING
9
{ version : 4;
10
data : 12 } ;;
11
12
Bitmatch.hexdump_bitstring stdout bits ;;