--- gforth/Attic/kernal.fs 1995/02/09 17:49:57 1.29 +++ gforth/Attic/kernal.fs 1995/02/15 14:50:07 1.30 @@ -1470,6 +1470,7 @@ Defer 'cold ' noop IS 'cold : cold ( -- ) pathstring 2@ process-path pathdirs 2! + 0 0 included-files 2! 'cold argc @ 1 > IF