From a9eca8f5d1bb2a3aabb80b59c54fc355a00a0382 Mon Sep 17 00:00:00 2001 From: Mark H Weaver Date: Mon, 20 Jan 2014 17:15:53 -0500 Subject: [PATCH] Fix (port-conversion-strategy #f). Reported by Doug Evans . * libguile/ports.c (scm_port_conversion_strategy): Don't validate that 'port' is an open port until after the (port == #f) case has been handled. --- libguile/ports.c | 2 -- 1 file changed, 2 deletions(-) diff --git a/libguile/ports.c b/libguile/ports.c index f4efce777..d8d27cce9 100644 --- a/libguile/ports.c +++ b/libguile/ports.c @@ -1298,8 +1298,6 @@ SCM_DEFINE (scm_port_conversion_strategy, "port-conversion-strategy", { scm_t_string_failed_conversion_handler h; - SCM_VALIDATE_OPPORT (1, port); - if (scm_is_false (port)) h = scm_i_default_port_conversion_handler (); else