mirror/freebsd-ports
1
0
Fork 0
mirror of https://git.FreeBSD.org/ports.git synced 2024-12-30 05:40:06 +00:00
Code Issues Releases Activity

Unbreak build on perl 5.00503

Browse Source 
Pointed by:	kris
This commit is contained in:
Sergey Skvortsov 2004-03-26 16:02:04 +00:00
parent a75a335d97
commit a8f7eed6c6
Notes: svn2git 2021-03-31 03:12:20 +00:00 
svn path=/head/; revision=105342
1 changed files with 28 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

28
databases/p5-DBD-InterBase/files/patch-InterBase.xs Normal file
View File

@ -0,0 +1,28 @@
--- InterBase.xs.orig Fri Mar 26 17:19:34 2004
+++ InterBase.xs Fri Mar 26 17:21:26 2004
@@ -22,11 +22,13 @@
PERL_SET_CONTEXT(ev->dbh->context);
{
#else
+#if defined(PERL_GET_CONTEXT)
void *context = PERL_GET_CONTEXT;
PerlInterpreter *cb_perl = perl_alloc();
PERL_SET_CONTEXT(cb_perl);
{
#endif
+#endif
dSP;
char ISC_FAR *result = ev->result_buffer;
@@ -52,9 +54,11 @@
/* restore old context*/
PERL_SET_CONTEXT(context);
#else
+#if defined(PERL_GET_CONTEXT)
}
PERL_SET_CONTEXT(context);
perl_free(cb_perl);
+#endif
#endif
return (0);