This makes these internal functions technically not callable from
application code.
+** Fix build issue on Tru64
+
\f
Changes in 1.8.5 (since 1.8.4)
+2008-06-02 Ludovic Courtès <ludo@gnu.org>
+
+ * deprecated.c (maybe_close_port): Rename EXCEPT to EXCEPT_SET
+ to workaround `#define except' on Tru64. Reported by Peter
+ O'Gorman <pogma@thewrittenword.com>.
+
2008-05-31 Ludovic Courtès <ludo@gnu.org>
* __scm.h (SCM_INTERNAL): New macro.
deprecate something, move it here when that is feasible.
*/
-/* Copyright (C) 2003, 2004, 2006 Free Software Foundation, Inc.
+/* Copyright (C) 2003, 2004, 2006, 2008 Free Software Foundation, Inc.
*
* This library is free software; you can redistribute it and/or
* modify it under the terms of the GNU Lesser General Public
static void
maybe_close_port (void *data, SCM port)
{
- SCM except = (SCM)data;
+ SCM except_set = (SCM) data;
- while (!scm_is_null (except))
+ while (!scm_is_null (except_set))
{
- SCM p = SCM_COERCE_OUTPORT (SCM_CAR (except));
+ SCM p = SCM_COERCE_OUTPORT (SCM_CAR (except_set));
if (scm_is_eq (p, port))
return;
- except = SCM_CDR (except);
+ except_set = SCM_CDR (except_set);
}
scm_close_port (port);