summaryrefslogtreecommitdiff
path: root/ext
diff options
context:
space:
mode:
authorMattia Barbon <mbarbon@dsi.unive.it>2002-01-13 20:39:52 +0100
committerJarkko Hietaniemi <jhi@iki.fi>2002-01-13 17:40:29 +0000
commitbde7177df8a653ca87ecd91ccbb107a8a43388c7 (patch)
tree44dcd9e63c8318a543dc892dd66a271bdeafefac /ext
parenta84d97b6bddd35f5a52f4f41404bd0d52bf5089f (diff)
downloadperl-bde7177df8a653ca87ecd91ccbb107a8a43388c7.tar.gz
Re: Warning in B.xs
Message-ID: <3C41E288.20562.1C8C895@localhost> p4raw-id: //depot/perl@14241
Diffstat (limited to 'ext')
-rw-r--r--ext/B/B.xs2
1 files changed, 1 insertions, 1 deletions
diff --git a/ext/B/B.xs b/ext/B/B.xs
index c9ca8b1962..9b7fa9d683 100644
--- a/ext/B/B.xs
+++ b/ext/B/B.xs
@@ -1013,7 +1013,7 @@ SvSTASH(sv)
#define MgFLAGS(mg) mg->mg_flags
#define MgOBJ(mg) mg->mg_obj
#define MgLENGTH(mg) mg->mg_len
-#define MgREGEX(mg) ((IV)(mg->mg_obj))
+#define MgREGEX(mg) PTR2IV(mg->mg_obj)
MODULE = B PACKAGE = B::MAGIC PREFIX = Mg