diff --git a/src/interpreter.janet b/src/interpreter.janet
index 3f59fce..a7e4a25 100644
--- a/src/interpreter.janet
+++ b/src/interpreter.janet
@@ -183,7 +183,7 @@
     :word (match-word pattern value ctx)
 
     # match on equality
-    :nil {:success (nil? value) :ctx ctx}
+    :nil {:success (= :^nil value) :ctx ctx}
     :bool {:success (= data value) :ctx ctx}
     :number {:success (= data value) :ctx ctx}
     :string {:success (= data value) :ctx ctx}
diff --git a/src/ludus.janet b/src/ludus.janet
index b8dd543..da43994 100644
--- a/src/ludus.janet
+++ b/src/ludus.janet
@@ -52,8 +52,7 @@
 (comment
 # (do
 (def source `
-fn id (x) -> x
-map (id, [])
+contains? (:d, [:a, :b])
 `)
 (def out (-> source 
  ludus