diff options
Diffstat (limited to 'ocaml/tmp/test_hex.ml')
| -rw-r--r-- | ocaml/tmp/test_hex.ml | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/ocaml/tmp/test_hex.ml b/ocaml/tmp/test_hex.ml new file mode 100644 index 0000000..6504640 --- /dev/null +++ b/ocaml/tmp/test_hex.ml @@ -0,0 +1,9 @@ +open Nock_lib.Noun +open Nock_lib.Serial + +let () = + for i = 0 to 10 do + let n = atom i in + let jammed = jam n in + Printf.printf "jam(%d) = %s (%d bytes)\n" i (bytes_to_hex jammed) (Bytes.length jammed) + done |