Have string ports honor `%default-port-conversion-strategy'.
authorLudovic Courtès <ludo@gnu.org>
Tue, 29 May 2012 21:39:05 +0000 (23:39 +0200)
committerLudovic Courtès <ludo@gnu.org>
Wed, 30 May 2012 22:54:21 +0000 (00:54 +0200)
commit9f6e3f5a997f484548bd03e7e7573c38a95c8d09
tree4aa1d2dce20e31dcd4376b8f40b9031c547b7930
parentb22e94db7c91d7661204e33f3bc2bfead002c9b7
Have string ports honor `%default-port-conversion-strategy'.

* libguile/strports.c (scm_mkstrport): Remove initialization of
  `pt->ilseq_handler'.

* module/ice-9/pretty-print.scm (truncated-print)[ellipsis]: Set
  %DEFAULT-PORT-CONVERSION-STRATEGY to 'error.

* test-suite/tests/ports.test ("string
  ports")["%default-port-conversion-strategy is honored"]: New test.
  ["wrong encoding"]: Rename to...
  ["wrong encoding, error"]: ... this.  Explicitly set
  %DEFAULT-PORT-CONVERSION-STRATEGY to 'error.  Return #f when no
  exception is raised.
libguile/strports.c
module/ice-9/pretty-print.scm
test-suite/tests/ports.test