add buttonDrawObject and calls to successfully draw button

2024-07-31 08:41:19 +01:00
parent b1b929e055
commit 5525725ef3
8 changed files with 98 additions and 11 deletions
--- a/dot-to-dot.mlb
+++ b/dot-to-dot.mlb
@@ -23,8 +23,13 @@ ann
  "allowVectorExps true"
 in
  imperative-shell/constants.sml
+  imperative-shell/app-draw.sml
 end
-imperative-shell/app-draw.sml

 imperative-shell/input-callbacks.sml
-imperative-shell/shell.sml
+
+ann
+  "allowVectorExps true"
+in
+  imperative-shell/shell.sml
+end