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

Fix contrib/xml error. methods

slava 2006-11-21 08:22:21 +00:00
parent ef78b2dfac
commit 1afcf6b9ba
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
contrib/xml/parser.factor
View File

@ -235,11 +235,11 @@ UNION: any-tag tag contained-tag ;
TUPLE: notags ;
M: notags error.
"XML document lacks a main tag" print ;
drop "XML document lacks a main tag" print ;
TUPLE: multitags ;
M: multitags error.
"XML document contains multiple tags" print ;
drop "XML document contains multiple main tags" print ;
: make-xml-doc ( prolog seq -- xml-doc )
dup [ any-tag? ] find