[svn.haxx.se] · SVN Dev · SVN Users · SVN Org · TSVN Dev · TSVN Users · Subclipse Dev · Subclipse Users · this month's index

[PATCH] Building Subversion Perl Bindings under cygwin

From: Mathias Weinert <mathias.weinert_at_gfa-net.de>
Date: 2005-11-17 14:54:45 CET

Hi there,

Please find enclosed three patches I have to apply
(1.3.0-rc2) to be able to build the Subversion Perl
bindings under cygwin (in addition to the ones Max Bowsher
created in the official cygwin distribution).

I wonder why others (e. g. Max) don't need these patches.
Is it a problem of my configuration or will everybody
need it?

Mathias

---------------------------------

--- subversion/bindings/swig/core.i.orig 2005-10-25 21:03:21.000000000 +0200
+++ subversion/bindings/swig/core.i 2005-11-14 11:03:19.057069100 +0100
@@ -627,6 +627,11 @@
 %include svn_md5_h.swg
 %include svn_diff_h.swg
 %include svn_error_h.swg
+
+%init %{
+ svn_swig_pl_bind_current_pool_fns (&svn_swig_pl_get_current_pool,
+ &svn_swig_pl_set_current_pool);
+%}
 #endif
 
 #ifdef SWIGPYTHON
--- subversion/bindings/swig/perl/libsvn_swig_perl/swigutil_pl.c.orig 2005-09-23 12:39:32.000000000 +0200
+++ subversion/bindings/swig/perl/libsvn_swig_perl/swigutil_pl.c 2005-09-23 16:16:19.088242000 +0200
@@ -1208,8 +1208,16 @@
 
 /* default pool support */
 
-apr_pool_t *svn_swig_pl_get_current_pool (void);
-void svn_swig_pl_set_current_pool (apr_pool_t *pool);
+static svn_swig_pl_get_current_pool_t svn_swig_pl_get_current_pool = NULL;
+static svn_swig_pl_set_current_pool_t svn_swig_pl_set_current_pool = NULL;
+
+void svn_swig_pl_bind_current_pool_fns (svn_swig_pl_get_current_pool_t get,
+ svn_swig_pl_set_current_pool_t set)
+{
+ svn_swig_pl_get_current_pool = get;
+ svn_swig_pl_set_current_pool = set;
+}
+
 
 apr_pool_t *svn_swig_pl_make_pool (SV *obj)
 {
--- subversion/bindings/swig/perl/libsvn_swig_perl/swigutil_pl.h.orig 2005-09-23 12:39:32.000000000 +0200
+++ subversion/bindings/swig/perl/libsvn_swig_perl/swigutil_pl.h 2005-09-23 16:20:57.375065800 +0200
@@ -50,6 +50,12 @@
 
 
 
+typedef apr_pool_t *(*svn_swig_pl_get_current_pool_t) (void);
+typedef void (*svn_swig_pl_set_current_pool_t) (apr_pool_t *pool);
+
+void svn_swig_pl_bind_current_pool_fns (svn_swig_pl_get_current_pool_t get,
+ svn_swig_pl_set_current_pool_t set);
+
 apr_pool_t *svn_swig_pl_make_pool (SV *obj);
 
 typedef enum perl_func_invoker {

---------------------------------------------------------------------
To unsubscribe, e-mail: dev-unsubscribe@subversion.tigris.org
For additional commands, e-mail: dev-help@subversion.tigris.org
Received on Thu Nov 17 14:56:02 2005

This is an archived mail posted to the Subversion Dev mailing list.