Build problem also for 0.7.3 fixed

parent 35fa40d1
......@@ -595,8 +595,8 @@ false DebugFlag showincludedfiles
IF cr ." Including: " 2dup type ." ..." THEN
rot close-file throw
source-desc >r
2dup add-included-file to source-desc
['] included catch
add-included-file to source-desc
sourcefilename ['] included catch
r> to source-desc
throw ;
Markdown is supported
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment