[Chicken-hackers] [PATCH] Mark vector and ##sys#vector as pure

[Evan Hanson]

As with list/##sys#list.
---
 types.db |    4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/types.db b/types.db
index 2621686..9575a1b 100644
--- a/types.db
+++ b/types.db
@@ -571,8 +571,8 @@
 (vector-set! (#(procedure #:enforce) vector-set! (vector fixnum *) undefined))
 
 ;; special cased (see scrutinizer.scm)
-(vector (#(procedure #:clean #:clean) vector (#!rest) vector))
-(##sys#vector (#(procedure #:clean #:clean) ##sys#vector (#!rest) vector))
+(vector (#(procedure #:pure) vector (#!rest) vector))
+(##sys#vector (#(procedure #:pure) ##sys#vector (#!rest) vector))
 
 (vector-length (#(procedure #:clean #:enforce) vector-length (vector) fixnum)
               ((vector) (##sys#size #(1))))
-- 
1.7.10.4