X-Git-Url: http://git.subgeniuskitty.com/pforth/.git/blobdiff_plain/90975d261c7ab39186c75d8700261faab3427de7..a8f5615dcc9ab22080c4897babfad092885b1b6e:/fth/system.fth diff --git a/fth/system.fth b/fth/system.fth index b9c46f3..5cf36f8 100644 --- a/fth/system.fth +++ b/fth/system.fth @@ -227,6 +227,7 @@ \ Error codes defined in ANSI Exception word set. : ERR_ABORT -1 ; \ general abort +: ERR_ABORTQ -2 ; \ for abort" : ERR_EXECUTING -14 ; \ compile time word while not compiling : ERR_PAIRS -22 ; \ mismatch in conditional : ERR_DEFER -258 ; \ not a deferred word @@ -809,7 +810,8 @@ auto.init \ Now that we can load from files, load remainder of dictionary. trace-include on -trace-stack on +\ Turn this OFF if you do not want to see the contents of the stack after each entry. +trace-stack off include loadp4th.fth @@ -820,6 +822,3 @@ FREEZE \ prevent forgetting below this point .( Dictionary compiled, save in "pforth.dic".) cr c" pforth.dic" save-forth - -\ Save the dictionary in "pfdicdat.h" file so pForth can be compiled for standalone mode. -SDAD