diff --git a/proxy.rkt b/proxy.rkt
index 0038870..48edabe 100644
--- a/proxy.rkt
+++ b/proxy.rkt
@@ -206,7 +206,10 @@
      (send-empty-reply w q)]
     [(question-state zone q client-sock nameservers-tried old-retry-count)
      ;; Credit remaining. Try once more (perhaps for the first time, in fact).
-     (match (resolve-from-zone q zone #f nameservers-tried)
+     (define resolution-result (resolve-from-zone q zone #f nameservers-tried))
+     (begin (write `(Resolution result ,resolution-result))
+	    (newline))
+     (match resolution-result
        [#f ;; We're not authoritative so this is just a signal that we can't answer usefully
 	(send-empty-reply w q)]
        [(referral zone-origin nameserver-rrs _)