Document $DynaLoader::dl_dlext, per sisyphus++.

[perl5.git] / mg.h

diff --git a/mg.h b/mg.h
index 995bc5e..de673d4 100644 (file)
--- a/mg.h
+++ b/mg.h
@@ -8,9 +8,6 @@
  *
  */
 
-#ifdef STRUCT_MGVTBL_DEFINITION
-STRUCT_MGVTBL_DEFINITION;
-#else
 struct mgvtbl {
     int                (*svt_get)      (pTHX_ SV *sv, MAGIC* mg);
     int                (*svt_set)      (pTHX_ SV *sv, MAGIC* mg);
@@ -22,7 +19,6 @@ struct mgvtbl {
     int                (*svt_dup)      (pTHX_ MAGIC *mg, CLONE_PARAMS *param);
     int                (*svt_local)(pTHX_ SV *nsv, MAGIC *mg);
 };
-#endif
 
 struct magic {
     MAGIC*     mg_moremagic;
@@ -30,7 +26,7 @@ struct magic {
     U16                mg_private;
     char       mg_type;
     U8         mg_flags;
-    I32                mg_len;
+    SSize_t    mg_len;
     SV*                mg_obj;
     char*      mg_ptr;
 };