[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: [Help-smalltalk] STCompiler input bug?
|
From: |
Holger Hans Peter Freyther |
|
Subject: |
Re: [Help-smalltalk] STCompiler input bug? |
|
Date: |
Sat, 24 Sep 2011 19:54:48 +0200 |
|
User-agent: |
Mozilla/5.0 (X11; U; Linux i686; en-US; rv:1.9.2.21) Gecko/20110831 Lightning/1.0b2 Thunderbird/3.1.13 |
On 09/24/2011 07:37 PM, Holger Hans Peter Freyther wrote:
>
> aNode: 'RBMessageNode(self lastUsed + 1 to: ports size do: alloc)'
> ^^^^^^^^^^^^
>
> (block arguments size = 1 and: [block body temporaries isEmpty])
> ifFalse: [^false].
>
> so it needs a similar check if it is a block... or can act like a block?
>
diff --git a/packages/stinst/parser/STCompiler.st
b/packages/stinst/parser/STCompiler.st
index 4235d41..74fc9a8 100644
--- a/packages/stinst/parser/STCompiler.st
+++ b/packages/stinst/parser/STCompiler.st
@@ -780,6 +780,7 @@ indexed'' bytecode. The resulting stream is
stop := step. "to:"
step := block. "by:"
block := each "do:"].
+ block isBlock ifFalse: [^false].
(block arguments size = 1 and: [block body temporaries isEmpty])
ifFalse: [^false].
stop isNil