diff --git a/pitfall/restructure/array.rkt b/pitfall/restructure/array.rkt
index 8a2eb1f9..8d4b75c1 100644
--- a/pitfall/restructure/array.rkt
+++ b/pitfall/restructure/array.rkt
@@ -81,7 +81,7 @@ https://github.com/mbutterick/restructure/blob/master/src/Array.coffee
       (for ([ptr (in-list (· ctx pointers))])
         (send (· ptr type) encode stream (· ptr val))))))
 
-(define-values (Array? +Array) (values ArrayT? +ArrayT))
+(define-values (Array Array? +Array) (values ArrayT ArrayT? +ArrayT))
 
 (test-module
  (define stream (+DecodeStream #"ABCDEFG"))