diff --git a/functions.rkt b/functions.rkt
index 21e2bfe..3a0d684 100644
--- a/functions.rkt
+++ b/functions.rkt
@@ -52,9 +52,11 @@
 (module+ test
   (test-case "tabulate*"
     (check-equal? (tabulate* (list (λ (x y) (and x y))
-                                        (λ (x y) (or x y)))
-                                  '((#f #t) (#f #t)))
-                  '((#f #f #f #f) (#f #t #f #t) (#t #f #f #t) (#t #t #t #t)))))
+                                   (λ (x y) (or x y)))
+                             '((#f #t) (#f #t)))
+                  '((#f #f #f #f) (#f #t #f #t) (#t #f #f #t) (#t #t #t #t)))
+    (check-equal? (tabulate* empty '((#f #t) (#f #t)))
+                  '((#f #f) (#f #t) (#t #f) (#t #t)))))
 
 ;;; Like tabulate, but assumes the domains of all variables of the
 ;;; function are Boolean.  func must have a fixed arity.  It is an