home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Power-Programmierung
/
CD1.mdf
/
forth
/
compiler
/
fpc
/
source
/
test.seq
< prev
next >
Wrap
Text File
|
1991-04-25
|
551b
|
22 lines
\ FLOAD INC80.SEQ \ the entire library word list
3 constant three INCLUDEWORD THREE
4 constant four INCLUDEWORD FOUR
: MAIN ( -- )
three four + . ;
\s STOP HERE
You might also try the following definition for MAIN:
: MAIN ( -- )
three four + . ;
You will be amazed at how much larger the generated image gets.
You can also remove the comment from line 2 and perform the FLOAD to
see how TCOM80 will generate a full Forth system plus MAIN.