From bf561a66e16d123d3071b886f48303d09ed0b439 Mon Sep 17 00:00:00 2001
From: Justin Ethier <justin.ethier@gmail.com>
Date: Thu, 11 Feb 2016 21:05:37 -0500
Subject: [PATCH] Allow Cyc_apply to receive 0 scheme args

---
 runtime.c | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/runtime.c b/runtime.c
index 88007bbf..07a06d55 100644
--- a/runtime.c
+++ b/runtime.c
@@ -2128,7 +2128,10 @@ void Cyc_apply(void *data, int argc, closure cont, object prim, ...){
     //printf("\n");
 
     va_end(ap);
-    apply(data, cont, prim, (object)&args[0]);
+    apply(data, cont, prim, 
+          (argc > 0) 
+            ? (object)&args[0]
+            : nil);
 }
 // END apply