perl5-changes  

Change 32004: Re: [patch] clean out remnants of DEBUGGING_OPS (was opcode op_type:9)

Rafael Garcia-Suarez
Tue, 02 Oct 2007 05:15:33 -0700

Change 32004 by [EMAIL PROTECTED] on 2007/10/02 12:00:10

        Subject: Re: [patch] clean out remnants of DEBUGGING_OPS (was opcode 
op_type:9)
        From: Jim Cromie <[EMAIL PROTECTED]>
        Date: Mon, 01 Oct 2007 18:59:43 -0600
        Message-ID: <[EMAIL PROTECTED]>

Affected files ...

... //depot/perl/op.h#190 edit
... //depot/perl/win32/Makefile.ce#15 edit

Differences ...

==== //depot/perl/op.h#190 (text) ====
Index: perl/op.h
--- perl/op.h#189~32003~        2007-10-02 04:56:28.000000000 -0700
+++ perl/op.h   2007-10-02 05:00:10.000000000 -0700
@@ -37,11 +37,7 @@
  *                     which may or may not check number of children).
  */
 
-#ifdef DEBUGGING_OPS
-#define OPCODE opcode
-#else
 #define OPCODE U16
-#endif
 
 #ifdef PERL_MAD
 #  define MADPROP_IN_BASEOP    MADPROP*        op_madprop;
@@ -58,7 +54,7 @@
     OP*                (CPERLscope(*op_ppaddr))(pTHX);         \
     MADPROP_IN_BASEOP                  \
     PADOFFSET  op_targ;                \
-    opcode     op_type:9;              \
+    unsigned   op_type:9;              \
     unsigned   op_opt:1;               \
     unsigned   op_latefree:1;          \
     unsigned   op_latefreed:1;         \

==== //depot/perl/win32/Makefile.ce#15 (text) ====
Index: perl/win32/Makefile.ce
--- perl/win32/Makefile.ce#14~31799~    2007-09-06 06:21:34.000000000 -0700
+++ perl/win32/Makefile.ce      2007-10-02 05:00:10.000000000 -0700
@@ -342,8 +342,6 @@
 CEDEFS    = -D_WINDOWS -D_WIN32_WCE=$(CEVersion) -DUNDER_CE=$(CEVersion) \
             $(MCFLAGS) -D PERL
 
-#CEDEFS    = $(CEDEFS) -DDEBUGGING_OPS
-
 CECFLAGS  = $(CEDEFS)
 
 !if "$(CFG)" == "DEBUG"
End of Patch.
  • Change 32004: Re: [patch] clean out remnants of DEBUGGING_OPS (was opcode op_type:9) Rafael Garcia-Suarez