mirror of
https://github.com/forth-ev/VolksForth.git
synced 2024-06-01 06:41:37 +00:00
f3376268f8
Provide .fth variants of asm.fb, extend.fb, dos.fb, multi.vid Also add detection of unresolved symbols to v4th.com make rule
15 lines
367 B
Forth
15 lines
367 B
Forth
|
|
\ *** Block No. 2, Hexblock 2
|
|
|
|
\ conditional Assembler compiler cas 10nov05
|
|
here
|
|
|
|
: maybe-include-tmp-asm ( addr -- ) hide last off dp !
|
|
" ASSEMBLER" find nip ?exit here $1800 + sp@ u>
|
|
IF display cr ." Assembler won't fit" abort THEN
|
|
here sp@ $1800 - dp !
|
|
include
|
|
dp ! ;
|
|
|
|
maybe-include-tmp-asm 86asm.fth
|