mirror of
https://github.com/forth-ev/VolksForth.git
synced 2024-11-25 10:30:57 +00:00
Print file name when including file
This commit is contained in:
parent
d9a2bf6311
commit
69a959d618
File diff suppressed because one or more lines are too long
@ -103,7 +103,7 @@
|
||||
r> UNTIL ;
|
||||
|
||||
: include ( -- )
|
||||
pushfile use
|
||||
pushfile use file? cr
|
||||
probe-for-fb isfile@ freset IF 1 load close exit THEN
|
||||
savetib >r interpret-via-tib close r> restoretib ;
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user