diff --git a/dotscape b/dotscape index d9c1b70..cace00e 100755 Binary files a/dotscape and b/dotscape differ diff --git a/functional-core/app/app-update.sml b/functional-core/app/app-update.sml index 0531658..359cfdd 100644 --- a/functional-core/app/app-update.sml +++ b/functional-core/app/app-update.sml @@ -20,6 +20,8 @@ struct SOME (xpos, ypos) => ClickPoints.getDrawDot (xpos, ypos, 1.0, 0.0, 0.0, model) | NONE => Vector.fromList [] + val drawVec = TriangleStage.toVector (model, drawVec) + val drawMsg = DRAW_DOT drawVec in (model, DRAW drawMsg)