Change 33085: FW: [PATCH] RE: [PATCH] volatile, avoid clobbered

[Rafael Garcia-Suarez]

Change 33085 by [EMAIL PROTECTED] on 2008/01/28 10:17:53

        Subject: FW: [PATCH] RE: [PATCH] volatile, avoid clobbered
        From: "Robin Barker" <[EMAIL PROTECTED]>
        Date: Wed, 23 Jan 2008 18:51:24 -0000
        Message-ID: <[EMAIL PROTECTED]>

Affected files ...

... //depot/perl/op.c#983 edit
... //depot/perl/perl.c#860 edit
... //depot/perl/perl.h#824 edit

Differences ...

==== //depot/perl/op.c#983 (text) ====
Index: perl/op.c
--- perl/op.c#982~33072~        2008-01-26 02:46:12.000000000 -0800
+++ perl/op.c   2008-01-28 02:17:53.000000000 -0800
@@ -2341,7 +2341,7 @@
 Perl_fold_constants(pTHX_ register OP *o)
 {
     dVAR;
-    register OP *curop;
+    register OP * VOL curop;
     OP *newop;
     VOL I32 type = o->op_type;
     SV * VOL sv = NULL;

==== //depot/perl/perl.c#860 (text) ====
Index: perl/perl.c
--- perl/perl.c#859~33026~      2008-01-21 05:08:11.000000000 -0800
+++ perl/perl.c 2008-01-28 02:17:53.000000000 -0800
@@ -2560,7 +2560,7 @@
 */
 
 I32
-Perl_call_sv(pTHX_ SV *sv, I32 flags)
+Perl_call_sv(pTHX_ SV *sv, VOL I32 flags)
                        /* See G_* flags in cop.h */
 {
     dVAR; dSP;

==== //depot/perl/perl.h#824 (text) ====
Index: perl/perl.h
--- perl/perl.h#823~33070~      2008-01-26 01:34:13.000000000 -0800
+++ perl/perl.h 2008-01-28 02:17:53.000000000 -0800
@@ -524,11 +524,7 @@
 #endif
 
 #if defined(HASVOLATILE) || defined(STANDARD_C)
-#   ifdef __cplusplus
-#      define VOL              /* to temporarily suppress warnings */
-#   else
 #      define VOL volatile
-#   endif
 #else
 #   define VOL
 #endif
End of Patch.