/support/sprinter/environ.fth
Forth | 52 lines | 49 code | 3 blank | 0 comment | 3 complexity | 4f7bb0ca07c030598544e592b9105dbb MD5 | raw file
Possible License(s): GPL-3.0
- \ ****************************************************************************
- \ CamelForth for the Zilog Z80
- \ Copyright (c) 1994,1995 Bradford J. Rodriguez
- \ With contributions by Douglas Beattie Jr., 1998
- \ Widely extended and reorganised by Garry Lancaster, 1999-2011
- \ Z88, Sprinter, ZX Spectrum +3/+3e ports by Garry Lancaster, 1999-2011
- \
- \ This program is free software; you can redistribute it and/or modify
- \ it under the terms of the GNU General Public License as published by
- \ the Free Software Foundation; either version 3 of the License, or
- \ (at your option) any later version.
- \
- \ This program is distributed in the hope that it will be useful,
- \ but WITHOUT ANY WARRANTY; without even the implied warranty of
- \ MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
- \ GNU General Public License for more details.
- \
- \ You should have received a copy of the GNU General Public License
- \ along with this program. If not, see <http://www.gnu.org/licenses/>.
- \ ****************************************************************************
- CR .( Loading environment variables...)
- \ ANS Forth environment variables for Sprinter CamelForth
- 255 1 ENVVAR /COUNTED-STRING
- 40 1 ENVVAR /HOLD
- 88 1 ENVVAR /PAD
- 8 1 ENVVAR ADDRESS-UNIT-BITS
- 255 1 ENVVAR MAX-CHAR
- 32767 1 ENVVAR MAX-N
- 65535 1 ENVVAR MAX-U
- 65535 32767 2 ENVVAR MAX-D
- 65535 65535 2 ENVVAR MAX-UD
- 64 1 ENVVAR RETURN-STACK-CELLS
- 128 1 ENVVAR STACK-CELLS
- TRUE 1 ENVVAR FLOORED
- TRUE 1 ENVVAR CORE
- FALSE 1 ENVVAR CORE-EXT
- TRUE 1 ENVVAR BLOCK
- TRUE 1 ENVVAR BLOCK-EXT
- TRUE 1 ENVVAR EXCEPTION
- TRUE 1 ENVVAR EXCEPTION-EXT
- TRUE 1 ENVVAR FACILITY
- TRUE 1 ENVVAR FACILITY-EXT
- TRUE 1 ENVVAR FILE
- TRUE 1 ENVVAR FILE-EXT
- TRUE 1 ENVVAR SEARCH-ORDER
- TRUE 1 ENVVAR SEARCH-ORDER-EXT
- 8 1 ENVVAR WORDLISTS
- TRUE 1 ENVVAR STRING
- TRUE 1 ENVVAR STRING-EXT