:rename-and-delete :overwrite
:append :supersede nil))
(:if-does-not-exist (member :error :create nil))
- (:external-format (member :default))
+ (:external-format keyword)
(:class (or symbol class))
(:mapped (member t nil))
(:input-handle (or null fixnum stream))