Block 7000
( starshipos.4th -- the StarshipOS words, in their own        )
( vocabulary, STARSHIPOS: not FORTH-79, so not in FORTH.      )
( Loaded when the system boots, after forth79.4th.            )
( Blocks 7000 up.  New definitions still go into FORTH; the   )
( search starts in STARSHIPOS, then FORTH.                    )
VOCABULARY STARSHIPOS  STARSHIPOS DEFINITIONS
Block 7001
( DOE  baddr u --   as  S" name" DOE                          )
( Intended: run the DoE of that name, from the capsule of     )
( that name.  As yet it only types the name back -- asked for )
( so, 2026-10-15; the runner is still to be built.            )
: DOE ( baddr u -- ) TYPE ;
FORTH DEFINITIONS  STARSHIPOS