Hi All,
The included patch resolves the following build error:
In file included from Event.xs:278:
c/var.c: In function `pe_var_start':
c/var.c:87: warning: assignment from incompatible pointer type
c/var.c:88: warning: assignment from incompatible pointer type
This was referenced in the following thread:
http://www.rosat.mpe-garching.mpg.de/mailing-lists/perl-loop/2002-12/msg00000.html
Enjoy!
--
Nick Eggleston
Consultant
Data Communications Consulting, Inc.
6320 Rucker Road, Suite E
Indianapolis, IN 46220
317/726-0295 x18
317/202-2445 (fax)
--- Event-0.86/c/var.c.0.86 2003-02-18 09:57:02.000000000 -0500
+++ Event-0.86/c/var.c 2003-02-18 09:57:41.000000000 -0500
@@ -47,9 +47,9 @@
queueEvent((pe_event*) ev);
}
-static I32 tracevar_r(IV ix, SV *sv)
+static I32 tracevar_r(pTHX_ IV ix, SV *sv)
{ pe_tracevar((pe_watcher *)ix, sv, PE_R); return 0; /*ignored*/ }
-static I32 tracevar_w(IV ix, SV *sv)
+static I32 tracevar_w(pTHX_ IV ix, SV *sv)
{ pe_tracevar((pe_watcher *)ix, sv, PE_W); return 0; /*ignored*/ }
static char *pe_var_start(pe_watcher *_ev, int repeat) {
