kiss-spaced-rep refresh flow

projects/kiss-spaced-rep/src/kiss_spaced_rep/ConsoleEngine.kiss

@@ -27,4 +27,6 @@
     (cc))
 
 (method :Void getUserInput [resolve]
-    (resolve (.readLine (Sys.stdin))))
+    (resolve (.readLine (Sys.stdin))))
+
+(method :Void promptForRefresh [:Void->Void refresh] null)

projects/kiss-spaced-rep/src/kiss_spaced_rep/KSR.kiss

@@ -169,6 +169,7 @@
         {
             (engine.clear)
             (engine.println "All cards studied")
+            (engine.promptForRefresh ->(studyAll engine))
         }))
 
 (defReaderMacro ["*" "?"] [stream &builder b]

projects/kiss-spaced-rep/src/kiss_spaced_rep/StudyEngine.hx

@@ -7,6 +7,7 @@ interface StudyEngine {
     function print(s:String):Void;
     function println(s:String):Void;
     function showImage(s:String):Void;
-    function delayForUserInput(cc:Continuation):Void;
+    function delayForUserInput(cc:Continuation, ?text:String):Void;
     function getUserInput(resolve:String->Void):Void;
+    function promptForRefresh(refresh:Void->Void):Void;
 }