diff options
| author | Florian Ragwitz <rafl@debian.org> | 2010-07-20 22:58:24 +0200 |
|---|---|---|
| committer | Florian Ragwitz <rafl@debian.org> | 2010-07-26 15:48:18 +0200 |
| commit | 1e8125c621275d18c74bc8dae3bfc3c03929fe1e (patch) | |
| tree | 787df37aad96d973175f1218677b312e8c8f261e /intrpvar.h | |
| parent | 3b462feda21356499e651643c80692cc1c5e6787 (diff) | |
| download | perl-1e8125c621275d18c74bc8dae3bfc3c03929fe1e.tar.gz | |
Check API compatibility when loading xs modules
This adds PL_apiversion, allowing the API version of a running interpreter to be
introspected. It is used in the new XS_APIVERSION_BOOTCHECK macro, which is
added to the _boot function of every XS module, to compare it against the API
version the module has been compiled against. If the versions do not match, an
exception is thrown.
This doesn't fully prevent binary incompatible extensions to be loaded. It
merely compares PERL_API_* between compile- and runtime, and does not attempt to
solve the problem of identifying binary incompatible perls with the same API
version (i.e. the same perl version configured with and without DEBUGGING).
Diffstat (limited to 'intrpvar.h')
| -rw-r--r-- | intrpvar.h | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/intrpvar.h b/intrpvar.h index 1e01e43892..21fb933254 100644 --- a/intrpvar.h +++ b/intrpvar.h @@ -228,6 +228,7 @@ PERLVAR(Iwarnhook, SV *) /* switches */ PERLVAR(Ipatchlevel, SV *) +PERLVAR(Iapiversion, SV *) PERLVAR(Ilocalpatches, const char * const *) PERLVARI(Isplitstr, const char *, " ") |