begin merging files which were previously in temp-squares directory into main

This commit is contained in:
2025-07-06 14:56:54 +01:00
parent 395d6002d8
commit 2e0549097e
33 changed files with 31 additions and 2513 deletions

9
fcore/app-update.sml Normal file
View File

@@ -0,0 +1,9 @@
structure AppUpdate =
struct
open AppType
fun update (model: app_type, inputMsg) =
case #mode model of
NORMAL_MODE => NormalMode.update (model, inputMsg)
| BROWSE_MODE => BrowseMode.update (model, inputMsg)
end