[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Guile-commits] 02/06: %port-encoding requires an open port
From: |
Andy Wingo |
Subject: |
[Guile-commits] 02/06: %port-encoding requires an open port |
Date: |
Wed, 1 Mar 2017 14:02:59 -0500 (EST) |
wingo pushed a commit to branch master
in repository guile.
commit 25652ff84c7949427cdda7395a44bab9a0392c4b
Author: Andy Wingo <address@hidden>
Date: Wed Mar 1 19:52:17 2017 +0100
%port-encoding requires an open port
* libguile/ports.c (scm_sys_port_encoding)
(scm_sys_set_port_encoding_x): Require an open port, to match 2.0
behavior.
---
libguile/ports.c | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/libguile/ports.c b/libguile/ports.c
index 3d5da3d..1be4a37 100644
--- a/libguile/ports.c
+++ b/libguile/ports.c
@@ -1211,7 +1211,7 @@ SCM_DEFINE (scm_sys_port_encoding, "%port-encoding", 1,
0, 0,
"uses to interpret its input and output.\n")
#define FUNC_NAME s_scm_sys_port_encoding
{
- SCM_VALIDATE_PORT (1, port);
+ SCM_VALIDATE_OPPORT (1, port);
return SCM_PORT (port)->encoding;
}
@@ -1232,7 +1232,7 @@ SCM_DEFINE (scm_sys_set_port_encoding_x,
"%set-port-encoding!", 2, 0, 0,
"and this procedure can be used to modify that encoding.\n")
#define FUNC_NAME s_scm_sys_set_port_encoding_x
{
- SCM_VALIDATE_PORT (1, port);
+ SCM_VALIDATE_OPPORT (1, port);
SCM_VALIDATE_SYMBOL (2, enc);
scm_i_set_port_encoding_x (port, scm_i_symbol_chars (enc));
- [Guile-commits] branch master updated (8f7ed8a -> b473598), Andy Wingo, 2017/03/01
- [Guile-commits] 02/06: %port-encoding requires an open port,
Andy Wingo <=
- [Guile-commits] 01/06: http: Do not use 'eq?' to compare characters in parse-request-uri., Andy Wingo, 2017/03/01
- [Guile-commits] 06/06: tests: Use the "normalized codeset" in locale names., Andy Wingo, 2017/03/01
- [Guile-commits] 03/06: Remove 'umask' calls from 'mkdir'., Andy Wingo, 2017/03/01
- [Guile-commits] 05/06: Treat 'SIG_IGN' as a pointer., Andy Wingo, 2017/03/01
- [Guile-commits] 04/06: Document 'scm_to_uintptr_t' and 'scm_from_uintptr_t'., Andy Wingo, 2017/03/01