Initial data commit

Task/Nested-function/Standard-ML/nested-function.ml

@@ -0,0 +1,15 @@
+fun make_list separator =
+  let
+    val counter = ref 1;
+    fun make_item item =
+      let
+        val result = Int.toString (!counter) ^ separator ^ item ^ "\n"
+      in
+        counter := !counter + 1;
+        result
+      end
+  in
+    make_item "first" ^ make_item "second" ^ make_item "third"
+  end;
+
+print (make_list ". ")