# HG changeset patch
# User Claus Gittinger <cg@exept.de>
# Date 1573199789 -3600
# Node ID 654beb89f1500518c8c61c00c8c374ac37b25a04
# Parent  3002901e43add58927f664b944e31869b9c4a19f
#REFACTORING by exept
class: Block
changed: #cull:

diff -r 3002901e43ad -r 654beb89f150 Block.st
--- a/Block.st	Fri Nov 08 08:53:25 2019 +0100
+++ b/Block.st	Fri Nov 08 08:56:29 2019 +0100
@@ -495,7 +495,7 @@
     "activate the receiver with one or zero arguments.
      Squeak compatibility, but also present in VW Smalltalk"
 
-    nargs >= 1 ifTrue:[^ self value:optionalFirstArg].
+    nargs > 0 ifTrue:[^ self value:optionalFirstArg].
     ^ self value
 !