version 1.3, 2007/12/31 19:02:24
|
version 1.5, 2009/12/31 15:32:35
|
Line 1
|
Line 1
|
\ extension words from CfVs on www.forth200x.org |
\ extension words from CfVs on www.forth200x.org |
|
|
\ Copyright (C) 2006,2007 Free Software Foundation, Inc. |
\ Copyright (C) 2006,2007,2009 Free Software Foundation, Inc. |
|
|
\ This file is part of Gforth. |
\ This file is part of Gforth. |
|
|
Line 73 xword K-SHIFT-MASK X:ekeys
|
Line 73 xword K-SHIFT-MASK X:ekeys
|
xword K-CTRL-MASK X:ekeys |
xword K-CTRL-MASK X:ekeys |
xword K-ALT-MASK X:ekeys |
xword K-ALT-MASK X:ekeys |
|
|
\ X:fp-stack no new words |
|
|
|
|
\ X:fp-stack no new words |
|
|
|
\ X:number-prefixes no new words |
|
|
|
\ X:structures |
|
|
|
xword +field X:structures |
|
xword begin-structure X:structures |
|
xword end-structure X:structures |
|
xword cfield: X:structures |
|
xword field: X:structures |
|
xword 2field: X:structures |
|
xword ffield: X:structures |
|
xword sffield: X:structures |
|
xword dffield: X:structures |
|
|
|
\ X:ftrunc |
|
xword FTRUNC X:ftrunc |