Return to startup.fs CVS log | Up to [gforth] / gforth |
version 1.60, 2005/12/31 15:46:10 | version 1.64, 2006/12/31 13:39:14 |
---|---|
Line 1 | Line 1 |
\ startup file | \ startup file |
\ Copyright (C) 1995,1996,1997,1998,2000,2003,2004,2005 Free Software Foundation, Inc. | \ Copyright (C) 1995,1996,1997,1998,2000,2003,2004,2005,2006 Free Software Foundation, Inc. |
\ This file is part of Gforth. | \ This file is part of Gforth. |
Line 24 | Line 24 |
require except.fs \ included on command line | require except.fs \ included on command line |
[THEN] | [THEN] |
[IFDEF] throw>error | |
' throw>error Alias rethrow | |
[THEN] | |
warnings off | warnings off |
include search.fs | include search.fs |
include environ.fs | include environ.fs |
Line 103 true constant string | Line 107 true constant string |
true constant string-ext | true constant string-ext |
\ extension queries | \ extension queries |
' noop alias X:deferred | ' noop alias X:deferred |
' noop alias X:defined | |
' noop alias X:extension-query | ' noop alias X:extension-query |
' noop alias X:parse-name | |
' noop alias X:required | |
set-current | set-current |
warnings on | warnings on |