--- gforth/kernel/main.fs 2006/01/22 23:55:39 1.35 +++ gforth/kernel/main.fs 2006/02/25 18:28:12 1.36 @@ -117,12 +117,14 @@ has? compiler [IF] include ./quotes.fs has? ec 0= [IF] include ./toolsext.fs -include ./tools.fs \ load tools ( .s dump ) [THEN] +include ./tools.fs \ load tools ( .s dump ) include ./getdoers.fs \ Setup 13feb93py +include ./pass.fs \ pass pointers from cross to target + has? header [IF] \ set image size here image-header 2 cells + ! @@ -132,6 +134,4 @@ has? header [IF] >boot [THEN] -include ./pass.fs \ pass pointers from cross to target - .unresolved \ how did we do?