Skip to content
Browse files

. more example lines to stress the smalltalk parser in this specific way

  • Loading branch information...
1 parent 7156387 commit 0dd602cf2fe66824e196e4adc9d3595e435082c1 @kschiess committed
Showing with 36 additions and 1 deletion.
  1. +36 −1 benchmarks/003-smalltalk.rb
View
37 benchmarks/003-smalltalk.rb
@@ -277,11 +277,46 @@ def keywords
end
end
-10.times do
+3.times do
AnsiSmalltalk.new.parse(<<-SMALLTALK.strip
[ :some | |a b c|
"A method to illustrate some syntax"
true & false not & (nil isNil) ifFalse: [self halt; yourself].
+ true & false not & (nil isNil) ifFalse: [self halt; yourself].
+ true & false not & (nil isNil) ifFalse: [self halt; yourself].
+ true & false not & (nil isNil) ifFalse: [self halt; yourself].
+ true & false not & (nil isNil) ifFalse: [self halt; yourself].
+ true & false not & (nil isNil) ifFalse: [self halt; yourself].
+ true & false not & (nil isNil) ifFalse: [self halt; yourself].
+ true & false not & (nil isNil) ifFalse: [self halt; yourself].
+ true & false not & (nil isNil) ifFalse: [self halt; yourself].
+ true & false not & (nil isNil) ifFalse: [self halt; yourself].
+ true & false not & (nil isNil) ifFalse: [self halt; yourself].
+ true & false not & (nil isNil) ifFalse: [self halt; yourself].
+ true & false not & (nil isNil) ifFalse: [self halt; yourself].
+ true & false not & (nil isNil) ifFalse: [self halt; yourself].
+ true & false not & (nil isNil) ifFalse: [self halt; yourself].
+ true & false not & (nil isNil) ifFalse: [self halt; yourself].
+ true & false not & (nil isNil) ifFalse: [self halt; yourself].
+ true & false not & (nil isNil) ifFalse: [self halt; yourself].
+ true & false not & (nil isNil) ifFalse: [self halt; yourself].
+ true & false not & (nil isNil) ifFalse: [self halt; yourself].
+ true & false not & (nil isNil) ifFalse: [self halt; yourself].
+ true & false not & (nil isNil) ifFalse: [self halt; yourself].
+ true & false not & (nil isNil) ifFalse: [self halt; yourself].
+ true & false not & (nil isNil) ifFalse: [self halt; yourself].
+ true & false not & (nil isNil) ifFalse: [self halt; yourself].
+ true & false not & (nil isNil) ifFalse: [self halt; yourself].
+ true & false not & (nil isNil) ifFalse: [self halt; yourself].
+ true & false not & (nil isNil) ifFalse: [self halt; yourself].
+ true & false not & (nil isNil) ifFalse: [self halt; yourself].
+ true & false not & (nil isNil) ifFalse: [self halt; yourself].
+ true & false not & (nil isNil) ifFalse: [self halt; yourself].
+ b := self size + super size + super class GlobalVariable.
+ b := self size + super size + super class GlobalVariable.
+ b := self size + super size + super class GlobalVariable.
+ b := self size + super size + super class GlobalVariable.
+ b := self size + super size + super class GlobalVariable.
b := self size + super size + super class GlobalVariable.
(#($a #a 'a' 1 1.0) addAll: { some . 1.2e10 . 2r101 })
do: [:each | Transcript

0 comments on commit 0dd602c

Please sign in to comment.
Something went wrong with that request. Please try again.