2 ms·

This should be sufficient: (with-open-file (standard-output "file.txt" :direction :output) (print 'a) (print 'b))

by lispm 8y ago

This should be sufficient: (with-open-file (*standard-output* "file.txt" :direction :output) (print 'a) (print 'b))