register-immutable-system -> (setf system-mutable-p)