File:  [gforth] / gforth / xwords.fs
Revision 1.3: download - view: text, annotated - select for diffs
Mon Dec 31 19:02:24 2007 UTC (16 years, 3 months ago) by anton
Branches: MAIN
CVS tags: v0-7-0, HEAD
updated copyright year after changing license notice

    1: \ extension words from CfVs on www.forth200x.org
    2: 
    3: \ Copyright (C) 2006,2007 Free Software Foundation, Inc.
    4: 
    5: \ This file is part of Gforth.
    6: 
    7: \ Gforth is free software; you can redistribute it and/or
    8: \ modify it under the terms of the GNU General Public License
    9: \ as published by the Free Software Foundation, either version 3
   10: \ of the License, or (at your option) any later version.
   11: 
   12: \ This program is distributed in the hope that it will be useful,
   13: \ but WITHOUT ANY WARRANTY; without even the implied warranty of
   14: \ MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
   15: \ GNU General Public License for more details.
   16: 
   17: \ You should have received a copy of the GNU General Public License
   18: \ along with this program. If not, see http://www.gnu.org/licenses/.
   19: 
   20: 
   21: \ xword name extension
   22: 
   23: \ X:deferred
   24: xword DEFER     X:deferred
   25: xword IS        X:deferred
   26: xword DEFER@    X:deferred
   27: xword DEFER!    X:deferred
   28: xword ACTION-OF X:deferred
   29: 
   30: \ X:extension-query no new words
   31: 
   32: \ X:parse-name
   33: 
   34: xword PARSE-NAME X:parse-name
   35: 
   36: \ X:defined
   37: 
   38: xword [defined]   X:defined
   39: xword [undefined] X:defined
   40: 
   41: \ X:required
   42: 
   43: xword REQUIRED X:required
   44: xword REQUIRE  X:required
   45: xword INCLUDE  X:required
   46: 
   47: \ X:ekeys
   48: 
   49: xword EKEY>FKEY    X:ekeys
   50: xword K-LEFT	   X:ekeys
   51: xword K-RIGHT	   X:ekeys
   52: xword K-UP	   X:ekeys
   53: xword K-DOWN	   X:ekeys
   54: xword K-HOME	   X:ekeys
   55: xword K-END	   X:ekeys
   56: xword K-PRIOR	   X:ekeys
   57: xword K-NEXT	   X:ekeys
   58: xword K-INSERT	   X:ekeys
   59: xword K-DELETE	   X:ekeys
   60: xword K-F1	   X:ekeys
   61: xword K-F2	   X:ekeys
   62: xword K-F3	   X:ekeys
   63: xword K-F4	   X:ekeys
   64: xword K-F5	   X:ekeys
   65: xword K-F6	   X:ekeys
   66: xword K-F7	   X:ekeys
   67: xword K-F8	   X:ekeys
   68: xword K-F9	   X:ekeys
   69: xword K-F10	   X:ekeys
   70: xword K-F11	   X:ekeys
   71: xword K-F12	   X:ekeys
   72: xword K-SHIFT-MASK X:ekeys
   73: xword K-CTRL-MASK  X:ekeys
   74: xword K-ALT-MASK   X:ekeys
   75: 
   76: \ X:fp-stack no new words

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