Use standard string reader in simple-read.

ChangeLog

 2016-03-09  Tomas Zellerin  <tomas@zellerin.cz>
+	* swank/rpc.lisp (simple-read): We did not gain anything by custom string reader.
 	* swank/rpc.lisp (simple-read): Fix handling of symbols.
 2016-03-04  Stas Boukarev  <stassats@gmail.com>

swank/rpc.lisp

@@ -75,12 +75,6 @@
    "Read a form that conforms to the protocol, otherwise signal an error."
    (let ((c (read-char)))
      (case c
-       (#\" (with-output-to-string (*standard-output*)
-              (loop for c = (read-char) do
-                    (case c
-                      (#\" (return))
-                      (#\\ (write-char (read-char)))
-                      (t (write-char c))))))
        (#\( (loop collect (simple-read)
                   while (ecase (read-char)
                           (#\) nil)
@@ -95,7 +89,7 @@
                        while (and ch (digit-char-p ch))
                        collect ch
                        finally (unread-char ch)))))
-          ((or (eql c #\:) (alpha-char-p c))
+          ((or (member c '(#\: #\")) (alpha-char-p c))
            (unread-char c)
            (read-preserving-whitespace))
           (t (error "Invalid character ~:c" c)))))))