Add missing native array cases.

jnthn · Apr 7, 2013 · 468cb5f · 468cb5f
1 parent 977809b
commit 468cb5f
Showing 1 changed file with 5 additions and 1 deletion.
diff --git a/src/org/perl6/nqp/jast2bc/JASTToJVMBytecode.java b/src/org/perl6/nqp/jast2bc/JASTToJVMBytecode.java
@@ -611,8 +611,12 @@ else if (rest.equals("Double"))
         		type = Opcodes.T_DOUBLE;
         	else if (rest.equals("Boolean"))
         		type = Opcodes.T_BOOLEAN;
+        	else if (rest.equals("J") || rest.equals("Long"))
+        		type = Opcodes.T_LONG;
+        	else if (rest.equals("Byte"))
+        		type = Opcodes.T_BYTE;
         	else 
-        		type = Opcodes.T_INT;
+        		throw new RuntimeException("Unknown native array type");
         	m.visitIntInsn(Opcodes.NEWARRAY, type);
         	break;
         case 0xbd: // anewarray