]> gitweb.factorcode.org Git - factor.git/blobdiff - basis/html/templates/chloe/compiler/compiler.factor
factor: use ??if instead of ?if-old
[factor.git] / basis / html / templates / chloe / compiler / compiler.factor
index 95f6bebbcf3bda3d9140885a97caf1ac1d71f170..5a1a9f49cabb8a412d465b765d741abfe29e720a 100644 (file)
@@ -117,10 +117,11 @@ CONSTANT: self-closing-tags {
 ERROR: unknown-chloe-tag tag ;
 
 : compile-chloe-tag ( tag -- )
-    dup main>> dup chloe-tags get at
+    dup main>>
+    [ chloe-tags get at ]
     [ call( tag -- ) ]
     [ unknown-chloe-tag ]
-    ?if ;
+    ??if ;
 
 : compile-string ( string -- )
     string-context? get [ escape-string ] unless [write] ;