Return to 152.html CVS log

Up to [parser3project] / parser3 / tests

- test rewrited

@main[]
<h2>Defines</h2>

$sEmpty[]
^$sEmpty[]<br />
$sZero[0]
^$sZero[0]<br />
$sOne[1]
^$sOne[1]<br />
$sTwo[2]
^$sTwo[2]<br /><br />

$dtDate[^date::create(2007;01;02;03;04;05)]
^$dtDate[^^date::create(2007;01;02;03;04;05)]<br />
<br />

^$tEmptyTable[^^table::create{a&nbsp^;&nbsp^;b}]<br />
^$tTable[^^table::create{a&nbsp^;&nbsp^;b<br />
1&nbsp^;&nbsp^;2}]<br />
$tEmptyTable[^table::create{a	b}]
$tTable[^table::create{a	b
1	2}]
<br />

^$hEmptyHash[^^hash::create[]]<br />
$hEmptyHash[^hash::create[]]
^$hHash[<br />
&nbsp^;&nbsp^;^$.a[1]<br />
&nbsp^;&nbsp^;^$.b[2]<br />
]<br />
<br />
$hHash[
	$.a[1]
	$.b[2]
]

$dZero(0.0)
^$dZero(0.0)<br />
$dOne(1.1)
^$dOne(1.1)<br />
$dTwo(2.2)
^$dTwo(2.2)<br /><br />

$iZero(^dZero.int[])
^$iZero(^^dZero.int[])<br />
$iOne(^dOne.int[])
^$iOne(^^dOne.int[])<br />
$iTwo(^dTwo.int[])
^$iTwo(^^dTwo.int[])<br /><br />

$bTrue(1==1)
^$bTrue(1==1)<br />
$bFalse(1==0)
^$bFalse(1==0)<br /><br />

$xDoc[^xdoc::create{<?xml version="1.0"?><root><t/><t/><t/></root>}]
^$xDoc[^^xdoc::create{<?xml version="1.0"?><root><t/><t/><t/></root>}]<br />

^$h[^^xDoc.select[/root/t]]<br />
^$xNode[^$h.0]<br />
$h[^xDoc.select[/root/t]]
$xNode[$h.0]

<h2>.CLASS_NAME</h2>
^$bTrue.CLASS_NAME: $bTrue.CLASS_NAME<br />
^$bFalse.CLASS_NAME: $bFalse.CLASS_NAME<br />
<br />

^$sEmpty.CLASS_NAME: $sEmpty.CLASS_NAME<br />
^$sZero.CLASS_NAME: $sZero.CLASS_NAME<br />
^$sOne.CLASS_NAME: $sOne.CLASS_NAME<br />
^$sTwo.CLASS_NAME: $sTwo.CLASS_NAME<br />
<br />

^$dZero.CLASS_NAME: $dZero.CLASS_NAME<br />
^$dOne.CLASS_NAME: $dOne.CLASS_NAME<br />
^$dTwo.CLASS_NAME: $dTwo.CLASS_NAME<br />
<br />

^$iZero.CLASS_NAME: $iZero.CLASS_NAME<br />
^$iOne.CLASS_NAME: $iOne.CLASS_NAME<br />
^$iTwo.CLASS_NAME: $iTwo.CLASS_NAME<br />
<br />

^$tTable.CLASS_NAME: $tTable.CLASS_NAME<br />
^$hHash.CLASS_NAME: $hHash.CLASS_NAME<br />
^$dtDate.CLASS_NAME: $dtDate.CLASS_NAME<br />
^$xDoc.CLASS_NAME: $xDoc.CLASS_NAME<br />
^$xNode.CLASS_NAME: $xNode.CLASS_NAME<br />

<h2>bool itself</h2>
(1==0): ^checkBool(1==0)
(1==1): ^checkBool(1==1)
<br />

<h2>bool methods for void</h2>
^^vVoid.bool(true): ^checkBool(^vVoid.bool(true))
^^vVoid.bool(false): ^checkBool(^vVoid.bool(false))


<h2>bool methods for string</h2>
^^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))


<h2>bool methods for double</h2>
^^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))


<h2>bool methods for int</h2>
^^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))


<h2>others</h2>
<table border="1">
^printHeadLine[<br />]
^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]
</table>



@checkIsBool[uValue]
^if($uValue is "bool"){yes}{no}<br />


@checkBool[bValue]
^if($bValue == true){true}{false}<br />


@checkDef[uValue]
^if(def $uValue){yes}{no}<br />


@checkExp[uValue]
^if($uValue){true}{false}<br />


@printHeadLine[sTitle]
$tType[^table::create{sName
bool
string
double
int
table
hash
date
xdoc
xnode
}]
<tr>
	<td>$sTitle</td>
	<td>(def ...)</td>
	<td>(...)</td>
	^tType.menu{<td>(... is $tType.sName)</td>}
</tr>


@printLine[sTitle;sDef;sExp;uValue]
<tr>
	<td>$sTitle</td>
	<td>$sDef</td>
	<td>$sExp</td>
	^tType.menu{
		<td>^if($uValue is $tType.sName){<b>yes</b>}{no}</td>
	}
</tr>