Nicolas Cellier uploaded a new version of Tests to project The Trunk: http://source.squeak.org/trunk/Tests-nice.133.mcz
==================== Summary ====================
Name: Tests-nice.133 Author: nice Time: 24 October 2011, 7:17:16.796 pm UUID: a5694376-8adb-f749-91dd-ba749f1a7f54 Ancestors: Tests-eem.132
Add tests for binary selectors with vertical bar
=============== Diff against Tests-eem.132 ===============
Item was added: + ----- Method: CompilerTest>>testBinarySelectorWithBar (in category 'syntax') ----- + testBinarySelectorWithBar + "Acknowledge the fact that $| is now allowed at any place in a binary selector" + + #(#'||' #'|||' #'|||++' #'<|>') do: [:selector | | source tree | + source := ('1 ' , selector , ' 2') readStream. + tree := (Compiler new) + from: source class: Object context: nil notifying: nil; + translate: source noPattern: true ifFail: [nil]. + self assert: tree notNil. + + "Hem, this test is really ugly..." + self assert: tree block statements first expr selector key = selector].!
Item was added: + ----- Method: CompilerTest>>testEmptyTemporaries (in category 'syntax') ----- + testEmptyTemporaries + self assert: (Compiler evaluate: '||') isNil!
Item was added: + ----- Method: CompilerTest>>testInvalidVerticalBarSelector (in category 'syntax') ----- + testInvalidVerticalBarSelector + self should: [Compiler evaluate: '1 | | 2'] raise: SyntaxErrorNotification. + self should: [Compiler evaluate: '1 | - 2'] raise: SyntaxErrorNotification.!
Item was added: + ----- Method: CompilerTest>>testLocalTemporariesInABlock (in category 'syntax') ----- + testLocalTemporariesInABlock + self assert: ((Compiler evaluate: '[:x|| tmp | tmp := x]') value: 2) = 2!
squeak-dev@lists.squeakfoundation.org