% Function SIMPLE-STRING-P
Function SIMPLE-STRING-P
simple-string-p object => generalized-boolean
object - オブジェクト
generalized-boolean - generalized-boolean
objectが型simple-stringならtrue、それ以外はfalseを返却。
(simple-string-p "aaaaaa") =>  true
(simple-string-p (make-array 6 
                             :element-type 'character 
                             :fill-pointer t)) =>  false
なし。
なし。
なし。
なし。
(simple-string-p object) ==  (typep object 'simple-string)