steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

help.syntax: Don't throw a sequence error when article is defined poorly.

db4
Doug Coleman 2015-06-30 09:46:36 -07:00
parent 380790f624
commit aadb5d0b70
1 changed files with 7 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
basis/help/syntax/syntax.factor
View File

@ -1,8 +1,7 @@
! Copyright (C) 2005, 2009 Slava Pestov. ! Copyright (C) 2005, 2009 Slava Pestov.
! See http://factorcode.org/license.txt for BSD license. ! See http://factorcode.org/license.txt for BSD license.
USING: accessors arrays compiler.units definitions effects USING: accessors arrays compiler.units definitions help
effects.parser help help.topics kernel namespaces parser help.topics kernel math parser sequences vocabs.parser words ;
sequences vocabs vocabs.parser words ;
IN: help.syntax IN: help.syntax
SYNTAX: HELP: SYNTAX: HELP:
@ -11,9 +10,13 @@ SYNTAX: HELP:
[ [ \ ; parse-until >array ] dip set-word-help ] [ [ \ ; parse-until >array ] dip set-word-help ]
bi ; bi ;
ERROR: article-expects-name-and-title got ;
SYNTAX: ARTICLE: SYNTAX: ARTICLE:
location [ location [
\ ; parse-until >array [ first2 ] [ 2 tail ] bi <article> \ ; parse-until >array
dup length 2 < [ article-expects-name-and-title ] when
[ first2 ] [ 2 tail ] bi <article>
over add-article >link over add-article >link
] dip remember-definition ; ] dip remember-definition ;