From: Malcolm Beattie <mbeattie@sable.ox.ac.uk>
Date: Wed, 10 Dec 1997 18:33:53 +0000 (+0000)
Subject: Start overhauling compiler. It was working at least minimally
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=7e0e7afedd94fe242b9d912ceebe511cf90e118a;p=p5sagit%2Fp5-mst-13.2.git

Start overhauling compiler. It was working at least minimally
right up until the final tweak of B.xs to add threadsv_names
at which point building it provokes a seg fault in perl while
doing the xsubpp :-(.

p4raw-id: //depot/perl@357
---

diff --git a/op.h b/op.h
index fbb5b8c..471ace0 100644
--- a/op.h
+++ b/op.h
@@ -274,6 +274,8 @@ struct loop {
 #define OA_DEFGV 128
 
 /* The next 4 bits encode op class information */
+#define OA_CLASS_MASK (15 << 8)
+
 #define OA_BASEOP (0 << 8)
 #define OA_UNOP (1 << 8)
 #define OA_BINOP (2 << 8)