Add examples/unix

monadius · monadius · commit ee8dcf3d9bb5 · 2023-04-09T17:39:00.000-06:00
diff --git a/examples/unix/solution.ml b/examples/unix/solution.ml
@@ -0,0 +1 @@
+let getenv = Unix.environment
diff --git a/examples/unix/tests.ml b/examples/unix/tests.ml
@@ -0,0 +1,9 @@
+open OUnit
+open Batteries
+
+let suite = [
+    "getenv" >:::
+        [
+            "Test" >:: (fun _ -> assert_equal [||] (Solution.getenv ()) ~printer:(IO.to_string @@ Array.print String.print_quoted));
+        ];
+    ]
