HCoop / bpt / guile.git / commit
? search:
summary | shortlog | log | commit | commitdiff | tree
(parent: 7af706e) | patch
'port-position' works on CBIPs that do not support 'set-port-position!'.
authorLudovic Courtès <ludo@gnu.org>
Mon, 13 Jan 2014 22:15:28 +0000 (23:15 +0100)
committerLudovic Courtès <ludo@gnu.org>
Mon, 13 Jan 2014 22:16:13 +0000 (23:16 +0100)
commitc9d55a7e4ec079a735af40df6e652db5585e6826
tree6ba7832d33fc1125395558177585649fef615f23tree | snapshot (tar.gz zip)
parent7af706e36ee5c866edc5c0749cf0f49d7531bba0commit | diff
'port-position' works on CBIPs that do not support 'set-port-position!'.

* libguile/r6rs-ports.c (cbp_seek)[WHENCE == SEEK_CUR]: Break out of the
  switch statement when OFFSET is zero.
  Pass 'scm_wrong_type_arg_msg' a phrase suitable for use after
  "expecting".
* test-suite/tests/r6rs-ports.test ("7.2.7 Input Ports")["custom binary
  input port supports `port-position', not `set-port-position!'"]: New
  test.
libguile/r6rs-ports.c diff | blob | blame | history
test-suite/tests/r6rs-ports.test diff | blob | blame | history
Unnamed repository; edit this file 'description' to name the repository.