[Git][cmucl/cmucl][issue-139-set-filename-encoding-to-utf8] Workaround for test issue.25c

[Raymond Toy (@rtoy)]

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/d12d1153d92bc42eb02e06c2452da6cd5ab139c0

-- 
View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/commit/d12d1153d92bc42eb02e06c2452da6cd5ab139c0
You're receiving this email because of your account on gitlab.common-lisp.net.


-------------- next part --------------
An HTML attachment was scrubbed...
URL: <https://mailman.common-lisp.net/pipermail/cmucl-cvs/attachments/20221211/7551d6d1/attachment.html>