1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
|
#*
@test reference.vm
This template is used for Velocity regression testing.
If you alter this template make sure you change the
corresponding comparison file so that the regression
test doesn't fail incorrectly.
*#
#set($_foo = "bar")
$_foo
#if ($_foo.equals("bar"))
\$_foo equals "bar" : $_foo
#end
Late introspection :
$vector.firstElement().length()
More stupid reference escaping ...
When it does exist in the context :
#set($foo = "foo")
$foo
\$foo
\$!foo
$\!foo
$\\!foo
\$\!foo
And when it doesn't :
$bar
\$bar
\$!bar (because it's just text...)
$\!foo
$\\!foo
$\\\!foo
$\\\\!foo
\\$\!foo
Misc tests :
[$foo.bar]
Test lower case property names
$provider.Title
$provider.title
#foreach($i in $provider.vector)
$i
#end
#foreach($i in $provider.Vector)
$i
#end
Now test if we can use lowercase for propertes in set
#set($oldtitle = $provider.title)
Was : $oldtitle
#set($provider.title = "geir")
Now : $provider.title
#set($provider.title = $oldtitle)
Back : $provider.title
Test what was a bug :
#set($b = 'boy')
#set($c = 'cat')
$b${c}.java
${b}${c}.java
More tests :
$provider.title
$$provider.title
#$provider.title
$foo.bar#if( $foo ) ($bar) #end
Test boolean introspection isFoo()
#if( $boolobj.boolean == true )
Correct
#else
Wrong
#end
#if ( $boolobj.notboolean == true )
Wrong
#else
Correct
#end
|
