Loading prelude.fs +6 −6 Original line number Diff line number Diff line \ prelude higher-level words \ Copyright (C) 2009 Free Software Foundation, Inc. \ Copyright (C) 2019 Free Software Foundation, Inc. \ This file is part of Gforth. Loading @@ -17,9 +17,9 @@ \ You should have received a copy of the GNU General Public License \ along with this program. If not, see http://www.gnu.org/licenses/. [defined] next-prelude [if] : prelude ( xt -- ) next-prelude ! ; [then] \G prelude adds a prelude to the current definition without special \G compilation semantics. a prelude is executed in the interpreter before \G the words compilation or interpretation or postpone semantics is used. dup [n:d execute ;] set->int [n:d execute default-name>comp ;] set->comp ; Loading
prelude.fs +6 −6 Original line number Diff line number Diff line \ prelude higher-level words \ Copyright (C) 2009 Free Software Foundation, Inc. \ Copyright (C) 2019 Free Software Foundation, Inc. \ This file is part of Gforth. Loading @@ -17,9 +17,9 @@ \ You should have received a copy of the GNU General Public License \ along with this program. If not, see http://www.gnu.org/licenses/. [defined] next-prelude [if] : prelude ( xt -- ) next-prelude ! ; [then] \G prelude adds a prelude to the current definition without special \G compilation semantics. a prelude is executed in the interpreter before \G the words compilation or interpretation or postpone semantics is used. dup [n:d execute ;] set->int [n:d execute default-name>comp ;] set->comp ;