run-module now calls require first

darcs
slava 2006-10-20 02:44:40 +00:00
parent 4ddc751365
commit 106ee640a7
4 changed files with 1 additions and 6 deletions

View File

@ -580,7 +580,3 @@ tabular-output ;
: .vec ( vector -- ) [ 2 decimal-places ] map . ; : .vec ( vector -- ) [ 2 decimal-places ] map . ;
! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
PROVIDE: lindenmayer ;
! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!

View File

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

View File

@ -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:

View File

@ -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
] [ ] [