refactor some functionality by passing a higher order function

dotscape.mlb

@@ -3,6 +3,13 @@ $(SML_LIB)/basis/basis.mlb
 (* FUNCTIONAL CORE *)
 fcore/app-type.sml
 
+ann
+  "allowVectorExps true"
+in
+  fcore/ndc.sml
+  cozette-sml/fonts/cozette-ascii.mlb
+end
+
 fcore/graph-lines.sml
 fcore/click-points.sml
 fcore/app-init.sml
@@ -27,6 +34,21 @@ fcore/parse-file.sml
 $(SML_LIB)/basis/mlton.mlb
 $(SML_LIB)/cml/cml.mlb
 
+ann
+  "allowFFI true"
+in
+  ffi/gles3-import.sml
+  ffi/glfw-import.sml
+  ffi/glfw-input.sml
+end
+
+ann
+  "allowVectorExps true"
+in
+  imperative-shell/constants.sml
+  imperative-shell/app-draw.sml
+end
+
 imperative-shell/input-callbacks.sml
 
 imperative-shell/update-thread.sml