From 011a36c510fd52066c01d78d08f939d911e19622 Mon Sep 17 00:00:00 2001
From: Matthew Butterick <mb@mbtype.com>
Date: Tue, 5 Feb 2019 11:41:17 -0800
Subject: [PATCH] nit

---
 quad/quad/quad.rkt | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/quad/quad/quad.rkt b/quad/quad/quad.rkt
index d417dbe1..5d5b9b15 100644
--- a/quad/quad/quad.rkt
+++ b/quad/quad/quad.rkt
@@ -6,7 +6,7 @@
 
 (define (size q)
   (match (quad-size q)
-    [(? procedure? proc) #R proc (proc q)]
+    [(? procedure? proc) proc (proc q)]
     [(? promise? prom) (force prom)]
     [val val]))