core: allow \ word in word definition names.

locals-and-roots
Doug Coleman 2016-06-06 11:39:42 -07:00
parent f05418b338
commit 8904b85df1
3 changed files with 5 additions and 2 deletions

View File

@ -33,7 +33,7 @@ HELP: >byte-vector
{ $description "Outputs a freshly-allocated byte vector with the same elements as a given sequence." }
{ $errors "Throws an error if the sequence contains elements other than integers." } ;
HELP: BV{
HELP: \ BV{
{ $syntax "BV{ elements... }" }
{ $values { "elements" "a list of bytes" } }
{ $description "Marks the beginning of a literal byte vector. Literal byte vectors are terminated by " { $link postpone\ } } "." }

View File

@ -108,6 +108,9 @@ ERROR: staging-violation word ;
V{ } clone swap execute-parsing first
] when ;
: scan-parsing-word ( -- word )
scan-object dup wrapper? [ wrapped>> ] when ;
ERROR: classoid-expected object ;
: scan-class ( -- class )

View File

@ -5,7 +5,7 @@ help.topics kernel math parser sequences vocabs.parser words ;
in: help.syntax
SYNTAX: HELP:
scan-word bootstrap-word
scan-parsing-word bootstrap-word
[ >link save-location ]
[ [ \ ; parse-until >array ] dip set-word-help ]
bi ;