diff options
| author | Benjamin Dauvergne <bdauvergne@entrouvert.com> | 2010-06-29 14:49:15 +0000 |
|---|---|---|
| committer | Benjamin Dauvergne <bdauvergne@entrouvert.com> | 2010-06-29 14:49:15 +0000 |
| commit | 11ac1e148a216858bbe9422d75fb5ca3026cefe5 (patch) | |
| tree | 9993fb2ed2f70a1d85d7fefd69beb4e90ebf9490 /bindings | |
| parent | 35347922850c0c3435e7ed55597aba02d219d68c (diff) | |
| download | lasso-11ac1e148a216858bbe9422d75fb5ca3026cefe5.tar.gz lasso-11ac1e148a216858bbe9422d75fb5ca3026cefe5.tar.xz lasso-11ac1e148a216858bbe9422d75fb5ca3026cefe5.zip | |
[Perl binding] make include from $(srcdir) works in Perl binding
Diffstat (limited to 'bindings')
| -rw-r--r-- | bindings/perl/Makefile.am | 2 | ||||
| -rw-r--r-- | bindings/perl/glist_handling.c | 7 |
2 files changed, 5 insertions, 4 deletions
diff --git a/bindings/perl/Makefile.am b/bindings/perl/Makefile.am index 43d43886..9863f925 100644 --- a/bindings/perl/Makefile.am +++ b/bindings/perl/Makefile.am @@ -41,7 +41,7 @@ Makefile.perl: $(srcdir)/Makefile.PL Lasso.xs Lasso.pm done; \ chmod -R u+rwX $(TOCOPY); \ fi; - $(AM_V_SUBMAKE) $(PERL) Makefile.PL PREFIX=$(prefix) CCFLAGS="$(LASSO_XS_CFLAGS)" INC="-I. -I$(top_srcdir)" LIBS="`$(top_builddir)/lasso-src-config --libs`" OPTIMIZE="-g" $(AM_V_SUBMAKE_POSTFIX) + $(AM_V_SUBMAKE) $(PERL) Makefile.PL PREFIX=$(prefix) CCFLAGS="$(LASSO_XS_CFLAGS)" INC="-I. -I$(top_srcdir) -I$(srcdir)" LIBS="`$(top_builddir)/lasso-src-config --libs`" OPTIMIZE="-g" $(AM_V_SUBMAKE_POSTFIX) Lasso.xs Lasso.pm: lang.py typemap-in typemap-out $(AM_V_GEN) $(PYTHON) $(top_srcdir)/bindings/bindings.py -l perl --src-dir=$(top_srcdir)/lasso/ $(EXTRA_ARGS) diff --git a/bindings/perl/glist_handling.c b/bindings/perl/glist_handling.c index 4cb09740..5ce1aea9 100644 --- a/bindings/perl/glist_handling.c +++ b/bindings/perl/glist_handling.c @@ -68,15 +68,16 @@ xmlnode_to_pv(xmlNode *node, gboolean do_free) static xmlNode * pv_to_xmlnode(SV *value) { - int size; + unsigned int size; + char *string; if (! SvPOK(value)) return NULL; - string = SvPV(value, len); + string = SvPV(value, size); if (! string) return NULL; - return lasso_string_fragment_to_xmlnode(string, len); + return lasso_string_fragment_to_xmlnode(string, size); } /** |