Raymond Toy pushed to branch issue-139-set-filename-encoding-to-utf8 at cmucl / cmucl Commits: d12d1153 by Raymond Toy at 2022-12-11T09:22:51-08:00 Workaround for test issue.25c Load the `:utf16-be` format before opening the file with an external format of `:utf16-be`. Added comment on the underlying issue. - - - - - 1 changed file: - tests/issues.lisp Changes: ===================================== tests/issues.lisp ===================================== @@ -267,6 +267,9 @@ #\greek_small_letter_beta))) (expected (stream:string-encode in-string :utf16-be)) (path #p"issue25c.txt")) + ;; Get the external format before opening the file. See issue + ;; #161 (https://gitlab.common-lisp.net/cmucl/cmucl/-/issues/161). + (stream::find-external-format :utf16-be) (with-open-file (s path :direction :output :if-exists :supersede :external-format :utf16-be) (write-string in-string s) (force-output s) View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/commit/d12d1153d92bc42eb02e06c2... -- View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/commit/d12d1153d92bc42eb02e06c2... You're receiving this email because of your account on gitlab.common-lisp.net.