Index: src/closure.c
===================================================================
--- src/closure.c	(Revision 35)
+++ src/closure.c	(Arbeitskopie)
@@ -5887,7 +5887,7 @@
          * throw an error (unless <ob> has been omitted)
          */
         free_object(ob, "bind_lambda");
-        if (sp[1].type == T_NUMBER)
+        if (num_arg == 1)
             break;
         errorf("Bad arg 1 to bind_lambda(): unbindable closure\n");
         /* NOTREACHED */
