--- parser3/tests/152.html 2007/02/08 16:22:38 1.2
+++ parser3/tests/152.html 2010/07/25 06:14:46 1.8
@@ -1,149 +1,214 @@
-@main[]
-
Defines
-
-$sEmpty[]
-^$sEmpty[]
-$sZero[0]
-^$sZero[0]
-$sOne[1]
-^$sOne[1]
-$sTwo[2]
-^$sTwo[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)
-
-
-.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
-
-
-bool itself
-(1==0): ^check(1==0)
-(1==1): ^check(1==1)
-
-
-(^$bFalse is "bool"): ^if($bFalse is "bool"){yes}{no}
-(^$bTrue is "bool"): ^if($bTrue is "bool"){yes}{no}
-
-
-(^$sEmpty is "bool"): ^if($sEmpty is "bool"){yes}{no}
-(^$sZero is "bool"): ^if($sZero is "bool"){yes}{no}
-(^$sOne is "bool"): ^if($sOne is "bool"){yes}{no}
-(^$sTwo is "bool"): ^if($sTwo is "bool"){yes}{no}
-
-
-(^$dZero is "bool"): ^if($dZero is "bool"){yes}{no}
-(^$dOne is "bool"): ^if($dOne is "bool"){yes}{no}
-(^$dTwo is "bool"): ^if($dTwo is "bool"){yes}{no}
-
-
-(^$iZero is "bool"): ^if($iZero is "bool"){yes}{no}
-(^$iOne is "bool"): ^if($iOne is "bool"){yes}{no}
-(^$iTwo is "bool"): ^if($iTwo is "bool"){yes}{no}
-
-
-void functions
-^^vVoid.bool(true): ^check(^vVoid.bool(true))
-^^vVoid.bool(false): ^check(^vVoid.bool(false))
-
-
-string functions
-^^sEmpty.bool(true): ^check(^sEmpty.bool(true))
-^^sEmpty.bool(false): ^check(^sEmpty.bool(false))
-
-^^sZero.bool(true): ^check(^sZero.bool(true))
-^^sZero.bool(false): ^check(^sZero.bool(false))
-
-^^sOne.bool(true): ^check(^sOne.bool(true))
-^^sOne.bool(false): ^check(^sOne.bool(false))
-
-^^sTwo.bool(true): ^check(^sTwo.bool(true))
-^^sTwo.bool(false): ^check(^sTwo.bool(false))
-
-
-double functions
-^^dZero.bool(true): ^check(^dZero.bool(true))
-^^dZero.bool(false): ^check(^dZero.bool(false))
-
-^^dOne.bool(true): ^check(^dOne.bool(true))
-^^dOne.bool(false): ^check(^dOne.bool(false))
-
-^^dTwo.bool(true): ^check(^dTwo.bool(true))
-^^dTwo.bool(false): ^check(^dTwo.bool(false))
-
-
-int functions
-^^iZero.bool(true): ^check(^iZero.bool(true))
-^^iZero.bool(false): ^check(^iZero.bool(false))
-
-^^iOne.bool(true): ^check(^iOne.bool(true))
-^^iOne.bool(false): ^check(^iOne.bool(false))
-
-^^iTwo.bool(true): ^check(^iTwo.bool(true))
-^^iTwo.bool(false): ^check(^iTwo.bool(false))
-
-
-def
-(def ^$vVoid): ^def[$vVoid]
-
-
-(def ^$bFalse): ^def[$bFalse]
-(def ^$bTrue): ^def[$bTrue]
-
-
-(def ^$sEmpty): ^def[$sEmpty]
-(def ^$sZero): ^def[$sZero]
-(def ^$sOne): ^def[$sOne]
-(def ^$sTwo): ^def[$sTwo]
-
-
-(def ^$dZero): ^def($dZero)
-(def ^$dOne): ^def($dOne)
-(def ^$dTwo): ^def($dTwo)
-
-
-(def ^$iZero): ^def($iZero)
-(def ^$iOne): ^def($iOne)
-(def ^$iTwo): ^def($iTwo)
-
-
-@check[bValue]
-'^if($bValue){true}{false}'
-
-
-@def[uValue]
-^if(def $uValue){def}{undef}
+@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