In clisp, I can do something like this:
(with-open-file (fred "fred-unix"
:direction :output
:if-exists :supersede
:external-format :unix)
(format fred "lf only~%"))
(with-open-file (fred "fred-mac"
:direction :output
:if-exists :supersede
:external-format :mac)
(format fred "cr only~%"))
(with-open-file (fred "fred-dos"
:direction :output
:if-exists :supersede
:external-format :dos)
(format fred "cr/lf~%"))
sbcl chokes on this; it doesn't know about :unix or :mac or :dos. Is there any way I can do this in sbcl?