This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Re: [patch] clean out remnants of DEBUGGING_OPS (was opcode op_type:9)
authorJim Cromie <jcromie@cpan.org>
Mon, 1 Oct 2007 18:59:43 +0000 (12:59 -0600)
committerRafael Garcia-Suarez <rgarciasuarez@gmail.com>
Tue, 2 Oct 2007 12:00:10 +0000 (12:00 +0000)
Message-ID: <470197FF.5040709@gmail.com>

p4raw-id: //depot/perl@32004

op.h
win32/Makefile.ce

diff --git a/op.h b/op.h
index ae8c7f8..80f5703 100644 (file)
--- a/op.h
+++ b/op.h
  *                     which may or may not check number of children).
  */
 
  *                     which may or may not check number of children).
  */
 
-#ifdef DEBUGGING_OPS
-#define OPCODE opcode
-#else
 #define OPCODE U16
 #define OPCODE U16
-#endif
 
 #ifdef PERL_MAD
 #  define MADPROP_IN_BASEOP    MADPROP*        op_madprop;
 
 #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;                \
     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;         \
     unsigned   op_opt:1;               \
     unsigned   op_latefree:1;          \
     unsigned   op_latefreed:1;         \
index 2d58100..3231d75 100644 (file)
@@ -342,8 +342,6 @@ STARTOBJS  = $(CECONSOLEDIR)/$(MACHINE)/wmain.obj \
 CEDEFS    = -D_WINDOWS -D_WIN32_WCE=$(CEVersion) -DUNDER_CE=$(CEVersion) \
             $(MCFLAGS) -D PERL
 
 CEDEFS    = -D_WINDOWS -D_WIN32_WCE=$(CEVersion) -DUNDER_CE=$(CEVersion) \
             $(MCFLAGS) -D PERL
 
-#CEDEFS    = $(CEDEFS) -DDEBUGGING_OPS
-
 CECFLAGS  = $(CEDEFS)
 
 !if "$(CFG)" == "DEBUG"
 CECFLAGS  = $(CEDEFS)
 
 !if "$(CFG)" == "DEBUG"