Fix PR14129

pkgs/racklog/racklog.rkt

@@ -309,7 +309,9 @@
                       (abort-to-racklog-prompt #f))))
          (abort-to-racklog-prompt
           (list (cons 'v (logic-var-val* v))
-                ...)))))))
+                ...)))))
+    [(%which (v ...) g ...)
+     (%which (v ...) (%and g ...))]))
 
 (define (%more)
   (with-racklog-prompt

pkgs/racklog/tests/unit.rkt

@@ -556,5 +556,8 @@
  (%more) => #f
  (%which () (%let (x) (%var 1))) => #f
  (%which () (%let (x) (%and (%= x 1) (%var x)))) => #f
+
+ (%which () %true %true) => empty
+ (%more) => #f
  
  )