blob: c0fb7acad84b21261dbe0f9ee6f930f958d37d56 (
plain)
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
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
|
use default_args;
$true = 1;
$false = 0;
if (default_args::anonymous() != 7771) {
die "anonymous (1) failed";
}
if (default_args::anonymous(1234) != 1234) {
die "anonymous (2) failed";
}
if (default_args::booltest() != $true) {
die "booltest (1) failed";
}
if (default_args::booltest($true) != $true) {
die "booltest (2) failed";
}
if (default_args::booltest($false) != $false) {
die "booltest (3) failed";
}
$ec = new default_args::EnumClass();
if ($ec->blah() != $true) {
die "EnumClass failed";
}
if (default_args::casts1() != null) {
die "casts1 failed";
}
if (default_args::casts2() != "Hello") {
die "casts2 failed";
}
if (default_args::casts1("Ciao") != "Ciao") {
die "casts1 not default failed";
}
if (default_args::chartest1() != 'x') {
die "chartest1 failed";
}
if (default_args::chartest2() != '\0') {
die "chartest2 failed";
}
if (default_args::chartest1('y') != 'y') {
die "chartest1 not default failed";
}
if (default_args::chartest1('y') != 'y') {
die "chartest1 not default failed";
}
if (default_args::reftest1() != 42) {
die "reftest1 failed";
}
if (default_args::reftest1(400) != 400) {
die "reftest1 not default failed";
}
if (default_args::reftest2() != "hello") {
die "reftest2 failed";
}
# rename
$foo = new default_args::Foo();
$foo->newname();
$foo->newname(10);
# exception specifications
eval { default_args::exceptionspec() };
if (!$@) {
die "exceptionspec 1 failed";
}
eval { default_args::exceptionspec(-1) };
if (!$@) {
die "exceptionspec 2 failed";
}
eval { default_args::exceptionspec(100) };
if (!$@) {
die "exceptionspec 3 failed";
}
$ex = new default_args::Except($false);
eval { $ex.exspec() };
if (!$@) {
die "exspec 1 failed";
}
eval { $ex.exspec(-1) };
if (!$@) {
die "exspec 2 failed";
}
eval { $ex.exspec(100) };
if (!$@) {
die "exspec 3 failed";
}
eval { $ex = new default_args::Except($true) };
if (!$@) {
die "Except constructor 1 failed";
}
eval { $ex = new default_args::Except($true, -2) };
if (!$@) {
die "Except constructor 2 failed";
}
#Default parameters in static class methods
if (default_args::Statics::staticmethod() != 10+20+30) {
die "staticmethod 1 failed";
}
if (default_args::Statics::staticmethod(100) != 100+20+30) {
die "staticmethod 2 failed";
}
if (default_args::Statics::staticmethod(100,200,300) != 100+200+300) {
die "staticmethod 3 failed";
}
$tricky = new default_args::Tricky();
if ($tricky->privatedefault() != 200) {
die "privatedefault failed";
}
if ($tricky->protectedint() != 2000) {
die "protectedint failed";
}
if ($tricky->protecteddouble() != 987.654) {
die "protecteddouble failed";
}
if ($tricky->functiondefault() != 500) {
die "functiondefault failed";
}
if ($tricky->contrived() != 'X') {
die "contrived failed";
}
if (default_args::constructorcall()->{val} != -1) {
die "constructorcall test 1 failed";
}
if (default_args::constructorcall(new default_args::Klass(2222))->{val} != 2222) {
die "constructorcall test 2 failed";
}
if (default_args::constructorcall(new default_args::Klass())->{val} != -1) {
die "constructorcall test 3 failed";
}
# const methods
$cm = new default_args::ConstMethods();
if ($cm->coo() != 20) {
die "coo test 1 failed";
}
if ($cm->coo(1.0) != 20) {
die "coo test 2 failed";
}
|
