Update of /cvsroot/win32forth/win32forth/src/console
In directory sc8-pr-cvs9.sourceforge.net:/tmp/cvs-serv20157
Modified Files:
Console2New.f NewConsole.f
Log Message:
Rod: x_key and x_key? required for debug to work with the new console
Index: NewConsole.f
===================================================================
RCS file: /cvsroot/win32forth/win32forth/src/console/NewConsole.f,v
retrieving revision 1.11
retrieving revision 1.12
diff -C2 -d -r1.11 -r1.12
*** NewConsole.f 10 Aug 2008 01:38:11 -0000 1.11
--- NewConsole.f 11 Aug 2008 17:48:48 -0000 1.12
***************
*** 282,285 ****
--- 282,289 ----
;
+ \ required for debug
+ ' c_key? is x_key?
+ ' c_key is x_key
+
: c_Init-Console ( -- f ) \ start the Console window hidden or show console if already started
\ progreg-init
***************
*** 385,389 ****
k_F1 of F1-doc endof
\ k_F2 of F2-help endof
! k_F12 of LoadProject endof
( default ) \ swap drop
EndCase
--- 389,393 ----
k_F1 of F1-doc endof
\ k_F2 of F2-help endof
! \in-system-ok k_F12 of LoadProject endof
( default ) \ swap drop
EndCase
Index: Console2New.f
===================================================================
RCS file: /cvsroot/win32forth/win32forth/src/console/Console2New.f,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** Console2New.f 18 Jul 2008 19:45:30 -0000 1.1
--- Console2New.f 11 Aug 2008 17:48:48 -0000 1.2
***************
*** 5,8 ****
--- 5,14 ----
: forth-io ;
: _mkey key ;
+ \ required for debug
+ warning @
+ warning off
+ defer x_key
+ defer x_key?
+ warning !
1 proc HideCaret
|
