diff --git a/spl/std.spl b/spl/std.spl
index 442ca2f..9b1befe 100644
--- a/spl/std.spl
+++ b/spl/std.spl
@@ -218,6 +218,9 @@ construct _array-ext {
         }
         null
     }
+    contains { bool | with search this ;
+        search awrap this:find null eq not
+    }
     starts-with { bool | with beginning this ;
         this:len beginning:len lt if {
             0