From 8a65bc0fce6d4aabcb2403ba4f13150ec748b268 Mon Sep 17 00:00:00 2001
From: Robin Mirow <robinmirow@live.com>
Date: Sat, 3 Nov 2018 17:45:17 +0100
Subject: [PATCH] feat(std): Add std.array.is_empty

---
 vm/src/primitives.rs | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/vm/src/primitives.rs b/vm/src/primitives.rs
index a6dae4f6a7..5a205c286f 100644
--- a/vm/src/primitives.rs
+++ b/vm/src/primitives.rs
@@ -30,6 +30,10 @@ pub mod array {
         array.len() as VmInt
     }
 
+    pub fn is_empty(array: Array<generic::A>) -> bool {
+        array.len() == 0
+    }
+
     pub(crate) fn index<'vm>(
         array: OpaqueRef<'vm, [generic::A]>,
         index: VmInt,
@@ -536,6 +540,7 @@ pub fn load_array(vm: &Thread) -> Result<ExternModule> {
         vm,
         record! {
             len => primitive!(1, std::array::prim::len),
+            is_empty => primitive!(1, std::array::prim::is_empty),
             index => primitive!(2, std::array::prim::index),
             append => primitive!(2, std::array::prim::append),
             slice => primitive!(3, std::array::prim::slice)