SSNEW() API for allocating memory on the savestack

	Message-Id: <tqemtae338.fsf@puma.genscan.com>
	Subject: [PATCH 5.005_51] (was: why SAVEDESTRUCTOR()...)

p4raw-id: //depot/perl@1852

1 files changed, 2 insertions, 6 deletions

diff --git a/perl.h b/perl.h
index bd92e379ed..cee57eb24d 100644
--- a/perl.h
+++ b/perl.h
@@ -1300,13 +1300,9 @@ struct _sublex_info {
     OP *sub_op;		/* "lex_op" to use */
 };
 
-#ifdef PERL_OBJECT
-struct magic_state {
-    SV* mgs_sv;
-    U32 mgs_flags;
-};
-typedef struct magic_state MGS;
+typedef struct magic_state MGS;	/* struct magic_state defined in mg.c */
 
+#ifdef PERL_OBJECT
 typedef struct {
     I32 len_min;
     I32 len_delta;