nit

3 years ago · 3bea636677
parent 5b48d5b1fc
commit 3bea636677
1 changed files with 1 additions and 1 deletions
--- a/quad/quad2/main.rkt
+++ b/quad/quad2/main.rkt
@ -14,7 +14,7 @@
  #:postcondition quad?
  (match x
    [(? quad?) x]
-    [(list (? quad?) ...) (make-quad #:elems (list x))]
+    [(list (? quad?) ...) (make-quad #:elems x)]
    [_ (make-quad #:elems (list x))]))