initialise app with a file path, for the functionality of loading different files from the terminal

imperative-shell/init-glfw.sml

@@ -2,7 +2,7 @@ structure InitGlfw =
 struct
   open CML
 
-  fun init () =
+  fun init path () =
     let
       (* Set up GLFW. *)
       val _ = Glfw.init ()
@@ -20,6 +20,7 @@ struct
         , Constants.windowHeight
         , Constants.initialWidthClickPoints
         , Constants.initialHeightClickPoints
+        , path
         )
 
       val graphLines = GraphLines.generate initialModel
@@ -59,6 +60,6 @@ struct
       ()
     end
 
-  fun main () =
-    (RunCML.doit (init, NONE); ())
+  fun main path =
+    (RunCML.doit (init path, NONE); ())
 end