summaryrefslogtreecommitdiff
path: root/ext/File-DosGlob
diff options
context:
space:
mode:
authorNicholas Clark <nick@ccl4.org>2012-12-12 10:18:21 +0100
committerNicholas Clark <nick@ccl4.org>2012-12-12 10:18:21 +0100
commit09391cc554f6d7daf76cbe5b4c7ce18c82372b70 (patch)
tree23c7dab18e1365b24c154f411ae10eed40400723 /ext/File-DosGlob
parentb4fbebdebb0ca08b0fd5e052deb2d8c7d60d527a (diff)
downloadperl-09391cc554f6d7daf76cbe5b4c7ce18c82372b70.tar.gz
In DosGlob.xs, add a block around MY_CXT_INIT, as it contains a declaration.
The macro MY_CXT_INIT contains a variable declaration, and xsubpp doesn't wrap XS BOOT sections within a block, hence code at the start of the BOOT section may already be after code. Hence wrap MY_CXT_INIT within a block, to ensure that its initialisation is before any code.
Diffstat (limited to 'ext/File-DosGlob')
-rw-r--r--ext/File-DosGlob/DosGlob.xs2
1 files changed, 2 insertions, 0 deletions
diff --git a/ext/File-DosGlob/DosGlob.xs b/ext/File-DosGlob/DosGlob.xs
index ce59830831..929a237e65 100644
--- a/ext/File-DosGlob/DosGlob.xs
+++ b/ext/File-DosGlob/DosGlob.xs
@@ -29,6 +29,7 @@ MODULE = File::DosGlob PACKAGE = File::DosGlob
PROTOTYPES: DISABLE
BOOT:
+{
MY_CXT_INIT;
{
dMY_CXT;
@@ -36,6 +37,7 @@ BOOT:
MY_CXT.x_DG_OLD_OPHOOK = PL_opfreehook;
PL_opfreehook = glob_ophook;
}
+}
SV *
_callsite(...)