diff options
Diffstat (limited to 'devel/guile-fcgi/patches/patch-ab')
-rw-r--r-- | devel/guile-fcgi/patches/patch-ab | 60 |
1 files changed, 60 insertions, 0 deletions
diff --git a/devel/guile-fcgi/patches/patch-ab b/devel/guile-fcgi/patches/patch-ab new file mode 100644 index 00000000000..d3a78884b0d --- /dev/null +++ b/devel/guile-fcgi/patches/patch-ab @@ -0,0 +1,60 @@ +$NetBSD: patch-ab,v 1.1 2007/06/05 05:44:37 wiz Exp $ + +--- src/guile-fcgi.c.orig 2007-06-04 01:13:05.000000000 +0400 ++++ src/guile-fcgi.c 2007-06-04 01:13:16.000000000 +0400 +@@ -43,11 +43,11 @@ + /****************************************************************************/ + + static long tagFCGX_Stream; +-#define SCM_FCGX_STREAMP(smob) (SCM_NIMP(smob) && SCM_CAR(smob)==tagFCGX_Stream) ++#define SCM_FCGX_STREAMP(smob) (SCM_NIMP(smob) && (long)(SCM_CAR(smob))==tagFCGX_Stream) + #define SCM_FCGX_STREAM(smob) ((FCGX_Stream*)SCM_CDR(smob)) + + static long tagFCGX_Request; +-#define SCM_FCGX_REQUESTP(smob) (SCM_NIMP(smob) && SCM_CAR(smob)==tagFCGX_Request) ++#define SCM_FCGX_REQUESTP(smob) (SCM_NIMP(smob) && (long)(SCM_CAR(smob))==tagFCGX_Request) + #define SCM_FCGX_REQUEST(smob) (FCGX_Request*)SCM_CDR(smob) + + long fcgi_ptype=0; +@@ -524,7 +524,7 @@ + { + SCM_ASSERT((SCM_FCGX_STREAMP(stream)), stream, SCM_ARG1, s_scm_FCGX_FFlush); + +- return (-1==FCGX_FFlush(SCM_FCGX_STREAM(stream))); ++ return (void*)(-1==FCGX_FFlush(SCM_FCGX_STREAM(stream))); + } + /*DLLAPI int FCGX_FClose(FCGX_Stream *stream);*/ + SCM_DEFINE (scm_FCGX_FClose,"FCGX:FClose",1,0,0, +@@ -544,7 +544,7 @@ + { + SCM_ASSERT((SCM_FCGX_STREAMP(stream)), stream, SCM_ARG1, s_scm_FCGX_FClose); + +- return (-1==FCGX_FClose(SCM_FCGX_STREAM(stream))); ++ return (void*)(-1==FCGX_FClose(SCM_FCGX_STREAM(stream))); + } + /*DLLAPI int FCGX_GetError(FCGX_Stream *stream);*/ + SCM_DEFINE (scm_FCGX_GetError,"FCGX:GetError",1,0,0, +@@ -702,7 +702,7 @@ + + static SCM + fcgi_port_mark(SCM port){ +- scm_gc_mark (SCM_STREAM(port)); ++ scm_gc_mark ((void*)SCM_STREAM(port)); + return SCM_BOOL_F; + } + +@@ -842,12 +842,12 @@ + (SCM port),"") + { + SCM_ASSERT(SCM_PORTP(port) && +- ((SCM_CAR(port) & fcgi_ptype)==fcgi_ptype), ++ (((long)SCM_CAR(port) & fcgi_ptype)==fcgi_ptype), + port, + SCM_ARG1, + s_scm_fcgi_make_stream); + +- return SCM_STREAM(port); ++ return (void*)SCM_STREAM(port); + } + + void |