File:  [gforth] / gforth / arch / c165 / mach.fs
Revision 1.3: download - view: text, annotated - select for diffs
Tue Jul 10 20:45:57 2001 UTC (22 years, 9 months ago) by crook
Branches: MAIN
CVS tags: v0-7-0, v0-6-2, v0-6-1, v0-6-0, HEAD
added constant for bits/char -- seems that this is now obligatory.

    1: 
    2:     2 Constant cell
    3:     1 Constant cell<<
    4:     4 Constant cell>bit
    5:     8 Constant bits/char
    6:     8 Constant bits/byte
    7:     8 Constant float
    8:     2 Constant /maxalign
    9:  false Constant bigendian
   10: ( true=big, false=little )
   11: 
   12: false Constant NIL  \ relocating
   13: 
   14: : prims-include  ." Include primitives" cr s" arch/c165/prim.fs" included ;
   15: : asm-include    ." Include assembler" cr s" arch/c165/asm.fs" included ;
   16: : >boot ;
   17: 
   18: >ENVIRON
   19: 
   20: false Constant files
   21: false Constant OS
   22: false Constant prims
   23: false Constant floats
   24: false Constant locals
   25: false Constant dcomps
   26: false Constant hash
   27: false Constant xconds
   28: false Constant header
   29: true Constant interpreter
   30: true Constant crlf
   31: true Constant ITC
   32: true Constant ec
   33: \ true Constant rom
   34: 
   35: cell 2 = [IF] 32 [ELSE] 256 [THEN] KB Constant kernel-size
   36: 
   37: 16 KB		Constant stack-size
   38: 15 KB 512 +	Constant fstack-size
   39: 15 KB		Constant rstack-size
   40: 14 KB 512 +	Constant lstack-size

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>