diff options
Diffstat (limited to 'libguile/ports.c')
-rw-r--r-- | libguile/ports.c | 12 |
1 files changed, 7 insertions, 5 deletions
diff --git a/libguile/ports.c b/libguile/ports.c index 9bc8168bd..cf1ac56c7 100644 --- a/libguile/ports.c +++ b/libguile/ports.c @@ -108,12 +108,12 @@ scm_markstream (SCM ptr) */ static void -flush_port_default (SCM port) +flush_port_default (SCM port SCM_UNUSED) { } static void -end_input_default (SCM port, int offset) +end_input_default (SCM port SCM_UNUSED, int offset SCM_UNUSED) { } @@ -1487,7 +1487,7 @@ scm_print_port_mode (SCM exp, SCM port) } int -scm_port_print (SCM exp, SCM port, scm_print_state *pstate) +scm_port_print (SCM exp, SCM port, scm_print_state *pstate SCM_UNUSED) { char *type = SCM_PTOBNAME (SCM_PTOBNUM (exp)); if (!type) @@ -1514,13 +1514,15 @@ scm_ports_prehistory () scm_bits_t scm_tc16_void_port = 0; -static int fill_input_void_port (SCM port) +static int fill_input_void_port (SCM port SCM_UNUSED) { return EOF; } static void -write_void_port (SCM port, const void *data, size_t size) +write_void_port (SCM port SCM_UNUSED, + const void *data SCM_UNUSED, + size_t size SCM_UNUSED) { } |