[Win32forth-cvs] win32forth/apps/PlayVirginRadio PlayVirginRadio.f, 1.11, 1.12

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

Update of /cvsroot/win32forth/win32forth/apps/PlayVirginRadio
In directory sc8-pr-cvs9.sourceforge.net:/tmp/cvs-serv1112

Modified Files:
	PlayVirginRadio.f 
Log Message:
Jos: Adapted for the new messageloop.

Index: PlayVirginRadio.f
===================================================================
RCS file: /cvsroot/win32forth/win32forth/apps/PlayVirginRadio/PlayVirginRadio.f,v
retrieving revision 1.11
retrieving revision 1.12
diff -C2 -d -r1.11 -r1.12
*** PlayVirginRadio.f	13 Aug 2008 11:40:43 -0000	1.11
--- PlayVirginRadio.f	13 Aug 2008 17:01:23 -0000	1.12
***************
*** 152,156 ****
          StartPlayer
          Turnkeyed?
!         IF   MessageLoop bye
          THEN ;
  
--- 152,159 ----
          StartPlayer
          Turnkeyed?
!         IF  
!                 begin   Call WaitMessage drop \ Wait for a new msg
!                         MessageLoop
!                 again
          THEN ;