--- a/IRInterpreter.st	Wed Nov 05 18:58:44 2008 +0000
+++ b/IRInterpreter.st	Mon Dec 01 19:01:08 2008 +0000
@@ -58,10 +58,14 @@
 returnTop
 !
 
-send: selector
+send: selector numArgs: numArgs
+
+    "Created: / 01-12-2008 / 19:40:01 / Jan Vrany <vranyj1@fel.cvut.cz>"
 !
 
-send: selector toSuperOf: behavior
+send: selector numArgs: numArgs toSuperOf: behavior
+
+    "Modified: / 01-12-2008 / 19:45:19 / Jan Vrany <vranyj1@fel.cvut.cz>"
 !
 
 storeLiteralVariable: index