Make state variables be stateful.

Author: jnthn

src/vm/jvm/runtime/org/perl6/nqp/runtime/CallFrame.java

@@ -118,9 +118,17 @@ public CallFrame(ThreadContext tc, CodeRef cr) {
                 case 0:
                     this.oLex[i] = sci.oLexStatic[i];
                     break;
-                default:
+                case 1:
                     this.oLex[i] = sci.oLexStatic[i].clone(tc);
                     break;
+                case 2:
+                    if (cr.oLexState == null)
+                        cr.oLexState = new SixModelObject[sci.oLexStatic.length];
+                    if (cr.oLexState[i] == null)
+                        this.oLex[i] = cr.oLexState[i] = sci.oLexStatic[i].clone(tc);
+                    else
+                        this.oLex[i] = cr.oLexState[i];
+                    break;
                 }
             }
         }

src/vm/jvm/runtime/org/perl6/nqp/runtime/CodeRef.java

@@ -33,6 +33,11 @@ public class CodeRef extends SixModelObject {
      */
     public boolean isCompilerStub;
 
+    /**
+     * State variable storage, if needed.
+     */
+    public SixModelObject[] oLexState;
+    
     /**
      * Sets up the code-ref data structure.
      */