--- parser3/tests/152.html 2007/02/09 18:52:28 1.3
+++ parser3/tests/152.html 2010/07/25 06:14:46 1.8
@@ -1,215 +1,214 @@
-@main[]
-
Defines
-
-$sEmpty[]
-^$sEmpty[]
-$sZero[0]
-^$sZero[0]
-$sOne[1]
-^$sOne[1]
-$sTwo[2]
-^$sTwo[2]
-
-$dtDate[^date::create(2007;01;02;03;04;05)]
-^$dtDate[^^date::create(2007;01;02;03;04;05)]
-
-
-^$tEmptyTable[^^table::create{a ^; ^;b}]
-^$tTable[^^table::create{a ^; ^;b
-1 ^; ^;2}]
-$tEmptyTable[^table::create{a b}]
-$tTable[^table::create{a b
-1 2}]
-
-
-^$hEmptyHash[^^hash::create[]]
-$hEmptyHash[^hash::create[]]
-^$hHash[
- ^; ^;^$.a[1]
- ^; ^;^$.b[2]
-]
-
-$hHash[
- $.a[1]
- $.b[2]
-]
-
-$dZero(0.0)
-^$dZero(0.0)
-$dOne(1.1)
-^$dOne(1.1)
-$dTwo(2.2)
-^$dTwo(2.2)
-
-$iZero(^dZero.int[])
-^$iZero(^^dZero.int[])
-$iOne(^dOne.int[])
-^$iOne(^^dOne.int[])
-$iTwo(^dTwo.int[])
-^$iTwo(^^dTwo.int[])
-
-$bTrue(1==1)
-^$bTrue(1==1)
-$bFalse(1==0)
-^$bFalse(1==0)
-
-$xDoc[^xdoc::create{}]
-^$xDoc[^^xdoc::create{}]
-
-^$h[^^xDoc.select[/root/t]]
-^$xNode[^$h.0]
-$h[^xDoc.select[/root/t]]
-$xNode[$h.0]
-
-.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)
-
-
-bool methods for void
-^^vVoid.bool(true): ^checkBool(^vVoid.bool(true))
-^^vVoid.bool(false): ^checkBool(^vVoid.bool(false))
-
-
-bool methods for string
-^^sEmpty.bool(true): ^checkBool(^sEmpty.bool(true))
-^^sEmpty.bool(false): ^checkBool(^sEmpty.bool(false))
-
-^^sZero.bool(true): ^checkBool(^sZero.bool(true))
-^^sZero.bool(false): ^checkBool(^sZero.bool(false))
-
-^^sOne.bool(true): ^checkBool(^sOne.bool(true))
-^^sOne.bool(false): ^checkBool(^sOne.bool(false))
-
-^^sTwo.bool(true): ^checkBool(^sTwo.bool(true))
-^^sTwo.bool(false): ^checkBool(^sTwo.bool(false))
-
-
-bool methods for double
-^^dZero.bool(true): ^checkBool(^dZero.bool(true))
-^^dZero.bool(false): ^checkBool(^dZero.bool(false))
-
-^^dOne.bool(true): ^checkBool(^dOne.bool(true))
-^^dOne.bool(false): ^checkBool(^dOne.bool(false))
-
-^^dTwo.bool(true): ^checkBool(^dTwo.bool(true))
-^^dTwo.bool(false): ^checkBool(^dTwo.bool(false))
-
-
-bool methods for int
-^^iZero.bool(true): ^checkBool(^iZero.bool(true))
-^^iZero.bool(false): ^checkBool(^iZero.bool(false))
-
-^^iOne.bool(true): ^checkBool(^iOne.bool(true))
-^^iOne.bool(false): ^checkBool(^iOne.bool(false))
-
-^^iTwo.bool(true): ^checkBool(^iTwo.bool(true))
-^^iTwo.bool(false): ^checkBool(^iTwo.bool(false))
-
-
-others
-
-^printHeadLine[
]
-^printLine[^$vVoid;^checkDef[];^checkExp[$vVoid]]
-
-^printLine[^$bFalse;^checkDef[$bFalse];^checkExp[$bFalse];$bFalse]
-^printLine[^$bTrue;^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[^$dZero;^checkDef($dZero);^checkExp($dZero)]($dZero)
-^printLine[^$dOne;^checkDef($dOne);^checkExp($dOne)]($dOne)
-^printLine[^$dTwo;^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[^$tEmptyTable;^checkDef[$tEmptyTable];^checkExp[$tEmptyTable];$tEmptyTable]
-^printLine[^$tTable;^checkDef[$tTable];^checkExp[$tTable];$tTable]
-
-^printLine[^$hEmptyHash;^checkDef[$hEmptyHash];^checkExp[$hEmptyHash];$hEmptyHash]
-^printLine[^$hHash;^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]
-
-
-
-
-@checkIsBool[uValue]
-^if($uValue is "bool"){yes}{no}
-
-
-@checkBool[bValue]
-^if($bValue == true){true}{false}
-
-
-@checkDef[uValue]
-^if(def $uValue){yes}{no}
-
-
-@checkExp[uValue]
-^if($uValue){true}{false}
-
-
-@printHeadLine[sTitle]
-$tType[^table::create{sName
-bool
-string
-double
-int
-table
-hash
-date
-xdoc
-xnode
-}]
-
- | $sTitle |
- (def ...) |
- (...) |
- ^tType.menu{(... is $tType.sName) | }
-
-
-
-@printLine[sTitle;sDef;sExp;uValue]
-
- | $sTitle |
- $sDef |
- $sExp |
- ^tType.menu{
- ^if($uValue is $tType.sName){yes}{no} |
- }
+@main[]
+Defines
+
+$sEmpty[]
+^$sEmpty[]
+$sZero[0]
+^$sZero[0]
+$sOne[1]
+^$sOne[1]
+$sTwo[2]
+^$sTwo[2]
+$sTrue[true]
+^$sTrue[true]
+$sFalse[false]
+^$sFalse[false]
+
+
+$dZero(0.0)
+^$dZero(0.0)
+$dOne(1.1)
+^$dOne(1.1)
+$dTwo(2.2)
+^$dTwo(2.2)
+
+
+$iZero(^dZero.int[])
+^$iZero(^^dZero.int[])
+$iOne(^dOne.int[])
+^$iOne(^^dOne.int[])
+$iTwo(^dTwo.int[])
+^$iTwo(^^dTwo.int[])
+
+
+$bTrue(1==1)
+^$bTrue(1==1)
+$bFalse(1==0)
+^$bFalse(1==0)
+
+$dtDate[^date::create(2007;01;02;03;04;05)]
+^$dtDate[^^date::create(2007;01;02;03;04;05)]
+
+
+^$tEmptyTable[^^table::create{a ^; ^;b}]
+^$tTable[^^table::create{a ^; ^;b
+1 ^; ^;2}]
+$tEmptyTable[^table::create{a b}]
+$tTable[^table::create{a b
+1 2}]
+
+
+^$hEmptyHash[^^hash::create[]]
+$hEmptyHash[^hash::create[]]
+^$hHash[
+ ^; ^;^$.a[1]
+ ^; ^;^$.b[2]
+]
+
+$hHash[
+ $.a[1]
+ $.b[2]
+]
+
+^$fFile[^^file::load[text;152.html]]
+$fFile[^file::load[text;152.html]]
+
+^$fStat[^^file::stat[152.html]]
+$fStat[^file::stat[152.html]]
+
+^$fImage[^^image::measure[103paf2001.gif]]
+$fImage[^image::measure[103paf2001.gif]]
+
+$xDoc[^xdoc::create{}]
+^$xDoc[^^xdoc::create{^taint[]}]
+
+^$h[^^xDoc.select[/root/t]]
+^$xNode[^$h.0]
+$h[^xDoc.select[/root/t]]
+$xNode[$h.0]
+
+
+
+^printHeadLine[
]
+^printLine[^$vVoid;$vVoid.CLASS_NAME;^checkDef[];^checkExp[$vVoid]]
+
+^printLine[^$bFalse;$bFalse.CLASS_NAME;^checkDef[$bFalse];^checkExp[$bFalse];$bFalse]
+^printLine[^$bTrue;$bTrue.CLASS_NAME;^checkDef[$bTrue];^checkExp[$bTrue];$bTrue]
+
+^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[^$sTrue;$sTrue.CLASS_NAME;^checkDef[$sTrue];--;$sTrue]
+^printLine[^$sFalse;$sFalse.CLASS_NAME;^checkDef[$sFalse];--;$sFalse]
+
+^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;$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;$tEmptyTable.CLASS_NAME;^checkDef[$tEmptyTable];^checkExp[$tEmptyTable];$tEmptyTable]
+^printLine[^$tTable;$tTable.CLASS_NAME;^checkDef[$tTable];^checkExp[$tTable];$tTable]
+
+^printLine[^$hEmptyHash;$hEmptyHash.CLASS_NAME;^checkDef[$hEmptyHash];^checkExp[$hEmptyHash];$hEmptyHash]
+^printLine[^$hHash;$hHash.CLASS_NAME;^checkDef[$hHash];^checkExp[$hHash];$hHash]
+
+^printLine[^$fFile;$fFile.CLASS_NAME;^checkDef[$fFile];^checkExp[$fFile];$fFile]
+^printLine[^$fStat;$fStat.CLASS_NAME;^checkDef[$fStat];^checkExp[$fStat];$fStat]
+^printLine[^$fImage;$fImage.CLASS_NAME;^checkDef[$fImage];^checkExp[$fImage];$fImage]
+
+^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]
+
+
+
+
+bool itself
+(1==0): ^checkBool(1==0)
+(1==1): ^checkBool(1==1)
+
+
+bool methods for void
+^^vVoid.bool(true): ^checkBool(^vVoid.bool(true))
+^^vVoid.bool(false): ^checkBool(^vVoid.bool(false))
+
+
+bool methods for string
+^^sEmpty.bool(true): ^checkBool(^sEmpty.bool(true))
+^^sEmpty.bool(false): ^checkBool(^sEmpty.bool(false))
+
+^^sZero.bool(true): ^checkBool(^sZero.bool(true))
+^^sZero.bool(false): ^checkBool(^sZero.bool(false))
+
+^^sOne.bool(true): ^checkBool(^sOne.bool(true))
+^^sOne.bool(false): ^checkBool(^sOne.bool(false))
+
+^^sTwo.bool(true): ^checkBool(^sTwo.bool(true))
+^^sTwo.bool(false): ^checkBool(^sTwo.bool(false))
+
+^^sTrue.bool(true): ^checkBool(^sTrue.bool(true))
+^^sTrue.bool(false): ^checkBool(^sTrue.bool(false))
+
+^^sFalse.bool(true): ^checkBool(^sFalse.bool(true))
+^^sFalse.bool(false): ^checkBool(^sFalse.bool(false))
+
+
+bool methods for double
+^^dZero.bool(true): ^checkBool(^dZero.bool(true))
+^^dZero.bool(false): ^checkBool(^dZero.bool(false))
+
+^^dOne.bool(true): ^checkBool(^dOne.bool(true))
+^^dOne.bool(false): ^checkBool(^dOne.bool(false))
+
+^^dTwo.bool(true): ^checkBool(^dTwo.bool(true))
+^^dTwo.bool(false): ^checkBool(^dTwo.bool(false))
+
+
+bool methods for int
+^^iZero.bool(true): ^checkBool(^iZero.bool(true))
+^^iZero.bool(false): ^checkBool(^iZero.bool(false))
+
+^^iOne.bool(true): ^checkBool(^iOne.bool(true))
+^^iOne.bool(false): ^checkBool(^iOne.bool(false))
+
+^^iTwo.bool(true): ^checkBool(^iTwo.bool(true))
+^^iTwo.bool(false): ^checkBool(^iTwo.bool(false))
+
+@checkIsBool[uValue]
+^if($uValue is "bool"){yes}{no}
+
+@checkBool[bValue]
+^if($bValue == true){true}{false}
+
+@checkDef[uValue]
+^if(def $uValue){yes}{no}
+
+@checkExp[uValue]
+^if($uValue){true}{false}
+
+@printHeadLine[sTitle]
+$tType[^table::create{sName
+bool
+string
+double
+int
+table
+hash
+file
+image
+date
+xdoc
+xnode
+}]
+
+ | $sTitle |
+ .CLASS_NAME |
+ (def ...) |
+ (...) |
+ ^tType.menu{is $tType.sName | }
+
+
+@printLine[sTitle;sClassName;sDef;sExp;uValue]
+
+ | $sTitle |
+ $sClassName |
+ $sDef |
+ $sExp |
+ ^tType.menu{
+ ^if($uValue is $tType.sName){yes}{no} |
+ }
\ No newline at end of file