Print file name when including file

This commit is contained in:
Philip Zembrod 2022-01-16 11:06:55 +01:00
parent d9a2bf6311
commit 69a959d618
2 changed files with 2 additions and 2 deletions

File diff suppressed because one or more lines are too long

View File

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