10.6.2.1336
END-STRUCTURE
FACILITY EXT
(
struct-sys +n
-- )
Terminate definition of a structure started by
BEGIN-STRUCTURE
.
See:
10.6.2.0135 +FIELD
,
10.6.2.0763 BEGIN-STRUCTURE
.
Implementation:
Terminate definition of a structure.
:
END-STRUCTURE
\
addr n --
SWAP
!
;
\
set len
Forth 2012
Forth 2012
Facility word set
Foreword
Proposals Process
200
x
Membership
Introduction
Terms, notation, and references
Usage requirements
Documentation requirements
Compliance and labeling
Glossary
Block word set
Double-Number word set
Exception word set
Facility word set
File-Access word set
Floating-Point word set
Locals word set
Memory-Allocation word set
Programming-Tools word set
Search-Order word set
String word set
Extended-Character word set
Rationale
Bibliography
Compatibility analysis
Portability guide
Reference Implementations
Test Suite
Alphabetic list of words
Glossary
Introduction
Additional terms and notation
Additional usage requirements
Additional documentation requirements
Compliance and labeling
Glossary
END-STRUCTURE
AT-XY
KEY?
PAGE
+FIELD
BEGIN-STRUCTURE
CFIELD:
EKEY
EKEY>CHAR
EKEY>FKEY
EKEY?
EMIT?
END-STRUCTURE
FIELD:
K-ALT-MASK
K-CTRL-MASK
K-DELETE
K-DOWN
K-END
K-F1
K-F10
K-F11
K-F12
K-F2
K-F3
K-F4
K-F5
K-F6
K-F7
K-F8
K-F9
K-HOME
K-INSERT
K-LEFT
K-NEXT
K-PRIOR
K-RIGHT
K-SHIFT-MASK
K-UP
MS
TIME&DATE