/[eiffelstudio]/trunk/eweasel/tests/syntax045/tcf
ViewVC logotype

Contents of /trunk/eweasel/tests/syntax045/tcf

Parent Directory Parent Directory | Revision Log Revision Log


Revision 65297 - (show annotations)
Thu Nov 30 20:22:33 2006 UTC (13 years, 2 months ago) by manus
File size: 7875 byte(s)
Moved from trunk/Src/eweasel to trunk/eweasel so that a simple checkout of the source code is not penalized by the lenghty process of checking out all the tests of eweasel.
1 test_name verbatim-manifest-string
2 test_description Verbatim manifest strings
3
4 -- Verbatim strings with braces and "old_verbatim_strings (yes)"
5
6 define INDENT "%T%T%T%T"
7 define SPACE " "
8 define OPEN "{"
9 define OPEN_CODE "123"
10 define CLOSE "}"
11 define CLOSE_CODE "125"
12 define CLOSE_OTHER "]"
13 define CLOSE_OTHER_CODE "93"
14 define OLD_VERBATIM_STRINGS "<setting name="old_verbatim_strings" value="true"/>"
15 define OLD_VERBATIM_STRINGS_WARNING "<warning name="old_verbatim_strings" enabled="false"/>"
16
17 copy_sub Ace $TEST Ace
18 copy_sub test.e $CLUSTER test.e
19
20 compile_melted
21 compile_result ok
22 c_compile_work
23 c_compile_result ok
24
25 execute_work NONE old_brace_output
26 execute_result ok
27
28 compare old_brace_output output
29
30 cleanup_compile
31
32 define OLD_VERBATIM_STRINGS_WARNING "<warning name="old_verbatim_strings" enabled="false"/>"
33 copy_sub Ace $TEST Ace
34 compile_melted
35 compile_result ok
36 cleanup_compile
37
38 define OLD_VERBATIM_STRINGS_WARNING "<warning name="old_verbatim_strings" enabled="true"/>"
39 copy_sub Ace $TEST Ace
40 compile_melted
41 compile_result ok
42 cleanup_compile
43
44 -- Verbatim strings with braces and "old_verbatim_strings (no)"
45
46 define OLD_VERBATIM_STRINGS "<setting name="old_verbatim_strings" value="false"/>"
47 define OLD_VERBATIM_STRINGS_WARNING "<warning name="old_verbatim_strings" enabled="false"/>"
48
49 copy_sub Ace $TEST Ace
50
51 compile_melted
52 compile_result ok
53 c_compile_work
54 c_compile_result ok
55
56 execute_work NONE new_brace_output
57 execute_result ok
58
59 compare new_brace_output output
60
61 cleanup_compile
62
63 define OLD_VERBATIM_STRINGS_WARNING "<warning name="old_verbatim_strings" enabled="false"/>"
64 copy_sub Ace $TEST Ace
65 compile_melted
66 compile_result ok
67 cleanup_compile
68
69 define OLD_VERBATIM_STRINGS_WARNING "<warning name="old_verbatim_strings" enabled="true"/>"
70 copy_sub Ace $TEST Ace
71 compile_melted
72 compile_result ok
73 cleanup_compile
74
75 -- Verbatim strings with braces and no special options
76
77 define OLD_VERBATIM_STRINGS ""
78 define OLD_VERBATIM_STRINGS_WARNING "<warning name="old_verbatim_strings" enabled="false"/>"
79
80 copy_sub Ace $TEST Ace
81
82 compile_melted
83 compile_result ok
84 c_compile_work
85 c_compile_result ok
86
87 execute_work NONE brace_output
88 execute_result ok
89
90 compare brace_output output
91
92 cleanup_compile
93
94 define OLD_VERBATIM_STRINGS_WARNING "<warning name="old_verbatim_strings" enabled="false"/>"
95 copy_sub Ace $TEST Ace
96 compile_melted
97 compile_result ok
98 cleanup_compile
99
100 define OLD_VERBATIM_STRINGS_WARNING "<warning name="old_verbatim_strings" enabled="true"/>"
101 copy_sub Ace $TEST Ace
102 compile_melted
103 compile_result ok
104 cleanup_compile
105
106 -- Verbatim strings with brackets and "<setting name="old_verbatim_strings" value="true"/>"
107
108 define INDENT "%T%T%T%T"
109 define SPACE " "
110 define OPEN "["
111 define OPEN_CODE "91"
112 define CLOSE "]"
113 define CLOSE_CODE "93"
114 define CLOSE_OTHER "}"
115 define CLOSE_OTHER_CODE "125"
116 define OLD_VERBATIM_STRINGS "<setting name="old_verbatim_strings" value="true"/>"
117 define OLD_VERBATIM_STRINGS_WARNING "<warning name="old_verbatim_strings" enabled="false"/>"
118
119 copy_sub Ace $TEST Ace
120 copy_sub test.e $CLUSTER test.e
121
122 compile_melted
123 compile_result ok
124 c_compile_work
125 c_compile_result ok
126
127 execute_work NONE old_bracket_output
128 execute_result ok
129
130 compare old_bracket_output output
131
132 cleanup_compile
133
134 define OLD_VERBATIM_STRINGS_WARNING "<warning name="old_verbatim_strings" enabled="false"/>"
135 copy_sub Ace $TEST Ace
136 compile_melted
137 compile_result ok
138 cleanup_compile
139
140 define OLD_VERBATIM_STRINGS_WARNING "<warning name="old_verbatim_strings" enabled="true"/>"
141 copy_sub Ace $TEST Ace
142 compile_melted
143 compile_result syntax_warning TEST 23; TEST 28; TEST 33; TEST 40; TEST 47; TEST 53; TEST 60; TEST 67; TEST 74; TEST 81; TEST 88; TEST 94; TEST 101; TEST 108; TEST 115; TEST 121; TEST 128; TEST 134; TEST 141; TEST 148; TEST 155; TEST 161; TEST 168; TEST 174; TEST 181; TEST 188; TEST 195; TEST 201; TEST 208; TEST 214; TEST 219
144 cleanup_compile
145
146 -- Verbatim strings with brackets and "old_verbatim_strings (no)"
147
148 define INDENT ""
149 define SPACE ""
150 define OLD_VERBATIM_STRINGS "<setting name="old_verbatim_strings" value="false"/>"
151 define OLD_VERBATIM_STRINGS_WARNING "<warning name="old_verbatim_strings" enabled="false"/>"
152
153 copy_sub Ace $TEST Ace
154 copy_sub test.e $CLUSTER test.e
155
156 compile_melted
157 compile_result ok
158 c_compile_work
159 c_compile_result ok
160
161 execute_work NONE new_bracket_output
162 execute_result ok
163
164 compare new_bracket_output output
165
166 cleanup_compile
167
168 define OLD_VERBATIM_STRINGS_WARNING "<warning name="old_verbatim_strings" enabled="false"/>"
169 copy_sub Ace $TEST Ace
170 compile_melted
171 compile_result ok
172 cleanup_compile
173
174 define OLD_VERBATIM_STRINGS_WARNING "<warning name="old_verbatim_strings" enabled="true"/>"
175 copy_sub Ace $TEST Ace
176 compile_melted
177 compile_result syntax_warning TEST 23; TEST 28; TEST 33; TEST 40; TEST 47; TEST 53; TEST 60; TEST 67; TEST 74; TEST 81; TEST 88; TEST 94; TEST 101; TEST 108; TEST 115; TEST 121; TEST 128; TEST 134; TEST 141; TEST 148; TEST 155; TEST 161; TEST 168; TEST 174; TEST 181; TEST 188; TEST 195; TEST 201; TEST 208; TEST 214; TEST 219
178 cleanup_compile
179
180 -- Verbatim strings with brackets and no special options
181
182 define OLD_VERBATIM_STRINGS ""
183 define OLD_VERBATIM_STRINGS_WARNING "<warning name="old_verbatim_strings" enabled="false"/>"
184
185 copy_sub Ace $TEST Ace
186
187 compile_melted
188 compile_result ok
189 c_compile_work
190 c_compile_result ok
191
192 execute_work NONE bracket_output
193 execute_result ok
194
195 compare bracket_output output
196
197 cleanup_compile
198
199 define OLD_VERBATIM_STRINGS_WARNING "<warning name="old_verbatim_strings" enabled="false"/>"
200 copy_sub Ace $TEST Ace
201 compile_melted
202 compile_result ok
203 cleanup_compile
204
205 define OLD_VERBATIM_STRINGS_WARNING "<warning name="old_verbatim_strings" enabled="true"/>"
206 copy_sub Ace $TEST Ace
207 compile_melted
208 compile_result syntax_warning TEST 23; TEST 28; TEST 33; TEST 40; TEST 47; TEST 53; TEST 60; TEST 67; TEST 74; TEST 81; TEST 88; TEST 94; TEST 101; TEST 108; TEST 115; TEST 121; TEST 128; TEST 134; TEST 141; TEST 148; TEST 155; TEST 161; TEST 168; TEST 174; TEST 181; TEST 188; TEST 195; TEST 201; TEST 208; TEST 214; TEST 219
209 cleanup_compile
210
211 -- Test for invalid strings
212
213 define OLD_VERBATIM_STRINGS ""
214 define OLD_VERBATIM_STRINGS_WARNING "<warning name="old_verbatim_strings" enabled="false"/>"
215 copy_sub Ace $TEST Ace
216
217 define LINE1 ""
218 define LINE2 ""
219
220 define LINE1 """
221 copy_sub test_invalid_syntax.e $CLUSTER test.e
222 compile_melted
223 compile_result syntax_error TEST 15
224 abort_compile
225
226 define LINE1 ""a"
227 copy_sub test_invalid_syntax.e $CLUSTER test.e
228 compile_melted
229 compile_result syntax_error TEST 15
230 abort_compile
231
232 define LINE1 ""["
233 copy_sub test_invalid_syntax.e $CLUSTER test.e
234 compile_melted
235 compile_result syntax_error TEST 19
236 abort_compile
237
238 define LINE1 ""{"
239 copy_sub test_invalid_syntax.e $CLUSTER test.e
240 compile_melted
241 compile_result syntax_error TEST 19
242 abort_compile
243
244 define LINE1 ""a["
245 copy_sub test_invalid_syntax.e $CLUSTER test.e
246 compile_melted
247 compile_result syntax_error TEST 19
248 abort_compile
249
250 define LINE1 ""a{"
251 copy_sub test_invalid_syntax.e $CLUSTER test.e
252 compile_melted
253 compile_result syntax_error TEST 19
254 abort_compile
255
256 define LINE1 "a""
257 copy_sub test_invalid_syntax.e $CLUSTER test.e
258 compile_melted
259 compile_result syntax_error TEST 15
260 abort_compile
261
262 define LINE1 ""%"
263 copy_sub test_invalid_syntax.e $CLUSTER test.e
264 compile_melted
265 compile_result syntax_error TEST 15
266 abort_compile
267
268 define LINE1 ""a["
269 define LINE2 "]b""
270 copy_sub test_invalid_syntax.e $CLUSTER test.e
271 compile_melted
272 compile_result syntax_error TEST 19
273 abort_compile
274
275 define LINE1 ""a{"
276 define LINE2 "}b""
277 copy_sub test_invalid_syntax.e $CLUSTER test.e
278 compile_melted
279 compile_result syntax_error TEST 19
280 abort_compile
281
282 define LINE1 ""["
283 define LINE2 "}""
284 copy_sub test_invalid_syntax.e $CLUSTER test.e
285 compile_melted
286 compile_result syntax_error TEST 19
287 abort_compile
288
289 define LINE1 ""{"
290 define LINE2 "]""
291 copy_sub test_invalid_syntax.e $CLUSTER test.e
292 compile_melted
293 compile_result syntax_error TEST 19
294 abort_compile
295
296 test_end

Properties

Name Value
svn:eol-style native

  ViewVC Help
Powered by ViewVC 1.1.23