diff --git a/kiss/src/kiss/SpecialForms.hx b/kiss/src/kiss/SpecialForms.hx index e2783c84..e5177e75 100644 --- a/kiss/src/kiss/SpecialForms.hx +++ b/kiss/src/kiss/SpecialForms.hx @@ -363,7 +363,8 @@ class SpecialForms { var nullCase = if (k.hscript) { b.callSymbol("null", [b.raw(nullExpr.toString())]); } else { - b.call(b.callSymbol("when", [b.callSymbol("Prelude.isNull", [b.symbol("v")]), b.symbol("v")]), [b.raw(nullExpr.toString())]); + var gensym = b.symbol(); + b.call(b.callSymbol("when", [b.callSymbol("Prelude.isNull", [gensym]), gensym]), [b.raw(nullExpr.toString())]); }; cases.insert(0, nullCase);