guard against nils for AttributesCompilerExpr

onionpancakes · Feb 20, 2024 · 2814251 · 2814251
1 parent e1c0a26
commit 2814251
Showing 1 changed file with 4 additions and 1 deletion.
diff --git a/src/dev/onionpancakes/chassis/compiler.clj b/src/dev/onionpancakes/chassis/compiler.clj
@@ -102,7 +102,8 @@
 
 (defn attrs-compiler-binding?
   [^clojure.lang.Compiler$LocalBinding b]
-  (attrs-compiler-expr? (.-init b)))
+  (and (some? b)
+       (attrs-compiler-expr? (.-init b))))
 
 (extend-protocol AttributesCompilerExpr
   clojure.lang.Compiler$NilExpr
@@ -118,6 +119,8 @@
   clojure.lang.Compiler$MapExpr
   (attrs-compiler-expr? [this] true)
   Object
+  (attrs-compiler-expr? [_] false)
+  nil
   (attrs-compiler-expr? [_] false))
 
 (extend-protocol CompilableForm