diff --git a/collects/tests/typed-scheme/succeed/flvector.ss b/collects/tests/typed-scheme/succeed/flvector.ss
index 22f141176d..9643c148c3 100644
--- a/collects/tests/typed-scheme/succeed/flvector.ss
+++ b/collects/tests/typed-scheme/succeed/flvector.ss
@@ -17,6 +17,9 @@
       #t
       (error (format "Check (~a ~a ~a) failed" f a b)))) 
 
+;; Check the FlVector type is exported
+(define: v : FlVector (flvector 1. 2. 3.))
+
 (check equal? (flvector 1. 2. 3. 4.) (flvector 1. 2. 3. 4.))
 (check equal? (flvector? (flvector 1. 2. 3.)) #t)
 (check equal? (make-flvector 3 3.0) (flvector 3. 3. 3.))