18.6.2.0145
+X/STRING
plus-x-string
XCHAR EXT
(
xc-addr
1
u
1
--
xc-addr
2
u
2
)
Step forward by one xchar in the buffer defined by
xc-addr
1
u
1
.
xc-addr
2
u
2
is the remaining buffer after stepping over the first xchar in the buffer.
Implementation:
:
+X/STRING
(
xc-addr1 u1 -- xc-addr2 u2 )
OVER
DUP
XCHAR+
SWAP
-
/STRING
;
Forth 2012
Forth 2012
Extended-Character 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
+X/STRING
X-SIZE
XC!+
XC!+?
XC,
XC-SIZE
XC@+
XCHAR+
XEMIT
XKEY
XKEY?
+X/STRING
-TRAILING-GARBAGE
CHAR
EKEY>XCHAR
PARSE
X-WIDTH
XC-WIDTH
XCHAR-
XHOLD
X\STRING-
[CHAR]