File:  [parser3project] / parser3 / tests / 191_a.p
Revision 1.1: download - view: text, annotated - select for diffs - revision graph
Wed Sep 3 14:34:31 2008 UTC (17 years, 10 months ago) by misha
Branches: MAIN
CVS tags: release_3_5_1, release_3_5_0, release_3_4_6, release_3_4_5, release_3_4_4, release_3_4_3, release_3_4_2, release_3_4_1, release_3_4_0, release_3_3_0, HEAD
- tests for calling .CLASS and .CLASS_NAME insite classes

@CLASS
A

@auto[]
$sa[sa_a]
$sv[sv_a]


@create[]
$da[da_a]
$dv[dv_a]


@print_a[]
<br />
A/^^print_a[]:<br />
^$sv: '$sv'<br />
^$sa: '$sa'<br />
^$sb: '$sb'<br />

^$dv: '$dv'<br />
^$da: '$da'<br />
^$db: '$db'<br />

@print_v[]
<br />
A/^^print_v[]:<br />
^$sv: '$sv'<br />
^$sa: '$sa'<br />
^$sb: '$sb'<br />

^$dv: '$dv'<br />
^$da: '$da'<br />
^$db: '$db'<br />


@class_a[]
$result[$CLASS]

@class_v[]
$result[$CLASS]



@class_name_a[]
$result[A/^^class_name_a[]: $CLASS_NAME<br />]

@class_name_v[]
$result[A/^^class_name_v[]: $CLASS_NAME<br />]

E-mail: