6.1.0895
CHAR
char
CORE
 
( "<spaces>name" -- char )

Skip leading space delimiters. Parse name delimited by a space. Put the value of its first character onto the stack.

See:
3.4.1 Parsing, 6.1.2520 [CHAR], A.6.1.0895 CHAR.

Rationale:
Typical use: ... CHAR A CONSTANT "A" ...
Testing:
T{ CHAR X     -> 58 }T
T{ CHAR HELLO -> 48 }T