Avoid allocating zero length arrays in CodeRef.

Raku · Oct 4, 2013 · bb33397 · bb33397
1 parent e0bc2b7
commit bb33397
Showing 1 changed file with 4 additions and 2 deletions.
diff --git a/src/vm/jvm/runtime/org/perl6/nqp/runtime/CompilationUnit.java b/src/vm/jvm/runtime/org/perl6/nqp/runtime/CompilationUnit.java
@@ -90,8 +90,10 @@ public void initializeCompilationUnit(ThreadContext tc) {
 
             String cuid = ann.cuid();
             CodeRef cr = new CodeRef(this, m.mh.bindTo(this), ann.name(), cuid,
-                ann.oLexicalNames(), ann.iLexicalNames(),
-                ann.nLexicalNames(), ann.sLexicalNames(),
+                ann.oLexicalNames().length == 0 ? null : ann.oLexicalNames(), 
+                ann.iLexicalNames().length == 0 ? null : ann.iLexicalNames(),
+                ann.nLexicalNames().length == 0 ? null : ann.nLexicalNames(),
+                ann.sLexicalNames().length == 0 ? null : ann.sLexicalNames(),
                 m.handlers);
             cr.staticInfo.methodName = m.methodName;
             cr.staticInfo.hasExitHandler = ann.hasExitHandler();