From f00b8c8e5549871b9ec32e6e627a6c70d5c476ef Mon Sep 17 00:00:00 2001 From: John Benediktsson Date: Fri, 4 May 2012 18:20:04 -0700 Subject: [PATCH] Revert "Clean up smalltalk grammar" This reverts commit 578bb98f2139fa1e82e99e9687932de59fb96ab6. --- extra/smalltalk/parser/parser.factor | 6 ++---- 1 file changed, 2 insertions(+), 4 deletions(-) diff --git a/extra/smalltalk/parser/parser.factor b/extra/smalltalk/parser/parser.factor index bfacfcc085..c7cafe94dd 100644 --- a/extra/smalltalk/parser/parser.factor +++ b/extra/smalltalk/parser/parser.factor @@ -145,14 +145,12 @@ UnaryMessageSend = (UnaryMessageSend | Operand):lhs (OptionalWhiteSpace ";" Message:m => [[ m ]])*:t => [[ lhs t h prefix >array ]] -BinaryMessageSendLHS = (BinaryMessageSend | UnaryMessageSend | Operand) - -BinaryMessageSend = BinaryMessageSendLHS:lhs +BinaryMessageSend = (BinaryMessageSend | UnaryMessageSend | Operand):lhs BinaryMessage:h (OptionalWhiteSpace ";" Message:m => [[ m ]])*:t => [[ lhs t h prefix >array ]] -KeywordMessageSend = BinaryMessageSendLHS:lhs +KeywordMessageSend = (BinaryMessageSend | UnaryMessageSend | Operand):lhs KeywordMessage:h (OptionalWhiteSpace ";" Message:m => [[ m ]])*:t => [[ lhs t h prefix >array ]]