simon/ocaml-containers
1
0
Fork 0
mirror of https://github.com/c-cube/ocaml-containers.git synced 2026-01-29 04:14:51 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

detail

Browse source
This commit is contained in:
Simon Cruanes 2016-11-03 23:25:35 +01:00
parent 89145313a5
commit 7229f04981
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
src/data/CCBitField.ml
View file

@ -22,7 +22,7 @@ let max_width = Sys.word_size - 2
(*$R (*$R
let module B = CCBitField.Make(struct end) in let module B = CCBitField.Make(struct end) in
let x = B.mk_field () in let _ = B.mk_field () in
B.freeze(); B.freeze();
assert_bool "must raise" assert_bool "must raise"
(try ignore (B.mk_field()); false with Frozen -> true); (try ignore (B.mk_field()); false with Frozen -> true);