Annotation of gforth/xwords.fs, revision 1.4
1.1 anton 1: \ extension words from CfVs on www.forth200x.org
2:
1.3 anton 3: \ Copyright (C) 2006,2007 Free Software Foundation, Inc.
1.1 anton 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
1.2 anton 9: \ as published by the Free Software Foundation, either version 3
1.1 anton 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
1.2 anton 18: \ along with this program. If not, see http://www.gnu.org/licenses/.
1.1 anton 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:
1.4 ! anton 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>