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

chloe: make self-closing tags support more idiomatic Factor

db4
Benjamin Pollack 2016-03-11 13:12:26 -05:00
parent bbc5fe4b5b
commit 512014a436
1 changed files with 4 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
basis/html/templates/chloe/compiler/compiler.factor
View File

@ -99,9 +99,10 @@ CONSTANT: self-closing-tags {
string-context? get [ tag-not-allowed-here ] when ; string-context? get [ tag-not-allowed-here ] when ;
: (compile-tag) ( tag -- ) : (compile-tag) ( tag -- )
dup name>string >lower self-closing-tags in? dup name>string >lower self-closing-tags
[ compile-self-closing-tag ] member? [
[ compile-self-closing-tag
] [
[ compile-start-tag ] [ compile-start-tag ]
[ compile-children ] [ compile-children ]
[ compile-end-tag ] tri [ compile-end-tag ] tri