Compilation:
Perform the execution semantics given below.
Execution:
(
"ccc<paren>" -- )
Parse
ccc delimited by
)
(right parenthesis).
( is an immediate word.
The number of characters in
ccc may be zero to the
number of characters in the parse area.
Rationale:
Typical use: ... ( ccc)
...
Testing:
\ There is no space either side of the ).
T{ ( A comment)1234 -> }T
T{ : pc1 ( A comment)1234 ; pc1 -> 1234 }T