From 5b63471b306b341371c8f086dd06f270635a0b70 Mon Sep 17 00:00:00 2001 From: Humza Shahid Date: Fri, 11 Jul 2025 23:56:20 +0100 Subject: [PATCH] refactor some functionality by passing a higher order function --- dotscape.mlb | 22 ++++++++++++++++++++++ 1 file changed, 22 insertions(+) diff --git a/dotscape.mlb b/dotscape.mlb index 01cd0dc..9719888 100644 --- a/dotscape.mlb +++ b/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