Fixed build-vector's type.

This commit is contained in:
Vincent St-Amour 2010-06-28 11:18:04 -04:00
parent a6872c67a7
commit f27aac552f

View File

@ -132,7 +132,7 @@
[vector-ref (-poly (a) ((-vec a) index-type . -> . a))]
[unsafe-vector-ref (-poly (a) ((-vec a) index-type . -> . a))]
[unsafe-vector*-ref (-poly (a) ((-vec a) index-type . -> . a))]
[build-vector (-poly (a) (index-type (index-type . -> . a) . -> . (-vec a)))]
[build-vector (-poly (a) (index-type (-Nat . -> . a) . -> . (-vec a)))]
[vector-set! (-poly (a) (-> (-vec a) index-type a -Void))]
[unsafe-vector-set! (-poly (a) (-> (-vec a) index-type a -Void))]
[unsafe-vector*-set! (-poly (a) (-> (-vec a) index-type a -Void))]