[Win32forth-cvs] win32forth/src SEE.F,1.11,1.12

[Jos v.d.V. <jo...@us...>]

Update of /cvsroot/win32forth/win32forth/src
In directory 23jxhf1.ch3.sourceforge.com:/tmp/cvs-serv6662/src

Modified Files:
	SEE.F 
Log Message:
Jos: Adapted the decompiler for the new console. Now it looks again the same as under V4.2

Index: SEE.F
===================================================================
RCS file: /cvsroot/win32forth/win32forth/src/SEE.F,v
retrieving revision 1.11
retrieving revision 1.12
diff -C2 -d -r1.11 -r1.12
*** SEE.F	16 Jul 2008 20:48:24 -0000	1.11
--- SEE.F	26 Jul 2009 13:18:12 -0000	1.12
***************
*** 140,144 ****
  : d_cr          ( -- )
                  debugging? 0=
!                 if      cr
                  then    ;
  
--- 140,144 ----
  : d_cr          ( -- )
                  debugging? 0=
!                 if      crtab
                  then    ;
  
***************
*** 306,310 ****
  
  : ((SEE))       ( Cfa -- )
!                 CR DUP DUP .DEFINITION-CLASS  .IMMEDIATE   ;
  
  ' ((SEE)) IS (SEE)
--- 306,310 ----
  
  : ((SEE))       ( Cfa -- )
!                 CRTAB DUP DUP .DEFINITION-CLASS  .IMMEDIATE   ;
  
  ' ((SEE)) IS (SEE)