From e1838963ae67f31c22d611531470117c155c19f5 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Tue, 22 Aug 2017 20:50:51 -0400
Subject: - Added array operations for primitive arrays.

---
 luxc/src/lux/analyser/proc/jvm.clj      | 16 ++++++++++++++++
 luxc/src/lux/compiler/jvm/proc/host.clj | 16 ++++++++++++++++
 2 files changed, 32 insertions(+)

(limited to 'luxc/src')

diff --git a/luxc/src/lux/analyser/proc/jvm.clj b/luxc/src/lux/analyser/proc/jvm.clj
index 910f5c72f..dc3f8d587 100644
--- a/luxc/src/lux/analyser/proc/jvm.clj
+++ b/luxc/src/lux/analyser/proc/jvm.clj
@@ -917,6 +917,22 @@
       "fnewarray"    (analyse-jvm-fnewarray analyse exo-type ?values)
       "dnewarray"    (analyse-jvm-dnewarray analyse exo-type ?values)
       "cnewarray"    (analyse-jvm-cnewarray analyse exo-type ?values)
+      "zaload" (analyse-jvm-zaload analyse exo-type ?values)
+      "zastore" (analyse-jvm-zastore analyse exo-type ?values)
+      "baload" (analyse-jvm-baload analyse exo-type ?values)
+      "bastore" (analyse-jvm-bastore analyse exo-type ?values)
+      "saload" (analyse-jvm-saload analyse exo-type ?values)
+      "sastore" (analyse-jvm-sastore analyse exo-type ?values)
+      "iaload" (analyse-jvm-iaload analyse exo-type ?values)
+      "iastore" (analyse-jvm-iastore analyse exo-type ?values)
+      "laload" (analyse-jvm-laload analyse exo-type ?values)
+      "lastore" (analyse-jvm-lastore analyse exo-type ?values)
+      "faload" (analyse-jvm-faload analyse exo-type ?values)
+      "fastore" (analyse-jvm-fastore analyse exo-type ?values)
+      "daload" (analyse-jvm-daload analyse exo-type ?values)
+      "dastore" (analyse-jvm-dastore analyse exo-type ?values)
+      "caload" (analyse-jvm-caload analyse exo-type ?values)
+      "castore" (analyse-jvm-castore analyse exo-type ?values)
       "iadd"         (analyse-jvm-iadd analyse exo-type ?values)
       "isub"         (analyse-jvm-isub analyse exo-type ?values)
       "imul"         (analyse-jvm-imul analyse exo-type ?values)
diff --git a/luxc/src/lux/compiler/jvm/proc/host.clj b/luxc/src/lux/compiler/jvm/proc/host.clj
index 94b7ca0d8..18b140176 100644
--- a/luxc/src/lux/compiler/jvm/proc/host.clj
+++ b/luxc/src/lux/compiler/jvm/proc/host.clj
@@ -1020,6 +1020,22 @@
     "fnewarray"       (compile-jvm-fnewarray compile ?values special-args)
     "dnewarray"       (compile-jvm-dnewarray compile ?values special-args)
     "cnewarray"       (compile-jvm-cnewarray compile ?values special-args)
+    "zaload" (compile-jvm-zaload compile ?values special-args)
+    "zastore" (compile-jvm-zastore compile ?values special-args)
+    "baload" (compile-jvm-baload compile ?values special-args)
+    "bastore" (compile-jvm-bastore compile ?values special-args)
+    "saload" (compile-jvm-saload compile ?values special-args)
+    "sastore" (compile-jvm-sastore compile ?values special-args)
+    "iaload" (compile-jvm-iaload compile ?values special-args)
+    "iastore" (compile-jvm-iastore compile ?values special-args)
+    "laload" (compile-jvm-laload compile ?values special-args)
+    "lastore" (compile-jvm-lastore compile ?values special-args)
+    "faload" (compile-jvm-faload compile ?values special-args)
+    "fastore" (compile-jvm-fastore compile ?values special-args)
+    "daload" (compile-jvm-daload compile ?values special-args)
+    "dastore" (compile-jvm-dastore compile ?values special-args)
+    "caload" (compile-jvm-caload compile ?values special-args)
+    "castore" (compile-jvm-castore compile ?values special-args)
     "iadd"            (compile-jvm-iadd compile ?values special-args)
     "isub"            (compile-jvm-isub compile ?values special-args)
     "imul"            (compile-jvm-imul compile ?values special-args)
-- 
cgit v1.2.3