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 ;
|
