equal
deleted
inserted
replaced
388 self assert: result statements first isLiteralNode. |
388 self assert: result statements first isLiteralNode. |
389 self assert: result statements first value equals: 1. |
389 self assert: result statements first value equals: 1. |
390 self assert: result statements first value isInteger |
390 self assert: result statements first value isInteger |
391 ! |
391 ! |
392 |
392 |
|
393 testStatements9 |
|
394 super testStatements9. |
|
395 self assert: result isEmpty. |
|
396 ! |
|
397 |
393 testTemporaries1 |
398 testTemporaries1 |
394 super testTemporaries1. |
399 super testTemporaries1. |
395 self assert: result isSequence. |
400 self assert: result isSequence. |
396 self assert: result temporaries size equals: 1. |
401 self assert: result temporaries size equals: 1. |
397 self assert: result temporaries first isVariable. |
402 self assert: result temporaries first isVariable. |
501 self assert: result arguments first name equals: 'a'. |
506 self assert: result arguments first name equals: 'a'. |
502 self assert: result arguments second isVariable. |
507 self assert: result arguments second isVariable. |
503 self assert: result arguments second name equals: 'b'. |
508 self assert: result arguments second name equals: 'b'. |
504 self assert: result arguments third isVariable. |
509 self assert: result arguments third isVariable. |
505 self assert: result arguments third name equals: 'c'. |
510 self assert: result arguments third name equals: 'c'. |
|
511 self assert: result body temporaries isEmpty. |
|
512 self assert: result body statements isEmpty |
|
513 ! |
|
514 |
|
515 testBlock1 |
|
516 super testBlock1. |
|
517 self assert: result isBlock. |
|
518 self assert: result arguments size equals: 0. |
506 self assert: result body temporaries isEmpty. |
519 self assert: result body temporaries isEmpty. |
507 self assert: result body statements isEmpty |
520 self assert: result body statements isEmpty |
508 ! |
521 ! |
509 |
522 |
510 testComplexBlock1 |
523 testComplexBlock1 |