--- parser3/tests/152.html 2007/02/09 18:52:28 1.3
+++ parser3/tests/152.html 2007/02/09 19:06:03 1.4
@@ -61,33 +61,6 @@ $xDoc[^xdoc::create{.CLASS_NAME
-^$bTrue.CLASS_NAME: $bTrue.CLASS_NAME
-^$bFalse.CLASS_NAME: $bFalse.CLASS_NAME
-
-
-^$sEmpty.CLASS_NAME: $sEmpty.CLASS_NAME
-^$sZero.CLASS_NAME: $sZero.CLASS_NAME
-^$sOne.CLASS_NAME: $sOne.CLASS_NAME
-^$sTwo.CLASS_NAME: $sTwo.CLASS_NAME
-
-
-^$dZero.CLASS_NAME: $dZero.CLASS_NAME
-^$dOne.CLASS_NAME: $dOne.CLASS_NAME
-^$dTwo.CLASS_NAME: $dTwo.CLASS_NAME
-
-
-^$iZero.CLASS_NAME: $iZero.CLASS_NAME
-^$iOne.CLASS_NAME: $iOne.CLASS_NAME
-^$iTwo.CLASS_NAME: $iTwo.CLASS_NAME
-
-
-^$tTable.CLASS_NAME: $tTable.CLASS_NAME
-^$hHash.CLASS_NAME: $hHash.CLASS_NAME
-^$dtDate.CLASS_NAME: $dtDate.CLASS_NAME
-^$xDoc.CLASS_NAME: $xDoc.CLASS_NAME
-^$xNode.CLASS_NAME: $xNode.CLASS_NAME
-
bool itself
(1==0): ^checkBool(1==0)
(1==1): ^checkBool(1==1)
@@ -137,33 +110,33 @@ $xNode[$h.0]
others
^printHeadLine[
]
-^printLine[^$vVoid;^checkDef[];^checkExp[$vVoid]]
+^printLine[^$vVoid;$vVoid.CLASS_NAME;^checkDef[];^checkExp[$vVoid]]
-^printLine[^$bFalse;^checkDef[$bFalse];^checkExp[$bFalse];$bFalse]
-^printLine[^$bTrue;^checkDef[$bTrue];^checkExp[$bTrue];$bTrue]
+^printLine[^$bFalse;$bFalse.CLASS_NAME;^checkDef[$bFalse];^checkExp[$bFalse];$bFalse]
+^printLine[^$bTrue;$bTrue.CLASS_NAME;^checkDef[$bTrue];^checkExp[$bTrue];$bTrue]
-^printLine[^$sEmpty;^checkDef[$sEmpty];^checkExp[$sEmpty];$sEmpty]
-^printLine[^$sZero;^checkDef[$sZero];^checkExp[$sZero];$sZero]
-^printLine[^$sOne;^checkDef[$sOne];^checkExp[$sOne];$sOne]
-^printLine[^$sTwo;^checkDef[$sTwo];^checkExp[$sTwo];$sTwo]
+^printLine[^$sEmpty;$sEmpty.CLASS_NAME;^checkDef[$sEmpty];^checkExp[$sEmpty];$sEmpty]
+^printLine[^$sZero;$sZero.CLASS_NAME;^checkDef[$sZero];^checkExp[$sZero];$sZero]
+^printLine[^$sOne;$sOne.CLASS_NAME;^checkDef[$sOne];^checkExp[$sOne];$sOne]
+^printLine[^$sTwo;$sTwo.CLASS_NAME;^checkDef[$sTwo];^checkExp[$sTwo];$sTwo]
-^printLine[^$dZero;^checkDef($dZero);^checkExp($dZero)]($dZero)
-^printLine[^$dOne;^checkDef($dOne);^checkExp($dOne)]($dOne)
-^printLine[^$dTwo;^checkDef($dTwo);^checkExp($dTwo)]($dTwo)
+^printLine[^$dZero;$dZero.CLASS_NAME;^checkDef($dZero);^checkExp($dZero)]($dZero)
+^printLine[^$dOne;$dOne.CLASS_NAME;^checkDef($dOne);^checkExp($dOne)]($dOne)
+^printLine[^$dTwo;$dTwo.CLASS_NAME;^checkDef($dTwo);^checkExp($dTwo)]($dTwo)
-^printLine[^$iZero;^checkDef($iZero);^checkExp($iZero)]($iZero)
-^printLine[^$iOne;^checkDef($iOne);^checkExp($iOne)]($iOne)
-^printLine[^$iTwo;^checkDef($iTwo);^checkExp($iTwo)]($iTwo)
+^printLine[^$iZero;$iZero.CLASS_NAME;^checkDef($iZero);^checkExp($iZero)]($iZero)
+^printLine[^$iOne;$iOne.CLASS_NAME;^checkDef($iOne);^checkExp($iOne)]($iOne)
+^printLine[^$iTwo;$iTwo.CLASS_NAME;^checkDef($iTwo);^checkExp($iTwo)]($iTwo)
-^printLine[^$tEmptyTable;^checkDef[$tEmptyTable];^checkExp[$tEmptyTable];$tEmptyTable]
-^printLine[^$tTable;^checkDef[$tTable];^checkExp[$tTable];$tTable]
+^printLine[^$tEmptyTable;$tEmptyTable.CLASS_NAME;^checkDef[$tEmptyTable];^checkExp[$tEmptyTable];$tEmptyTable]
+^printLine[^$tTable;$tTable.CLASS_NAME;^checkDef[$tTable];^checkExp[$tTable];$tTable]
-^printLine[^$hEmptyHash;^checkDef[$hEmptyHash];^checkExp[$hEmptyHash];$hEmptyHash]
-^printLine[^$hHash;^checkDef[$hHash];^checkExp[$hHash];$hHash]
+^printLine[^$hEmptyHash;$hEmptyHash.CLASS_NAME;^checkDef[$hEmptyHash];^checkExp[$hEmptyHash];$hEmptyHash]
+^printLine[^$hHash;$hHash.CLASS_NAME;^checkDef[$hHash];^checkExp[$hHash];$hHash]
-^printLine[^$dtDate;^checkDef[$dtDate];^checkExp[$dtDate];$dtDate]
-^printLine[^$xDoc;^checkDef[$xDoc];^checkExp[$xDoc];$xDoc]
-^printLine[^$xNode;^checkDef[$xNode];^checkExp[$xNode];$xNode]
+^printLine[^$dtDate;$dtDate.CLASS_NAME;^checkDef[$dtDate];^checkExp[$dtDate];$dtDate]
+^printLine[^$xDoc;$xDoc.CLASS_NAME;^checkDef[$xDoc];^checkExp[$xDoc];$xDoc]
+^printLine[^$xNode;$xNode.CLASS_NAME;^checkDef[$xNode];^checkExp[$xNode];$xNode]
@@ -177,11 +150,11 @@ $xNode[$h.0]
@checkDef[uValue]
-^if(def $uValue){yes}{no}
+^if(def $uValue){yes}{no}
@checkExp[uValue]
-^if($uValue){true}{false}
+^if($uValue){true}{false}
@printHeadLine[sTitle]
@@ -198,15 +171,17 @@ xnode
}]
| $sTitle |
+ .CLASS_NAME |
(def ...) |
(...) |
- ^tType.menu{(... is $tType.sName) | }
+ ^tType.menu{is $tType.sName | }
-@printLine[sTitle;sDef;sExp;uValue]
+@printLine[sTitle;sClassName;sDef;sExp;uValue]
| $sTitle |
+ $sClassName |
$sDef |
$sExp |
^tType.menu{