Improper parsing of CL_SOURCE_REGISTRY

[Juanjo Garcia-Ripoll]

There is a typo in the routine that parses the source registry string, using a match between a character and a string.
(eql (char string 0) "\"(")

Without fixing this it becomes impossible to have complex configurations in CL_SOURCE_REGISTRY

(ext:setenv "CL_SOURCE_REGISTRY" (format nil "(:source-registry (:tree ~S) :ignore-inherited-configuration)" *systems-path*))
(asdf::clear-source-registry)
(asdf::ensure-source-registry)

[Faré (fahree)]

Fixed in 1.674.