equal
deleted
inserted
replaced
233 CompilerTests2 basicNew method_argAndVarNames_06 |
233 CompilerTests2 basicNew method_argAndVarNames_06 |
234 " |
234 " |
235 |
235 |
236 "Created: / 20-09-2013 / 11:44:12 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
236 "Created: / 20-09-2013 / 11:44:12 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
237 "Modified: / 26-09-2014 / 13:01:17 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
237 "Modified: / 26-09-2014 / 13:01:17 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
|
238 ! |
|
239 |
|
240 method_argAndVarNames_07 |
|
241 | b | |
|
242 |
|
243 b := [:len | |
|
244 1 to: len do:[:i| |
|
245 i == 1 ifTrue:[ |
|
246 self saveContext. |
|
247 ] |
|
248 ] |
|
249 ]. |
|
250 |
|
251 b value: 5 |
|
252 |
|
253 " |
|
254 CompilerTests2 basicNew method_argAndVarNames_05 |
|
255 " |
|
256 |
|
257 "Created: / 23-12-2015 / 18:40:11 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
238 ! |
258 ! |
239 |
259 |
240 method_argAndVarNames_07 |
260 method_argAndVarNames_07 |
241 | b | |
261 | b | |
242 |
262 |
1400 version_HG |
1420 version_HG |
1401 |
1421 |
1402 ^ '$Changeset: <not expanded> $' |
1422 ^ '$Changeset: <not expanded> $' |
1403 ! |
1423 ! |
1404 |
1424 |
|
1425 version_HG |
|
1426 |
|
1427 ^ '$Changeset: <not expanded> $' |
|
1428 ! |
|
1429 |
1405 version_SVN |
1430 version_SVN |
1406 ^ '$Id$' |
1431 ^ '$Id$' |
1407 ! ! |
1432 ! ! |
1408 |
1433 |