diff --git a/scheme/cyclone/cgen.sld b/scheme/cyclone/cgen.sld
index 1777dafa..43a81887 100644
--- a/scheme/cyclone/cgen.sld
+++ b/scheme/cyclone/cgen.sld
@@ -625,6 +625,8 @@
   (cond
     ((null? exp)
      (c:code "NULL"))
+    ((eq? (void) exp) ;; Poor man's (void?)
+     (c:code "Cyc_VOID"))
     ((pair? exp)
      (c-compile-scalars exp use-alloca immutable))
     ((vector? exp)