The main OCaml driver

main.ml (text/plain), 209 bytes, created by Christopher Head on 2010-08-06 00:42:10 UTC

external compress : string -> string = "caml_wrapper_compress";;

let main : unit -> unit = fun () ->
	let input : string = "abcd" in
	let output : string = compress input in
	print_string output;;

main ();;