Windows Ctrl-C working.

2023-01-14 17:38:58 -08:00
parent fc6c771d86
commit 3dcd421576
5 changed files with 59 additions and 17 deletions
--- a/windows/windows_console.fs
+++ b/windows/windows_console.fs
@ -58,6 +58,7 @@ variable console-mode
                       ENABLE_WINDOW_INPUT or invert and SetConsoleMode drop
  stdout console-mode GetConsoleMode drop
  stdout console-mode @ ENABLE_VIRTUAL_TERMINAL_PROCESSING or SetConsoleMode drop
+  SetupCtrlBreakHandler
 ;

 : win-type ( a n -- ) init-console stdout -rot NULL NULL WriteFile drop ;