ctrl-cing in the REPL WIP

gistfile1.txt

diff --git a/src/core/REPL.pm b/src/core/REPL.pm
index 2583703..d243606 100644
--- a/src/core/REPL.pm
+++ b/src/core/REPL.pm
@@ -294,6 +294,7 @@ do {
                 }
             }
 
+say "compiling {code}";
             self.compiler.eval(code, |%(adverbs))
         }
 
@@ -318,6 +319,19 @@ do {
             my $prompt = self.interactive_prompt;
             my $code = "";
 
+            my $ctrl-c  = Promise.new;
+            my $running = False;
+            signal(SIGINT).tap: {
+                if $running {
+                    $running = False;
+                    $ctrl-c.keep("\nAborted")
+                }
+                else {
+                    say "\nGoodbye!";
+                    exit 0;
+                }
+            }
+
             REPL: loop {
 
                 my $newcode = self.repl-read(~$prompt);
@@ -337,11 +351,24 @@ do {
 
                 my $*CTXSAVE := self;
                 my $*MAIN_CTX;
-
-                my $output := self.repl-eval(
-                    $code,
-                    :outer_ctx($!save_ctx),
-                    |%adverbs);
+                my $output;
+
+                await Promise.anyof(
+                  start {
+                      ENTER $running = True;
+                      LEAVE $running = False;
+                      $output :=
+                        self.repl-eval($code,:outer_ctx($!save_ctx),|%adverbs);
+                  },
+                  $ctrl-c
+                );
+
+                if $ctrl-c.status == Kept {
+                    # somehow kill the running thread
+                    say $ctrl-c.result;
+                    $ctrl-c = Promise.new;
+                    next;
+                }
 
                 if self.input-incomplete($output) {
                     $prompt = '* ';
@@ -361,6 +388,7 @@ do {
                 }
 
                 CATCH {
+                    $running = False;
                     say $_;
                     $code = '';
                     $prompt = self.interactive_prompt;