File:  [parser3project] / parser3 / tests / 152.html
Revision 1.9: download - view: text, annotated - select for diffs - revision graph
Tue Feb 14 15:49:19 2017 UTC (9 years, 3 months ago) by moko
Branches: MAIN
CVS tags: release_3_5_1, release_3_5_0, release_3_4_6, release_3_4_5, HEAD
test for $._default hash added (related to bug #1131)

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

$sEmpty[]
^$sEmpty[]<br />
$sZero[0]
^$sZero[0]<br />
$sOne[1]
^$sOne[1]<br />
$sTwo[2]
^$sTwo[2]<br />
$sTrue[true]
^$sTrue[true]<br />
$sFalse[false]
^$sFalse[false]<br />
<br />

$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 />

$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[]]
^$hDefaultHash[^^hash::create[ ^$._default[yes] ]]<br />
$hDefaultHash[^hash::create[ $._default[yes] ]]
^$hHash[<br />
&nbsp^;&nbsp^;^$.a[1]<br />
&nbsp^;&nbsp^;^$.b[2]<br />
]<br />
<br />
$hHash[
	$.a[1]
	$.b[2]
]

^$fFile[^^file::load[text;152.html]]<br />
$fFile[^file::load[text;152.html]]

^$fStat[^^file::stat[152.html]]<br /><br />
$fStat[^file::stat[152.html]]

^$fImage[^^image::measure[103paf2001.gif]]<br /><br />
$fImage[^image::measure[103paf2001.gif]]

$xDoc[^xdoc::create{<?xml version="1.0"?><root><t/><t/><t/></root>}]
^$xDoc[^^xdoc::create{^taint[<?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]

<hr />
<table border="1">
^printHeadLine[<br />]
^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;<b>$sEmpty.CLASS_NAME</b>;^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[^$hDefaultHash;$hDefaultHash.CLASS_NAME;^checkDef[$hDefaultHash];^checkExp[$hDefaultHash];$hDefaultHash]
^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]
</table>



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


<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))

^^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))


<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))

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

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

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

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

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

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

E-mail: