File:  [gforth] / gforth / xwords.fs
Revision 1.5: download - view: text, annotated - select for diffs
Thu Dec 31 15:32:35 2009 UTC (14 years, 3 months ago) by anton
Branches: MAIN
CVS tags: HEAD
updated copyright years

    1: \ extension words from CfVs on www.forth200x.org
    2: 
    3: \ Copyright (C) 2006,2007,2009 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
   77: 
   78: \ X:number-prefixes no new words
   79: 
   80: \ X:structures
   81: 
   82: xword +field          X:structures
   83: xword begin-structure X:structures
   84: xword end-structure   X:structures
   85: xword cfield:         X:structures
   86: xword field:          X:structures
   87: xword 2field:         X:structures
   88: xword ffield:         X:structures
   89: xword sffield:        X:structures
   90: xword dffield:        X:structures
   91: 
   92: \ X:ftrunc
   93: xword FTRUNC       X:ftrunc

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