[hl] Respect hl-legacy32 for I64 arrays

Author: tobil4sk

src/generators/genhl.ml

@@ -4153,7 +4153,7 @@ let create_context com dump =
 			ai32 = get_class "ArrayBytes_Int";
 			af32 = get_class "ArrayBytes_hl_F32";
 			af64 = get_class "ArrayBytes_Float";
-			ai64 = get_class "ArrayBytes_hl_I64";
+			ai64 = get_class (if Gctx.raw_defined com "hl_legacy32" then "ArrayBytes_Int" else "ArrayBytes_hl_I64");
 		};
 		base_class = get_class "Class";
 		base_enum = get_class "Enum";

std/hl/types/ArrayBase.hx

@@ -149,11 +149,13 @@ class ArrayBase extends ArrayAccess {
 		return a;
 	}
 
+	#if !hl_legacy32
 	public static function allocI64(bytes:BytesAccess<I64>, length:Int) @:privateAccess {
 		var a:ArrayBytes.ArrayI64 = untyped $new(ArrayBytes.ArrayI64);
 		a.length = length;
 		a.bytes = bytes;
 		a.size = length;
 		return a;
 	}
+	#end
 }

std/hl/types/ArrayBytes.hx

@@ -362,4 +362,6 @@ typedef ArrayI32 = ArrayBytes<Int>;
 typedef ArrayUI16 = ArrayBytes<UI16>;
 typedef ArrayF32 = ArrayBytes<F32>;
 typedef ArrayF64 = ArrayBytes<Float>;
+#if !hl_legacy32
 typedef ArrayI64 = ArrayBytes<I64>;
+#end