[BACK]Return to main.fs CVS log [TXT] [DIR] Up to [gforth] / gforth / kernel

Diff for /gforth/kernel/main.fs between versions 1.6 and 1.7

version 1.6, 1998/05/02 21:29:08 version 1.7, 1998/06/17 16:55:17
Line 27 Line 27
   
 Create mach-file here over 1+ allot place  Create mach-file here over 1+ allot place
   
 require errors.fs  require ../errors.fs
 require search.fs  require ../search.fs
 require extend.fs  require ../extend.fs
   
 \ include etags.fs  \ include etags.fs
   
 include cross.fs               \ include cross-compiler  include ../cross.fs               \ include cross-compiler
   
 decimal  decimal
   
Line 63  LOCK Line 63  LOCK
   
 doc-off  doc-off
 has? prims [IF]  has? prims [IF]
     include kernel/aliases.fs             \ include primitive aliases      include aliases.fs             \ include primitive aliases
 [ELSE]  [ELSE]
     prims-include      prims-include
     undef-words      undef-words
     include kernel/prim.fs      include prim.fs
     all-words  UNLOCK LOCK      all-words  UNLOCK LOCK
 [THEN]  [THEN]
 doc-on  doc-on
   
 0 AConstant forthstart  0 AConstant forthstart
   
 include kernel/vars.fs                \ variables and other stuff  include vars.fs                \ variables and other stuff
 include kernel/errore.fs  include errore.fs
 include kernel/version.fs  include version.fs
 include kernel/kernel.fs              \ load kernel  include kernel.fs              \ load kernel
 include kernel/doers.fs  include doers.fs
 has? file [IF]  has? file [IF]
 include kernel/args.fs  include args.fs
 include kernel/files.fs               \ load file words  include files.fs               \ load file words
 include kernel/paths.fs  include paths.fs
 include kernel/require.fs  include require.fs
 [THEN]  [THEN]
   
 has? compiler [IF]  has? compiler [IF]
 has? glocals [IF]  has? glocals [IF]
 include kernel/cond.fs                \ load IF and co  include cond.fs                \ load IF and co
 [ELSE]  [ELSE]
 include kernel/cond-old.fs            \ load IF and co w/o locals  include cond-old.fs            \ load IF and co w/o locals
 [THEN]  [THEN]
 include kernel/toolsext.fs  include toolsext.fs
 \ include arch/misc/tt.fs  \ include arch/misc/tt.fs
 \ include arch/misc/sokoban.fs  \ include arch/misc/sokoban.fs
 [THEN]  [THEN]
 include kernel/tools.fs               \ load tools ( .s dump )  include tools.fs               \ load tools ( .s dump )
 include kernel/doers.fs  include doers.fs
 include kernel/getdoers.fs  include getdoers.fs
 include kernel/special.fs             \ special must be last!  include special.fs             \ special must be last!
   
 \ Setup                                                13feb93py  \ Setup                                                13feb93py
   
Removed from v.1.6  
changed lines
  Added in v.1.7

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