--- gforth/Attic/startup.dos	1994/11/29 16:22:50	1.1
+++ gforth/Attic/startup.dos	1995/09/06 21:00:27	1.2
@@ -1,24 +1,56 @@
-#! /usr/stud/paysan/bin/forth
-\ startup file
-
-warnings off
-
-\ include float.fs
-\ include search-order.fs
-include glocals.fs
-include environ.fs
-\ include toolsext.fs
-include wordinfo.fs
-include vt100.fs
-\ include colorize.fs
-include see.fs
-include bufio.fs
-include debug.fs
-include history.fs
-include doskey.fs
-\ include vt100key.fs
-
-0 Value $?
-: sh  '# parse cr system  to $? ;
-
-warnings on
+\ startup file
+
+warnings off
+
+\ include float.fs
+\ include search-order.fs
+include glocals.fs
+include environ.fs
+\ include toolsext.fs
+include wordinfo.fs
+include vt100.fs
+\ include colorize.fs
+include see.fs
+include bufio.fs
+include debug.fs
+include history.fs
+include doskey.fs
+\ include vt100key.fs
+require debugging.fs
+require assert.fs
+require blocks.fs
+
+0 Value $?
+: sh  '# parse cr system  to $? ;
+
+\ define the environmental queries for all the loaded wordsets
+\ since the blocks wordset is loaded in a single file, its queries
+\ are defined there
+\ queries for other things than presence of a wordset are answered
+\ in environ.fs
+get-current environment-wordlist set-current
+true constant double
+true constant double-ext
+true constant exception
+true constant exception-ext
+true constant facility
+\ !! facility-ext
+true constant file
+true constant file-ext
+true constant floating
+true constant floating-ext
+true constant locals
+true constant locals-ext
+true constant memory-alloc
+true constant memory-alloc-ext
+true constant tools
+\ !! tools-ext
+true constant search-order
+true constant search-order-ext
+true constant string
+true constant string-ext
+set-current
+
+
+
+warnings on