From: Yuval Kogman <nothingmuch@woobling.org>
Date: Tue, 12 Aug 2008 18:24:46 +0000 (+0000)
Subject: ppport.h
X-Git-Tag: 0_64_01~33
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=599791aab1ac32c0c0b02886fb4337ed05ea6950;p=gitmo%2FClass-MOP.git

ppport.h
---

diff --git a/MOP.xs b/MOP.xs
index f86e04a..e4bdb81 100644
--- a/MOP.xs
+++ b/MOP.xs
@@ -3,6 +3,7 @@
 #include "perl.h"
 #include "XSUB.h"
 
+#define NEED_sv_2pv_flags
 #define NEED_sv_2pv_nolen
 #include "ppport.h"
 
@@ -149,7 +150,7 @@ get_all_package_symbols(self, ...)
 
                 while ((he = hv_iternext(stash))) {
                     SV *key = hv_iterkeysv(he);
-                    SV *sv = hv_iterval(stash, he);
+                    SV *sv = HeVAL(he);
                     SPAGAIN;
                     PUSHs(key);
                     PUSHs(sv);