[perl #45513] Test failures on amd64-freebsd 6.2

[perl5.git] / op.h

diff --git a/op.h b/op.h
index f03251f..80f5703 100644 (file)
--- a/op.h
+++ b/op.h
@@ -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;
@@ -635,7 +631,7 @@ struct loop {
 
 struct madprop {
     MADPROP* mad_next;
-    void *mad_val;
+    const void *mad_val;
     U32 mad_vlen;
 /*    short mad_count; */
     char mad_key;