[Win32forth-cvs] win32forth/demos ROMCALC.F,1.2,1.3

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

Update of /cvsroot/win32forth/win32forth/demos
In directory sc8-pr-cvs9.sourceforge.net:/tmp/cvs-serv17147

Modified Files:
	ROMCALC.F 
Log Message:
Jos: Adapted for the new console

Index: ROMCALC.F
===================================================================
RCS file: /cvsroot/win32forth/win32forth/demos/ROMCALC.F,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -d -r1.2 -r1.3
*** ROMCALC.F	18 Jul 2008 23:05:40 -0000	1.2
--- ROMCALC.F	16 Aug 2008 17:14:23 -0000	1.3
***************
*** 716,720 ****
  : do-romcalc    ( -- )
                  decimal
!                 Start: CalcWindow ;
  
  ' do-romcalc turnkey romcalc  \ Create a standalone program with the
--- 716,721 ----
  : do-romcalc    ( -- )
                  decimal
!                 Start: CalcWindow  begin   messageloop   again
!  ;
  
  ' do-romcalc turnkey romcalc  \ Create a standalone program with the