scrutinizer makes too strong assumptions about mutable data

[felix winkelmann]

Like this:

(define foo (make-vector 1 #f))
(vector-set! foo 0 'sym)
(print (get (vector-ref foo 0) 'a))

{{
Warning: at toplevel:

(x.scm:5) in procedure call to get', expected argument #1 of type symbol', but was given an argument of type `boolean'

}}}