Date: Thu, 14 Nov 2013 15:52:01 +0000 (UTC) From: Mathieu Arnold <mat@FreeBSD.org> To: ports-committers@freebsd.org, svn-ports-all@freebsd.org, svn-ports-head@freebsd.org Subject: svn commit: r333766 - head/editors/led/files Message-ID: <201311141552.rAEFq1O2082976@svn.freebsd.org>
next in thread | raw e-mail | index | archive | help
Author: mat Date: Thu Nov 14 15:52:01 2013 New Revision: 333766 URL: http://svnweb.freebsd.org/changeset/ports/333766 Log: Fix build with threaded perl. Added: head/editors/led/files/patch-src__modules__perlapi__perlapi.c (contents, props changed) Added: head/editors/led/files/patch-src__modules__perlapi__perlapi.c ============================================================================== --- /dev/null 00:00:00 1970 (empty, because file is newly added) +++ head/editors/led/files/patch-src__modules__perlapi__perlapi.c Thu Nov 14 15:52:01 2013 (r333766) @@ -0,0 +1,26 @@ +--- ./src/modules/perlapi/perlapi.c.orig 2002-02-14 22:07:31.000000000 +0100 ++++ ./src/modules/perlapi/perlapi.c 2013-11-14 16:41:36.000000000 +0100 +@@ -36,6 +36,7 @@ + /* extension module support */ + static void xs_init() { + char *file = __FILE__; ++ dTHX; + + newXS("DynaLoader::boot_DynaLoader", boot_DynaLoader, file); + newXS("Led::bootstrap", boot_Led, file); +@@ -66,6 +67,7 @@ + char *args[] = { "", "-e", "" }; + char *bootargs[] = { "Led", 0 }; + u_char *expath; ++ dTHX; + + /* add perl commands to the editor */ + command_addf("perl_eval", input_allocsyms(1), perlapi_doeval); +@@ -124,6 +126,7 @@ + /* evaluate some perl */ + void perlapi_eval(u_char *string) { + SV *sv; ++ dTHX; + + sv = newSVpv(string, 0); + perl_eval_sv(sv, G_DISCARD | G_NOARGS);
Want to link to this message? Use this URL: <https://mail-archive.FreeBSD.org/cgi/mid.cgi?201311141552.rAEFq1O2082976>