diff options
author | Nicholas Clark <nick@ccl4.org> | 2012-12-12 10:18:21 +0100 |
---|---|---|
committer | Nicholas Clark <nick@ccl4.org> | 2012-12-12 10:18:21 +0100 |
commit | 09391cc554f6d7daf76cbe5b4c7ce18c82372b70 (patch) | |
tree | 23c7dab18e1365b24c154f411ae10eed40400723 /ext/File-DosGlob | |
parent | b4fbebdebb0ca08b0fd5e052deb2d8c7d60d527a (diff) | |
download | perl-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.xs | 2 |
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(...) |