Macro With-New-File

Part of:

package metabang.utilities
( with-new-file (stream pathname &key (reset-io t) (print-right-margin *file-print-right-margin*)) &body < body > )