forth/packages/terminal-emulator.fs

   1 \ tag: terminal emulator support package
   2 \
   3 \ Copyright (C) 2003 Stefan Reinauer
   4 \
   5 \ See the file "COPYING" for further information about
   6 \ the copyright and warranty status of this work.
   7 \
   8
   9 " /packages" find-device
  10
  11 \
  12 \ IEEE 1275 terminal-emulator package
  13 \
  14
  15 new-device
  16   " terminal-emulator" device-name
  17   \ now the methods...
  18
  19 finish-device
  20
  21 \ clean up afterwards
  22
  23 device-end