4a3d771041
* hvm.c
- Changed VitualMachine() to use direct dynamic call for processing pcodes rather than the switch loop.
20 lines
223 B
Plaintext
20 lines
223 B
Plaintext
FUNCTION MAIN
|
|
|
|
LOCAL i
|
|
|
|
FOR i := 1 TO 10
|
|
|
|
qout( i )
|
|
|
|
IF i = 4 .AND. .T.
|
|
__Accept("")
|
|
qout(i)
|
|
i := 9
|
|
qout(i)
|
|
__Accept("")
|
|
ENDIF
|
|
|
|
NEXT
|
|
|
|
RETURN( NIL )
|