[Win32forth-cvs] win32forth/src/console NewConsole.f,1.5,1.6

[Rod O. <rod...@us...>]

Update of /cvsroot/win32forth/win32forth/src/console
In directory sc8-pr-cvs9.sourceforge.net:/tmp/cvs-serv8343

Modified Files:
	NewConsole.f 
Log Message:
Rod: changed c_key? to use PauseForMessages (Winpause)

Index: NewConsole.f
===================================================================
RCS file: /cvsroot/win32forth/win32forth/src/console/NewConsole.f,v
retrieving revision 1.5
retrieving revision 1.6
diff -C2 -d -r1.5 -r1.6
*** NewConsole.f	18 Jul 2008 19:46:00 -0000	1.5
--- NewConsole.f	21 Jul 2008 20:18:39 -0000	1.6
***************
*** 227,232 ****
  : c_key? ( -- f )
          KeysOff: cmd
!         PauseForMessage
! \        PauseForMessages   \ Winpause
          KeyBufferEmpty: cmd  not  cmd.VirtualKey or
          KeysOn: cmd ;
--- 227,232 ----
  : c_key? ( -- f )
          KeysOff: cmd
! \        PauseForMessage
!         PauseForMessages   \ Winpause
          KeyBufferEmpty: cmd  not  cmd.VirtualKey or
          KeysOn: cmd ;