Source

ocaml-bert / termreader.ml

Diff from to

File termreader.ml

 	  [print_termfile "termwriter.bert"];
       | list -> 
 	  List.map print_termfile list;;
-
-let _ = 
-  let str = String.create 128 in
-  let _ = Bert.init_buf str in
-  let i = Bert.encode_int 774567 str 1 in
-  let j = Bert.encode_float 234.354 str i in
-  let k = Bert.encode_atom "HAHAHAHA" str j in
-  let l = Bert.encode_string "HAHAHAHA" str k in
-  let m = Bert.encode_binary "HAHAHAHA" str l in
-    Bert.print_binary_string str;
-(*    print_endline str; *)
-    m;;