Ensure that version::_VERSION is always exported

Now that version.pm doesn't mess with the symbol table, we need
to make sure that version::_VERSION exists at all times.  Also
change the name of the method that implements UNIVERSAL::VERSION
so that it is visually distinct and matches the other version.pm
derived methods.

diff --git a/vxs.inc b/vxs.inc
index cb894f2..e297c38 100644 (file)
--- a/vxs.inc
+++ b/vxs.inc
@@ -12,10 +12,9 @@
 
 #ifdef VXS_XSUB_DETAILS
 #  ifdef PERL_CORE
-    {"UNIVERSAL::VERSION", XS_UNIVERSAL_VERSION, NULL},
-#  else
-    {VXS_CLASS "::_VERSION", VXS_UNIVERSAL_VERSION, NULL},
+    {"UNIVERSAL::VERSION", VXSp(universal_version), NULL},
 #  endif
+    {VXS_CLASS "::_VERSION", VXSp(universal_version), NULL},
     {VXS_CLASS "::()", VXSp(version_noop), NULL},
     {VXS_CLASS "::new", VXSp(version_new), NULL},
     {VXS_CLASS "::parse", VXSp(version_new), NULL},
@@ -67,7 +66,7 @@ typedef char HVNAME;
 #  define HEKf         "s"
 #endif
 
-VXS(UNIVERSAL_VERSION)
+VXS(universal_version)
 {
     dVAR;
     dXSARGS;