From f1829b87b2ffbd02b4bc578333a6cbfbe02c01b4 Mon Sep 17 00:00:00 2001
From: Case Duckworth
Date: Tue, 16 Apr 2024 22:30:43 -0500
Subject: Allow empty alternative branch in "if"

---
 eval.lua | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/eval.lua b/eval.lua
index 342624f..287509d 100644
--- a/eval.lua
+++ b/eval.lua
@@ -69,7 +69,7 @@ m.primitives = {
 		end,
 	["if"] =
 		function (r, e)
-			assert_arity(r,3,3)
+			assert_arity(r,2,3)
 			local test, conseq, alt = r[1], r[2][1], r[2][2][1]
 			if m.eval(test, e)
 			then return m.eval(conseq, e)
-- 
cgit 1.4.1-21-gabe81