Description: <short summary of the patch>
TODO: Put a short summary on the line above and replace this paragraph
with a longer explanation of this change. Complete the meta-information
with other relevant fields (see below for details). To make it easier, the
information below has been extracted from the changelog. Adjust it or drop
it.
.
gcl (2.6.12-16) unstable; urgency=medium
.
* Version_2_6_13pre19
Author: Camm Maguire <camm@debian.org>
---
The information above should follow the Patch Tagging Guidelines, please
checkout http://dep.debian.net/deps/dep3/ to learn about the format. Here
are templates for supplementary fields that you might want to add:
Origin: <vendor|upstream|other>, <url of original patch>
Bug: <url in upstream bugtracker>
Bug-Debian: https://bugs.debian.org/<bugnumber>
Bug-Ubuntu: https://launchpad.net/bugs/<bugnumber>
Forwarded: <no|not-needed|url proving that it has been forwarded>
Reviewed-By: <name and email of someone who approved the patch>
Last-Update: <YYYY-MM-DD>
--- gcl-2.6.12.orig/o/file.d
+++ gcl-2.6.12/o/file.d
@@ -543,14 +543,14 @@ DEFUN_NEW("OPEN-STREAM-P",object,fLopen_
case smm_broadcast:
case smm_concatenated:
for (x=x->sm.sm_object0;!endp(x);x=x->c.c_cdr)
- if (!FFN(fLopen_stream_p(x)))
+ if (!FFN(fLopen_stream_p)(x))
return Cnil;
return Ct;
case smm_two_way:
case smm_echo:
- if (FFN(fLopen_stream_p(STREAM_INPUT_STREAM(x)))==Cnil)
+ if (FFN(fLopen_stream_p)(STREAM_INPUT_STREAM(x))==Cnil)
return Cnil;
- return FFN(fLopen_stream_p(STREAM_OUTPUT_STREAM(x)));
+ return FFN(fLopen_stream_p)(STREAM_OUTPUT_STREAM(x));
default:
error("illegal stream mode");
return Cnil;