--- a/Lazy.st	Fri Dec 09 00:31:01 2016 +0100
+++ b/Lazy.st	Fri Dec 09 00:31:25 2016 +0100
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
 "
  This is a Manchester Goodie protected by copyright.
  These conditions are imposed on the whole Goodie, and on any significant
@@ -238,6 +236,20 @@
     ].
 
     ^ aMessage sendTo:result.
+!
+
+perform:aSelector withArguments:argArray
+    "send the message aSelector with all args taken from argArray
+     to the receiver."
+
+    startSemaphore notNil ifTrue:[
+        IsDebuggingQuery query ifTrue:[
+            "enable debugging / inspecting"
+            ^ super perform:aSelector withArguments:argArray.
+        ].
+        self _evaluate_.
+    ].
+    ^ result perform:aSelector withArguments:argArray.
 ! !
 
 !Lazy methodsFor:'testing'!