guile-user
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: guile 2.0.9 build on mingw


From: Eli Zaretskii
Subject: Re: guile 2.0.9 build on mingw
Date: Wed, 19 Jun 2013 23:02:06 +0300

> From: address@hidden (Ludovic Courtès)
> Cc: Eli Zaretskii <address@hidden>,  address@hidden
> Date: Wed, 19 Jun 2013 21:26:34 +0200
> 
> > diff --git a/test-suite/tests/ports.test b/test-suite/tests/ports.test
> > index 9b1c6c0..758f8f6 100644
> > --- a/test-suite/tests/ports.test
> > +++ b/test-suite/tests/ports.test
> > @@ -238,7 +238,7 @@
> >  (pass-if "file: binary mode ignores port encoding"
> >    (with-fluids ((%default-port-encoding "UTF-8"))
> >                 (let* ((filename (test-file))
> > -                      (port (open-file filename "w"))
> > +                      (port (open-file filename "wb"))
> >                        (test-string "一二三")
> >                        (binary-test-string
> >                         (apply string
> > @@ -257,7 +257,7 @@
> >  (pass-if "file: binary mode ignores file coding declaration"
> >    (with-fluids ((%default-port-encoding "UTF-8"))
> >                 (let* ((filename (test-file))
> > -                      (port (open-file filename "w"))
> > +                      (port (open-file filename "wb"))
> >                        (test-string "一二三")
> >                        (binary-test-string
> >                         (apply string
> 
> Yes, looks good.

But this doesn't work.  You get "???" in the file, because binary
ports cannot have encoding.  As I wrote, I tried that, and when it
didn't work, debugged it and saw that this is simply not supported
(the docs say as much).  What am I missing?




reply via email to

[Prev in Thread] Current Thread [Next in Thread]