run-module now calls require first
parent
4ddc751365
commit
106ee640a7
|
@ -580,7 +580,3 @@ tabular-output ;
|
||||||
: .vec ( vector -- ) [ 2 decimal-places ] map . ;
|
: .vec ( vector -- ) [ 2 decimal-places ] map . ;
|
||||||
|
|
||||||
! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
|
! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
|
||||||
|
|
||||||
PROVIDE: lindenmayer ;
|
|
||||||
|
|
||||||
! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
|
|
|
@ -4,7 +4,6 @@ emulator, disassembler and assembler for the 8080 processor.
|
||||||
It is integrated into the Factor module system, the following will
|
It is integrated into the Factor module system, the following will
|
||||||
load all necessary files and run it:
|
load all necessary files and run it:
|
||||||
|
|
||||||
"contrib/space-invaders" require
|
|
||||||
"contrib/space-invaders" run-module
|
"contrib/space-invaders" run-module
|
||||||
|
|
||||||
For this to work it needs a ROM file called 'invaders.rom' in the
|
For this to work it needs a ROM file called 'invaders.rom' in the
|
||||||
|
|
|
@ -1,6 +1,5 @@
|
||||||
This is a simple tetris game. To play, open factor (in GUI mode), and run:
|
This is a simple tetris game. To play, open factor (in GUI mode), and run:
|
||||||
|
|
||||||
"contrib/tetris" require
|
|
||||||
"contrib/tetris" run-module
|
"contrib/tetris" run-module
|
||||||
|
|
||||||
This should open a new window with a running tetris game. The commands are:
|
This should open a new window with a running tetris game. The commands are:
|
||||||
|
|
|
@ -76,6 +76,7 @@ C: module ( name files tests -- module )
|
||||||
all-modules [ reload-module ] each do-parse-hook ;
|
all-modules [ reload-module ] each do-parse-hook ;
|
||||||
|
|
||||||
: run-module ( name -- )
|
: run-module ( name -- )
|
||||||
|
dup require
|
||||||
dup module module-main [
|
dup module module-main [
|
||||||
call
|
call
|
||||||
] [
|
] [
|
||||||
|
|
Loading…
Reference in New Issue