Fix error when protopad is created while >10 lexicals already exist

sorear · Oct 20, 2011 · a77df2e · a77df2e
1 parent 3da8e40
commit a77df2e
Showing 1 changed file with 5 additions and 0 deletions.
diff --git a/lib/Kernel.cs b/lib/Kernel.cs
@@ -1698,6 +1698,11 @@ public class UsedInScopeInfo {
             // or when we are
             protopad = new Frame(null, outer != null ? outer.protopad : null,
                 this, protosub);
+            if (num_lex_slots > 10 && protopad.lexn == null) {
+                // nspill is zero at this point so protopad allocation is
+                // incomplete
+                protopad.lexn = new object[num_lex_slots - 10];
+            }
 
             foreach (SubInfo z in children)
                 z.protosub = Kernel.MakeSub(z, protopad);