read-from-string clispの反対

Question

私は以下の逆を行う関数to-stringを定義したいと思います。

> (read-from-string "(foo a b)") 
(FOO A B) ; 

Answer 1

機能write-to-string and prin1-to-stringはあなたがやりたい仕事に表示されます。

 
> (read-from-string "(foo \"Hi\" 17)") 
(FOO "Hi" 17) ; 

> (prin1-to-string '(FOO "Hi" 17)) 
"(FOO \"Hi\" 17)" 
> (write-to-string '(FOO "Hi" 17)) 
"(FOO \"Hi\" 17)" 

機能write-to-stringは、さらにあなたが結果を調整することができるようにキーワード引数を取ります。

 
> (write-to-string '(FOO "Hi" 17) :case :downcase) 
"(foo \"Hi\" 17)" 

Answer 2

これは

(with-output-to-string (s) 
    (princ '(1 2 3) s))