X-Git-Url: http://git.annexia.org/?a=blobdiff_plain;f=ocaml%2Ftest1.ml;fp=ocaml%2Ftest1.ml;h=1771d02307fa2d49e9e7a508c96c898c5aa571a7;hb=82b2f0cab999c58df686f351e416311b6af298ae;hp=0000000000000000000000000000000000000000;hpb=96b2cd38daecb7e8ef6e0eaee078d1e230fd4730;p=fedora-mingw.git

diff --git a/ocaml/test1.ml b/ocaml/test1.ml
new file mode 100644
index 0000000..1771d02
--- /dev/null
+++ b/ocaml/test1.ml
@@ -0,0 +1,6 @@
+open Printf
+
+let () =
+  printf "reported os_type = %S\n" Sys.os_type;
+  printf "filename concat a b = %S\n" (Filename.concat "a" "b");
+  printf "-1 = %d\n" (-1)