struct Init -> class Init.
[oota-llvm.git] / utils / TableGen / Record.h
index 95c50aea7feb1acd446498b81985d1667097aba5..60e026ad2063e7b91482b635285fbe9e1fd1f893 100644 (file)
@@ -1,10 +1,10 @@
 //===- Record.h - Classes to represent Table Records ------------*- C++ -*-===//
-// 
+//
 //                     The LLVM Compiler Infrastructure
 //
-// This file was developed by the LLVM research group and is distributed under
-// the University of Illinois Open Source License. See LICENSE.TXT for details.
-// 
+// This file is distributed under the University of Illinois Open Source
+// License. See LICENSE.TXT for details.
+//
 //===----------------------------------------------------------------------===//
 //
 // This file defines the main TableGen data structures, including the TableGen
 #ifndef RECORD_H
 #define RECORD_H
 
-#include <string>
-#include <vector>
+#include "llvm/ADT/FoldingSet.h"
+#include "llvm/Support/Allocator.h"
+#include "llvm/Support/SourceMgr.h"
+#include "llvm/Support/DataTypes.h"
+#include "llvm/Support/raw_ostream.h"
 #include <map>
-#include <iostream>
-#include <cassert>
 
 namespace llvm {
+class raw_ostream;
 
-// RecTy subclasses...
+// RecTy subclasses.
 class BitRecTy;
 class BitsRecTy;
 class IntRecTy;
@@ -33,7 +35,7 @@ class CodeRecTy;
 class DagRecTy;
 class RecordRecTy;
 
-// Init subclasses...
+// Init subclasses.
 class Init;
 class UnsetInit;
 class BitInit;
@@ -42,15 +44,22 @@ class IntInit;
 class StringInit;
 class CodeInit;
 class ListInit;
+class UnOpInit;
+class BinOpInit;
+class TernOpInit;
 class DefInit;
 class DagInit;
 class TypedInit;
 class VarInit;
 class FieldInit;
 class VarBitInit;
+class VarListElementInit;
 
-// Other classes...
+// Other classes.
 class Record;
+class RecordVal;
+struct MultiClass;
+class RecordKeeper;
 
 //===----------------------------------------------------------------------===//
 //  Type Classes
@@ -59,7 +68,8 @@ class Record;
 struct RecTy {
   virtual ~RecTy() {}
 
-  virtual void print(std::ostream &OS) const = 0;
+  virtual std::string getAsString() const = 0;
+  void print(raw_ostream &OS) const { OS << getAsString(); }
   void dump() const;
 
   /// typeIsConvertibleTo - Return true if all values of 'this' type can be
@@ -67,22 +77,31 @@ struct RecTy {
   virtual bool typeIsConvertibleTo(const RecTy *RHS) const = 0;
 
 public:   // These methods should only be called from subclasses of Init
-  virtual Init *convertValue( UnsetInit *UI) { return 0; }
-  virtual Init *convertValue(   BitInit *BI) { return 0; }
-  virtual Init *convertValue(  BitsInit *BI) { return 0; }
-  virtual Init *convertValue(   IntInit *II) { return 0; }
-  virtual Init *convertValue(StringInit *SI) { return 0; }
-  virtual Init *convertValue(  ListInit *LI) { return 0; }
-  virtual Init *convertValue(  CodeInit *CI) { return 0; }
-  virtual Init *convertValue(VarBitInit *VB) { return 0; }
-  virtual Init *convertValue(   DefInit *DI) { return 0; }
-  virtual Init *convertValue(   DagInit *DI) { return 0; }
-  virtual Init *convertValue( TypedInit *TI) { return 0; }
-  virtual Init *convertValue(   VarInit *VI) {
-    return convertValue((TypedInit*)VI);
-  }
-  virtual Init *convertValue( FieldInit *FI) {
-    return convertValue((TypedInit*)FI);
+  virtual const Init *convertValue(const  UnsetInit *UI) { return 0; }
+  virtual const Init *convertValue(const    BitInit *BI) { return 0; }
+  virtual const Init *convertValue(const   BitsInit *BI) { return 0; }
+  virtual const Init *convertValue(const    IntInit *II) { return 0; }
+  virtual const Init *convertValue(const StringInit *SI) { return 0; }
+  virtual const Init *convertValue(const   ListInit *LI) { return 0; }
+  virtual const Init *convertValue(const   UnOpInit *UI) {
+    return convertValue((const TypedInit*)UI);
+  }
+  virtual const Init *convertValue(const  BinOpInit *UI) {
+    return convertValue((const TypedInit*)UI);
+  }
+  virtual const Init *convertValue(const TernOpInit *UI) {
+    return convertValue((const TypedInit*)UI);
+  }
+  virtual const Init *convertValue(const   CodeInit *CI) { return 0; }
+  virtual const Init *convertValue(const VarBitInit *VB) { return 0; }
+  virtual const Init *convertValue(const    DefInit *DI) { return 0; }
+  virtual const Init *convertValue(const    DagInit *DI) { return 0; }
+  virtual const Init *convertValue(const  TypedInit *TI) { return 0; }
+  virtual const Init *convertValue(const    VarInit *VI) {
+    return convertValue((const TypedInit*)VI);
+  }
+  virtual const Init *convertValue(const  FieldInit *FI) {
+    return convertValue((const TypedInit*)FI);
   }
 
 public:   // These methods should only be called by subclasses of RecTy.
@@ -98,7 +117,7 @@ public:   // These methods should only be called by subclasses of RecTy.
   virtual bool baseClassOf(const RecordRecTy *RHS) const { return false; }
 };
 
-inline std::ostream &operator<<(std::ostream &OS, const RecTy &Ty) {
+inline raw_ostream &operator<<(raw_ostream &OS, const RecTy &Ty) {
   Ty.print(OS);
   return OS;
 }
@@ -106,22 +125,55 @@ inline std::ostream &operator<<(std::ostream &OS, const RecTy &Ty) {
 
 /// BitRecTy - 'bit' - Represent a single bit
 ///
-struct BitRecTy : public RecTy {
-  Init *convertValue(UnsetInit *UI) { return (Init*)UI; }
-  Init *convertValue(BitInit *BI) { return (Init*)BI; }
-  Init *convertValue(BitsInit *BI);
-  Init *convertValue(IntInit *II);
-  Init *convertValue(TypedInit *VI);
-  Init *convertValue(VarBitInit *VB) { return (Init*)VB; }
+class BitRecTy : public RecTy {
+public:
+  virtual const Init *convertValue(const  UnsetInit *UI) {
+    return (const Init*)UI;
+  }
+  virtual const Init *convertValue(const    BitInit *BI) {
+    return (const Init*)BI;
+  }
+  virtual const Init *convertValue(const   BitsInit *BI);
+  virtual const Init *convertValue(const    IntInit *II);
+  virtual const Init *convertValue(const StringInit *SI) { return 0; }
+  virtual const Init *convertValue(const   ListInit *LI) { return 0; }
+  virtual const Init *convertValue(const   CodeInit *CI) { return 0; }
+  virtual const Init *convertValue(const VarBitInit *VB) {
+    return (const Init*)VB;
+  }
+  virtual const Init *convertValue(const    DefInit *DI) { return 0; }
+  virtual const Init *convertValue(const    DagInit *DI) { return 0; }
+  virtual const Init *convertValue(const   UnOpInit *UI) {
+    return RecTy::convertValue(UI);
+  }
+  virtual const Init *convertValue(const  BinOpInit *UI) {
+    return RecTy::convertValue(UI);
+  }
+  virtual const Init *convertValue(const TernOpInit *UI) {
+    return RecTy::convertValue(UI);
+  }
+  virtual const Init *convertValue(const  TypedInit *TI);
+  virtual const Init *convertValue(const    VarInit *VI) {
+    return RecTy::convertValue(VI);
+  }
+  virtual const Init *convertValue(const  FieldInit *FI) {
+    return RecTy::convertValue(FI);
+  }
 
-  void print(std::ostream &OS) const { OS << "bit"; }
+  std::string getAsString() const { return "bit"; }
 
   bool typeIsConvertibleTo(const RecTy *RHS) const {
     return RHS->baseClassOf(this);
   }
-  virtual bool baseClassOf(const BitRecTy *RHS) const { return true; }
-  virtual bool baseClassOf(const BitsRecTy *RHS) const;
-  virtual bool baseClassOf(const IntRecTy *RHS) const { return true; }
+  virtual bool baseClassOf(const BitRecTy    *RHS) const { return true; }
+  virtual bool baseClassOf(const BitsRecTy   *RHS) const;
+  virtual bool baseClassOf(const IntRecTy    *RHS) const { return true; }
+  virtual bool baseClassOf(const StringRecTy *RHS) const { return false; }
+  virtual bool baseClassOf(const ListRecTy   *RHS) const { return false; }
+  virtual bool baseClassOf(const CodeRecTy   *RHS) const { return false; }
+  virtual bool baseClassOf(const DagRecTy    *RHS) const { return false; }
+  virtual bool baseClassOf(const RecordRecTy *RHS) const { return false; }
+
 };
 
 
@@ -131,62 +183,154 @@ struct BitRecTy : public RecTy {
 class BitsRecTy : public RecTy {
   unsigned Size;
 public:
-  BitsRecTy(unsigned Sz) : Size(Sz) {}
+  explicit BitsRecTy(unsigned Sz) : Size(Sz) {}
 
   unsigned getNumBits() const { return Size; }
 
-  Init *convertValue(UnsetInit *UI);
-  Init *convertValue(BitInit *UI);
-  Init *convertValue(BitsInit *BI);
-  Init *convertValue(IntInit *II);
-  Init *convertValue(TypedInit *VI);
+  virtual const Init *convertValue(const  UnsetInit *UI);
+  virtual const Init *convertValue(const    BitInit *UI);
+  virtual const Init *convertValue(const   BitsInit *BI);
+  virtual const Init *convertValue(const    IntInit *II);
+  virtual const Init *convertValue(const StringInit *SI) { return 0; }
+  virtual const Init *convertValue(const   ListInit *LI) { return 0; }
+  virtual const Init *convertValue(const   CodeInit *CI) { return 0; }
+  virtual const Init *convertValue(const VarBitInit *VB) { return 0; }
+  virtual const Init *convertValue(const    DefInit *DI) { return 0; }
+  virtual const Init *convertValue(const    DagInit *DI) { return 0; }
+  virtual const Init *convertValue(const   UnOpInit *UI) {
+    return RecTy::convertValue(UI);
+  }
+  virtual const Init *convertValue(const  BinOpInit *UI) {
+    return RecTy::convertValue(UI);
+  }
+  virtual const Init *convertValue(const TernOpInit *UI) {
+    return RecTy::convertValue(UI);
+  }
+  virtual const Init *convertValue(const  TypedInit *TI);
+  virtual const Init *convertValue(const    VarInit *VI) {
+    return RecTy::convertValue(VI);
+  }
+  virtual const Init *convertValue(const  FieldInit *FI) {
+    return RecTy::convertValue(FI);
+  }
 
-  void print(std::ostream &OS) const { OS << "bits<" << Size << ">"; }
+  std::string getAsString() const;
 
   bool typeIsConvertibleTo(const RecTy *RHS) const {
     return RHS->baseClassOf(this);
   }
-  virtual bool baseClassOf(const BitRecTy *RHS) const { return Size == 1; }
-  virtual bool baseClassOf(const IntRecTy *RHS) const { return true; }
-  virtual bool baseClassOf(const BitsRecTy *RHS) const {
+  virtual bool baseClassOf(const BitRecTy    *RHS) const { return Size == 1; }
+  virtual bool baseClassOf(const BitsRecTy   *RHS) const {
     return RHS->Size == Size;
   }
+  virtual bool baseClassOf(const IntRecTy    *RHS) const { return true; }
+  virtual bool baseClassOf(const StringRecTy *RHS) const { return false; }
+  virtual bool baseClassOf(const ListRecTy   *RHS) const { return false; }
+  virtual bool baseClassOf(const CodeRecTy   *RHS) const { return false; }
+  virtual bool baseClassOf(const DagRecTy    *RHS) const { return false; }
+  virtual bool baseClassOf(const RecordRecTy *RHS) const { return false; }
+
 };
 
 
 /// IntRecTy - 'int' - Represent an integer value of no particular size
 ///
-struct IntRecTy : public RecTy {
-  Init *convertValue(UnsetInit *UI) { return (Init*)UI; }
-  Init *convertValue(IntInit *II) { return (Init*)II; }
-  Init *convertValue(BitInit *BI);
-  Init *convertValue(BitsInit *BI);
-  Init *convertValue(TypedInit *TI);
+class IntRecTy : public RecTy {
+public:
+  virtual const Init *convertValue(const  UnsetInit *UI) {
+    return (const Init*)UI;
+  }
+  virtual const Init *convertValue(const    BitInit *BI);
+  virtual const Init *convertValue(const   BitsInit *BI);
+  virtual const Init *convertValue(const    IntInit *II) {
+    return (const Init*)II;
+  }
+  virtual const Init *convertValue(const StringInit *SI) { return 0; }
+  virtual const Init *convertValue(const   ListInit *LI) { return 0; }
+  virtual const Init *convertValue(const   CodeInit *CI) { return 0; }
+  virtual const Init *convertValue(const VarBitInit *VB) { return 0; }
+  virtual const Init *convertValue(const    DefInit *DI) { return 0; }
+  virtual const Init *convertValue(const    DagInit *DI) { return 0; }
+  virtual const Init *convertValue(const  UnOpInit *UI) {
+    return RecTy::convertValue(UI);
+  }
+  virtual const Init *convertValue(const  BinOpInit *UI) {
+    return RecTy::convertValue(UI);
+  }
+  virtual const Init *convertValue(const  TernOpInit *UI) {
+    return RecTy::convertValue(UI);
+  }
+  virtual const Init *convertValue(const  TypedInit *TI);
+  virtual const Init *convertValue(const    VarInit *VI) {
+    return RecTy::convertValue(VI);
+  }
+  virtual const Init *convertValue(const  FieldInit *FI) {
+    return RecTy::convertValue(FI);
+  }
 
-  void print(std::ostream &OS) const { OS << "int"; }
+  std::string getAsString() const { return "int"; }
 
   bool typeIsConvertibleTo(const RecTy *RHS) const {
     return RHS->baseClassOf(this);
   }
 
-  virtual bool baseClassOf(const BitRecTy *RHS) const { return true; }
-  virtual bool baseClassOf(const IntRecTy *RHS) const { return true; }
-  virtual bool baseClassOf(const BitsRecTy *RHS) const { return true; }
+  virtual bool baseClassOf(const BitRecTy    *RHS) const { return true; }
+  virtual bool baseClassOf(const BitsRecTy   *RHS) const { return true; }
+  virtual bool baseClassOf(const IntRecTy    *RHS) const { return true; }
+  virtual bool baseClassOf(const StringRecTy *RHS) const { return false; }
+  virtual bool baseClassOf(const ListRecTy   *RHS) const { return false; }
+  virtual bool baseClassOf(const CodeRecTy   *RHS) const { return false; }
+  virtual bool baseClassOf(const DagRecTy    *RHS) const { return false; }
+  virtual bool baseClassOf(const RecordRecTy *RHS) const { return false; }
+
 };
 
 /// StringRecTy - 'string' - Represent an string value
 ///
-struct StringRecTy : public RecTy {
-  Init *convertValue(UnsetInit *UI) { return (Init*)UI; }
-  Init *convertValue(StringInit *SI) { return (Init*)SI; }
-  Init *convertValue(TypedInit *TI);
-  void print(std::ostream &OS) const { OS << "string"; }
+class StringRecTy : public RecTy {
+public:
+  virtual const Init *convertValue(const  UnsetInit *UI) {
+    return (const Init*)UI;
+  }
+  virtual const Init *convertValue(const    BitInit *BI) { return 0; }
+  virtual const Init *convertValue(const   BitsInit *BI) { return 0; }
+  virtual const Init *convertValue(const    IntInit *II) { return 0; }
+  virtual const Init *convertValue(const StringInit *SI) {
+    return (const Init*)SI;
+  }
+  virtual const Init *convertValue(const   ListInit *LI) { return 0; }
+  virtual const Init *convertValue(const   UnOpInit *BO);
+  virtual const Init *convertValue(const  BinOpInit *BO);
+  virtual const Init *convertValue(const TernOpInit *BO) {
+    return RecTy::convertValue(BO);
+  }
+
+  virtual const Init *convertValue(const   CodeInit *CI) { return 0; }
+  virtual const Init *convertValue(const VarBitInit *VB) { return 0; }
+  virtual const Init *convertValue(const    DefInit *DI) { return 0; }
+  virtual const Init *convertValue(const    DagInit *DI) { return 0; }
+  virtual const Init *convertValue(const  TypedInit *TI);
+  virtual const Init *convertValue(const    VarInit *VI) {
+    return RecTy::convertValue(VI);
+  }
+  virtual const Init *convertValue(const  FieldInit *FI) {
+    return RecTy::convertValue(FI);
+  }
+
+  std::string getAsString() const { return "string"; }
 
   bool typeIsConvertibleTo(const RecTy *RHS) const {
     return RHS->baseClassOf(this);
   }
 
+  virtual bool baseClassOf(const BitRecTy    *RHS) const { return false; }
+  virtual bool baseClassOf(const BitsRecTy   *RHS) const { return false; }
+  virtual bool baseClassOf(const IntRecTy    *RHS) const { return false; }
   virtual bool baseClassOf(const StringRecTy *RHS) const { return true; }
+  virtual bool baseClassOf(const ListRecTy   *RHS) const { return false; }
+  virtual bool baseClassOf(const CodeRecTy   *RHS) const { return false; }
+  virtual bool baseClassOf(const DagRecTy    *RHS) const { return false; }
+  virtual bool baseClassOf(const RecordRecTy *RHS) const { return false; }
 };
 
 // ListRecTy - 'list<Ty>' - Represent a list of values, all of which must be of
@@ -197,53 +341,152 @@ struct StringRecTy : public RecTy {
 class ListRecTy : public RecTy {
   RecTy *Ty;
 public:
-  ListRecTy(RecTy *T) : Ty(T) {}
+  explicit ListRecTy(RecTy *T) : Ty(T) {}
 
   RecTy *getElementType() const { return Ty; }
 
-  Init *convertValue(UnsetInit *UI) { return (Init*)UI; }
-  Init *convertValue(ListInit *LI);
-  Init *convertValue(TypedInit *TI);
-  
-  void print(std::ostream &OS) const;
+  virtual const Init *convertValue(const  UnsetInit *UI) {
+    return (const Init*)UI;
+  }
+  virtual const Init *convertValue(const    BitInit *BI) { return 0; }
+  virtual const Init *convertValue(const   BitsInit *BI) { return 0; }
+  virtual const Init *convertValue(const    IntInit *II) { return 0; }
+  virtual const Init *convertValue(const StringInit *SI) { return 0; }
+  virtual const Init *convertValue(const   ListInit *LI);
+  virtual const Init *convertValue(const   CodeInit *CI) { return 0; }
+  virtual const Init *convertValue(const VarBitInit *VB) { return 0; }
+  virtual const Init *convertValue(const    DefInit *DI) { return 0; }
+  virtual const Init *convertValue(const    DagInit *DI) { return 0; }
+  virtual const Init *convertValue(const  UnOpInit *UI) {
+    return RecTy::convertValue(UI);
+  }
+  virtual const Init *convertValue(const  BinOpInit *UI) {
+    return RecTy::convertValue(UI);
+  }
+  virtual const Init *convertValue(const  TernOpInit *UI) {
+    return RecTy::convertValue(UI);
+  }
+  virtual const Init *convertValue(const  TypedInit *TI);
+  virtual const Init *convertValue(const    VarInit *VI) {
+    return RecTy::convertValue(VI);
+  }
+  virtual const Init *convertValue(const  FieldInit *FI) {
+    return RecTy::convertValue(FI);
+  }
+
+  std::string getAsString() const;
 
   bool typeIsConvertibleTo(const RecTy *RHS) const {
     return RHS->baseClassOf(this);
   }
 
-  virtual bool baseClassOf(const ListRecTy *RHS) const {
-    return RHS->getElementType()->typeIsConvertibleTo(Ty); 
+  virtual bool baseClassOf(const BitRecTy    *RHS) const { return false; }
+  virtual bool baseClassOf(const BitsRecTy   *RHS) const { return false; }
+  virtual bool baseClassOf(const IntRecTy    *RHS) const { return false; }
+  virtual bool baseClassOf(const StringRecTy *RHS) const { return false; }
+  virtual bool baseClassOf(const ListRecTy   *RHS) const {
+    return RHS->getElementType()->typeIsConvertibleTo(Ty);
   }
+  virtual bool baseClassOf(const CodeRecTy   *RHS) const { return false; }
+  virtual bool baseClassOf(const DagRecTy    *RHS) const { return false; }
+  virtual bool baseClassOf(const RecordRecTy *RHS) const { return false; }
 };
 
 /// CodeRecTy - 'code' - Represent an code fragment, function or method.
 ///
-struct CodeRecTy : public RecTy {
-  Init *convertValue(UnsetInit *UI) { return (Init*)UI; }
-  Init *convertValue( CodeInit *CI) { return (Init*)CI; }
-  Init *convertValue(TypedInit *TI);
+class CodeRecTy : public RecTy {
+public:
+  virtual const Init *convertValue(const  UnsetInit *UI) {
+    return (const Init*)UI;
+  }
+  virtual const Init *convertValue(const    BitInit *BI) { return 0; }
+  virtual const Init *convertValue(const   BitsInit *BI) { return 0; }
+  virtual const Init *convertValue(const    IntInit *II) { return 0; }
+  virtual const Init *convertValue(const StringInit *SI) { return 0; }
+  virtual const Init *convertValue(const   ListInit *LI) { return 0; }
+  virtual const Init *convertValue(const   CodeInit *CI) {
+    return (const Init*)CI;
+  }
+  virtual const Init *convertValue(const VarBitInit *VB) { return 0; }
+  virtual const Init *convertValue(const    DefInit *DI) { return 0; }
+  virtual const Init *convertValue(const    DagInit *DI) { return 0; }
+  virtual const Init *convertValue(const  UnOpInit *UI) {
+    return RecTy::convertValue(UI);
+  }
+  virtual const Init *convertValue(const  BinOpInit *UI) {
+    return RecTy::convertValue(UI);
+  }
+  virtual const Init *convertValue(const  TernOpInit *UI) {
+    return RecTy::convertValue(UI);
+  }
+  virtual const Init *convertValue(const  TypedInit *TI);
+  virtual const Init *convertValue(const    VarInit *VI) {
+    return RecTy::convertValue(VI);
+  }
+  virtual const Init *convertValue(const  FieldInit *FI) {
+    return RecTy::convertValue(FI);
+  }
 
-  void print(std::ostream &OS) const { OS << "code"; }
+  std::string getAsString() const { return "code"; }
 
   bool typeIsConvertibleTo(const RecTy *RHS) const {
     return RHS->baseClassOf(this);
   }
-  virtual bool baseClassOf(const CodeRecTy *RHS) const { return true; }
+  virtual bool baseClassOf(const BitRecTy    *RHS) const { return false; }
+  virtual bool baseClassOf(const BitsRecTy   *RHS) const { return false; }
+  virtual bool baseClassOf(const IntRecTy    *RHS) const { return false; }
+  virtual bool baseClassOf(const StringRecTy *RHS) const { return false; }
+  virtual bool baseClassOf(const ListRecTy   *RHS) const { return false; }
+  virtual bool baseClassOf(const CodeRecTy   *RHS) const { return true; }
+  virtual bool baseClassOf(const DagRecTy    *RHS) const { return false; }
+  virtual bool baseClassOf(const RecordRecTy *RHS) const { return false; }
 };
 
 /// DagRecTy - 'dag' - Represent a dag fragment
 ///
-struct DagRecTy : public RecTy {
-  Init *convertValue(UnsetInit *UI) { return (Init*)UI; }
-  Init *convertValue( DagInit *CI) { return (Init*)CI; }
-  Init *convertValue(TypedInit *TI);
+class DagRecTy : public RecTy {
+public:
+  virtual const Init *convertValue(const  UnsetInit *UI) {
+    return (const Init*)UI;
+  }
+  virtual const Init *convertValue(const    BitInit *BI) { return 0; }
+  virtual const Init *convertValue(const   BitsInit *BI) { return 0; }
+  virtual const Init *convertValue(const    IntInit *II) { return 0; }
+  virtual const Init *convertValue(const StringInit *SI) { return 0; }
+  virtual const Init *convertValue(const   ListInit *LI) { return 0; }
+  virtual const Init *convertValue(const   CodeInit *CI) { return 0; }
+  virtual const Init *convertValue(const VarBitInit *VB) { return 0; }
+  virtual const Init *convertValue(const    DefInit *DI) { return 0; }
+  virtual const Init *convertValue(const  UnOpInit *BO);
+  virtual const Init *convertValue(const  BinOpInit *BO);
+  virtual const Init *convertValue(const  TernOpInit *BO) {
+    return RecTy::convertValue(BO);
+  }
+  virtual const Init *convertValue(const    DagInit *CI) {
+    return (const Init*)CI;
+  }
+  virtual const Init *convertValue(const  TypedInit *TI);
+  virtual const Init *convertValue(const    VarInit *VI) {
+    return RecTy::convertValue(VI);
+  }
+  virtual const Init *convertValue(const  FieldInit *FI) {
+    return RecTy::convertValue(FI);
+  }
 
-  void print(std::ostream &OS) const { OS << "dag"; }
+  std::string getAsString() const { return "dag"; }
 
   bool typeIsConvertibleTo(const RecTy *RHS) const {
     return RHS->baseClassOf(this);
   }
-  virtual bool baseClassOf(const DagRecTy *RHS) const { return true; }
+
+  virtual bool baseClassOf(const BitRecTy    *RHS) const { return false; }
+  virtual bool baseClassOf(const BitsRecTy   *RHS) const { return false; }
+  virtual bool baseClassOf(const IntRecTy    *RHS) const { return false; }
+  virtual bool baseClassOf(const StringRecTy *RHS) const { return false; }
+  virtual bool baseClassOf(const ListRecTy   *RHS) const { return false; }
+  virtual bool baseClassOf(const CodeRecTy   *RHS) const { return false; }
+  virtual bool baseClassOf(const DagRecTy    *RHS) const { return true; }
+  virtual bool baseClassOf(const RecordRecTy *RHS) const { return false; }
 };
 
 
@@ -253,54 +496,137 @@ struct DagRecTy : public RecTy {
 class RecordRecTy : public RecTy {
   Record *Rec;
 public:
-  RecordRecTy(Record *R) : Rec(R) {}
+  explicit RecordRecTy(Record *R) : Rec(R) {}
 
   Record *getRecord() const { return Rec; }
 
-  Init *convertValue(UnsetInit *UI) { return (Init*)UI; }
-  Init *convertValue(  DefInit *DI);
-  Init *convertValue(TypedInit *VI); 
+  virtual const Init *convertValue(const  UnsetInit *UI) {
+    return (const Init*)UI;
+  }
+  virtual const Init *convertValue(const    BitInit *BI) { return 0; }
+  virtual const Init *convertValue(const   BitsInit *BI) { return 0; }
+  virtual const Init *convertValue(const    IntInit *II) { return 0; }
+  virtual const Init *convertValue(const StringInit *SI) { return 0; }
+  virtual const Init *convertValue(const   ListInit *LI) { return 0; }
+  virtual const Init *convertValue(const   CodeInit *CI) { return 0; }
+  virtual const Init *convertValue(const VarBitInit *VB) { return 0; }
+  virtual const Init *convertValue(const  UnOpInit *UI) {
+    return RecTy::convertValue(UI);
+  }
+  virtual const Init *convertValue(const  BinOpInit *UI) {
+    return RecTy::convertValue(UI);
+  }
+  virtual const Init *convertValue(const  TernOpInit *UI) {
+    return RecTy::convertValue(UI);
+  }
+  virtual const Init *convertValue(const    DefInit *DI);
+  virtual const Init *convertValue(const    DagInit *DI) { return 0; }
+  virtual const Init *convertValue(const  TypedInit *VI);
+  virtual const Init *convertValue(const    VarInit *VI) {
+    return RecTy::convertValue(VI);
+  }
+  virtual const Init *convertValue(const  FieldInit *FI) {
+    return RecTy::convertValue(FI);
+  }
 
-  void print(std::ostream &OS) const;
+  std::string getAsString() const;
 
   bool typeIsConvertibleTo(const RecTy *RHS) const {
     return RHS->baseClassOf(this);
   }
+  virtual bool baseClassOf(const BitRecTy    *RHS) const { return false; }
+  virtual bool baseClassOf(const BitsRecTy   *RHS) const { return false; }
+  virtual bool baseClassOf(const IntRecTy    *RHS) const { return false; }
+  virtual bool baseClassOf(const StringRecTy *RHS) const { return false; }
+  virtual bool baseClassOf(const ListRecTy   *RHS) const { return false; }
+  virtual bool baseClassOf(const CodeRecTy   *RHS) const { return false; }
+  virtual bool baseClassOf(const DagRecTy    *RHS) const { return false; }
   virtual bool baseClassOf(const RecordRecTy *RHS) const;
 };
 
-
+/// resolveTypes - Find a common type that T1 and T2 convert to.
+/// Return 0 if no such type exists.
+///
+RecTy *resolveTypes(RecTy *T1, RecTy *T2);
 
 //===----------------------------------------------------------------------===//
 //  Initializer Classes
 //===----------------------------------------------------------------------===//
 
-struct Init {
+class Init : public FastFoldingSetNode {
+  Init(const Init &);  // Do not define.
+  Init &operator=(const Init &);  // Do not define.
+
+protected:
+  Init(const FoldingSetNodeID &ID) : FastFoldingSetNode(ID) {}
+
+  static FoldingSet<Init> UniqueInits;
+  static BumpPtrAllocator InitAllocator;
+
+  enum Type {
+    initUnset,
+    initBit,
+    initBits,
+    initInt,
+    initString,
+    initCode,
+    initList,
+    initUnOp,
+    initBinOp,
+    initTernOp,
+    initQuadOp,
+    initVar,
+    initVarBit,
+    initVarListElement,
+    initDef,
+    initField,
+    initDag
+  };
+
+public:
   virtual ~Init() {}
 
+  static void ReleaseMemory() {
+    InitAllocator.Reset();
+  }
+
   /// isComplete - This virtual method should be overridden by values that may
   /// not be completely specified yet.
   virtual bool isComplete() const { return true; }
 
   /// print - Print out this value.
-  virtual void print(std::ostream &OS) const = 0;
+  void print(raw_ostream &OS) const { OS << getAsString(); }
+
+  /// getAsString - Convert this value to a string form.
+  virtual std::string getAsString() const = 0;
 
   /// dump - Debugging method that may be called through a debugger, just
-  /// invokes print on cerr.
+  /// invokes print on stderr.
   void dump() const;
 
   /// convertInitializerTo - This virtual function is a simple call-back
   /// function that should be overridden to call the appropriate
   /// RecTy::convertValue method.
   ///
-  virtual Init *convertInitializerTo(RecTy *Ty) = 0;
+  virtual const Init *convertInitializerTo(RecTy *Ty) const = 0;
 
   /// convertInitializerBitRange - This method is used to implement the bitrange
   /// selection operator.  Given an initializer, it selects the specified bits
   /// out, returning them as a new init of bits type.  If it is not legal to use
   /// the bit subscript operator on this initializer, return null.
   ///
-  virtual Init *convertInitializerBitRange(const std::vector<unsigned> &Bits) {
+  virtual const Init *
+  convertInitializerBitRange(const std::vector<unsigned> &Bits) const {
+    return 0;
+  }
+
+  /// convertInitListSlice - This method is used to implement the list slice
+  /// selection operator.  Given an initializer, it selects the specified list
+  /// elements, returning them as a new init of list type.  If it is not legal
+  /// to take a slice of this, return null.
+  ///
+  virtual const Init *
+  convertInitListSlice(const std::vector<unsigned> &Elements) const {
     return 0;
   }
 
@@ -314,32 +640,84 @@ struct Init {
   /// initializer for the specified field.  If getFieldType returns non-null
   /// this method should return non-null, otherwise it returns null.
   ///
-  virtual Init *getFieldInit(Record &R, const std::string &FieldName) const {
+  virtual const Init *getFieldInit(Record &R, const RecordVal *RV,
+                                   const std::string &FieldName) const {
     return 0;
   }
 
   /// resolveReferences - This method is used by classes that refer to other
-  /// variables which may not be defined at the time they expression is formed.
+  /// variables which may not be defined at the time the expression is formed.
   /// If a value is set for the variable later, this method will be called on
   /// users of the value to allow the value to propagate out.
   ///
-  virtual Init *resolveReferences(Record &R) { return this; }
+  virtual const Init *resolveReferences(Record &R,
+                                        const RecordVal *RV) const {
+    return this;
+  }
 };
 
-inline std::ostream &operator<<(std::ostream &OS, const Init &I) {
+inline raw_ostream &operator<<(raw_ostream &OS, const Init &I) {
   I.print(OS); return OS;
 }
 
+/// TypedInit - This is the common super-class of types that have a specific,
+/// explicit, type.
+///
+class TypedInit : public Init {
+  RecTy *Ty;
+
+  TypedInit(const TypedInit &Other);  // Do not define.
+  TypedInit &operator=(const TypedInit &Other);  // Do not define.
+
+protected:
+  explicit TypedInit(const FoldingSetNodeID &ID, RecTy *T) : Init(ID), Ty(T) {}
+
+public:
+  RecTy *getType() const { return Ty; }
+
+  virtual const Init *
+  convertInitializerBitRange(const std::vector<unsigned> &Bits) const;
+  virtual const Init *
+  convertInitListSlice(const std::vector<unsigned> &Elements) const;
+
+  /// getFieldType - This method is used to implement the FieldInit class.
+  /// Implementors of this method should return the type of the named field if
+  /// they are of record type.
+  ///
+  virtual RecTy *getFieldType(const std::string &FieldName) const;
+
+  /// resolveBitReference - This method is used to implement
+  /// VarBitInit::resolveReferences.  If the bit is able to be resolved, we
+  /// simply return the resolved value, otherwise we return null.
+  ///
+  virtual const Init *resolveBitReference(Record &R, const RecordVal *RV,
+                                          unsigned Bit) const = 0;
+
+  /// resolveListElementReference - This method is used to implement
+  /// VarListElementInit::resolveReferences.  If the list element is resolvable
+  /// now, we return the resolved value, otherwise we return null.
+  virtual const Init *resolveListElementReference(Record &R,
+                                                  const RecordVal *RV,
+                                                  unsigned Elt) const = 0;
+};
+
 
 /// UnsetInit - ? - Represents an uninitialized value
 ///
-struct UnsetInit : public Init {
-  virtual Init *convertInitializerTo(RecTy *Ty) {
+class UnsetInit : public Init {
+  UnsetInit(const FoldingSetNodeID &ID) : Init(ID) {}
+  UnsetInit(const UnsetInit &);  // Do not define.
+  UnsetInit &operator=(const UnsetInit &Other);  // Do not define.
+
+public:
+  static const UnsetInit *Create();
+
+  virtual const Init *convertInitializerTo(RecTy *Ty) const {
     return Ty->convertValue(this);
   }
 
   virtual bool isComplete() const { return false; }
-  virtual void print(std::ostream &OS) const { OS << "?"; }
+  virtual std::string getAsString() const { return "?"; }
 };
 
 
@@ -347,266 +725,708 @@ struct UnsetInit : public Init {
 ///
 class BitInit : public Init {
   bool Value;
+
+  explicit BitInit(const FoldingSetNodeID &ID, bool V) : Init(ID), Value(V) {}
+  BitInit(const BitInit &Other);  // Do not define.
+  BitInit &operator=(BitInit &Other);  // Do not define.
+
 public:
-  BitInit(bool V) : Value(V) {}
+  static const BitInit *Create(bool V);
 
   bool getValue() const { return Value; }
 
-  virtual Init *convertInitializerTo(RecTy *Ty) {
+  virtual const Init *convertInitializerTo(RecTy *Ty) const {
     return Ty->convertValue(this);
   }
 
-  virtual void print(std::ostream &OS) const { OS << (Value ? "1" : "0"); }
+  virtual std::string getAsString() const { return Value ? "1" : "0"; }
 };
 
 /// BitsInit - { a, b, c } - Represents an initializer for a BitsRecTy value.
 /// It contains a vector of bits, whose size is determined by the type.
 ///
 class BitsInit : public Init {
-  std::vector<Init*> Bits;
+  std::vector<const Init*> Bits;
+
+  BitsInit(const FoldingSetNodeID &ID, unsigned Size)
+      : Init(ID), Bits(Size) {}
+
+  template<typename InputIterator>
+  BitsInit(const FoldingSetNodeID &ID, InputIterator start, InputIterator end) 
+      : Init(ID), Bits(start, end) {}
+
+  BitsInit(const BitsInit &Other);  // Do not define.
+  BitsInit &operator=(const BitsInit &Other);  // Do not define.
+
 public:
-  BitsInit(unsigned Size) : Bits(Size) {}
+  template<typename InputIterator>
+  static const BitsInit *Create(InputIterator Start, InputIterator End) {
+    FoldingSetNodeID ID;
+    ID.AddInteger(initBits);
+    ID.AddInteger(std::distance(Start, End));
+
+    InputIterator S = Start;
+    while (S != End)
+      ID.AddPointer(*S++);
+
+    void *IP = 0;
+    if (const Init *I = UniqueInits.FindNodeOrInsertPos(ID, IP))
+      return static_cast<const BitsInit *>(I);
+
+    BitsInit *I = InitAllocator.Allocate<BitsInit>();
+    new (I) BitsInit(ID, Start, End);
+    UniqueInits.InsertNode(I, IP);
+    return I;
+  }
 
   unsigned getNumBits() const { return Bits.size(); }
 
-  Init *getBit(unsigned Bit) const {
+  const Init *getBit(unsigned Bit) const {
     assert(Bit < Bits.size() && "Bit index out of range!");
     return Bits[Bit];
   }
-  void setBit(unsigned Bit, Init *V) {
+  void setBit(unsigned Bit, const Init *V) {
     assert(Bit < Bits.size() && "Bit index out of range!");
     assert(Bits[Bit] == 0 && "Bit already set!");
     Bits[Bit] = V;
   }
 
-  virtual Init *convertInitializerTo(RecTy *Ty) {
+  virtual const Init *convertInitializerTo(RecTy *Ty) const {
     return Ty->convertValue(this);
   }
-  virtual Init *convertInitializerBitRange(const std::vector<unsigned> &Bits);
+  virtual const Init *
+  convertInitializerBitRange(const std::vector<unsigned> &Bits) const;
 
   virtual bool isComplete() const {
     for (unsigned i = 0; i != getNumBits(); ++i)
       if (!getBit(i)->isComplete()) return false;
     return true;
   }
-  virtual void print(std::ostream &OS) const;
-
-  virtual Init *resolveReferences(Record &R);
+  bool allInComplete() const {
+    for (unsigned i = 0; i != getNumBits(); ++i)
+      if (getBit(i)->isComplete()) return false;
+    return true;
+  }
+  virtual std::string getAsString() const;
 
-  // printXX - Print this bitstream with the specified format, returning true if
-  // it is not possible.
-  bool printInHex(std::ostream &OS) const;
-  bool printAsVariable(std::ostream &OS) const;
-  bool printAsUnset(std::ostream &OS) const;
+  virtual const Init *resolveReferences(Record &R,
+                                        const RecordVal *RV) const;
 };
 
 
 /// IntInit - 7 - Represent an initalization by a literal integer value.
 ///
-class IntInit : public Init {
-  int Value;
+class IntInit : public TypedInit {
+  int64_t Value;
+
+  explicit IntInit(const FoldingSetNodeID &ID, int64_t V)
+      : TypedInit(ID, new IntRecTy), Value(V) {}
+
+  IntInit(const IntInit &Other);  // Do not define.
+  IntInit &operator=(const IntInit &Other);  // Do note define.
+
 public:
-  IntInit(int V) : Value(V) {}
+  static const IntInit *Create(int64_t V);
 
-  int getValue() const { return Value; }
+  int64_t getValue() const { return Value; }
 
-  virtual Init *convertInitializerTo(RecTy *Ty) {
+  virtual const Init *convertInitializerTo(RecTy *Ty) const {
     return Ty->convertValue(this);
   }
-  virtual Init *convertInitializerBitRange(const std::vector<unsigned> &Bits);
+  virtual const Init *
+  convertInitializerBitRange(const std::vector<unsigned> &Bits) const;
 
-  virtual void print(std::ostream &OS) const { OS << Value; }
+  virtual std::string getAsString() const;
+
+  /// resolveBitReference - This method is used to implement
+  /// VarBitInit::resolveReferences.  If the bit is able to be resolved, we
+  /// simply return the resolved value, otherwise we return null.
+  ///
+  virtual const Init *resolveBitReference(Record &R, const RecordVal *RV,
+                                          unsigned Bit) const {
+    assert(0 && "Illegal bit reference off int");
+    return 0;
+  }
+
+  /// resolveListElementReference - This method is used to implement
+  /// VarListElementInit::resolveReferences.  If the list element is resolvable
+  /// now, we return the resolved value, otherwise we return null.
+  virtual const Init *resolveListElementReference(Record &R,
+                                                  const RecordVal *RV,
+                                                  unsigned Elt) const {
+    assert(0 && "Illegal element reference off int");
+    return 0;
+  }
 };
 
 
 /// StringInit - "foo" - Represent an initialization by a string value.
 ///
-class StringInit : public Init {
+class StringInit : public TypedInit {
   std::string Value;
+
+  explicit StringInit(const FoldingSetNodeID &ID, const std::string &V)
+      : TypedInit(ID, new StringRecTy), Value(V) {}
+
+  StringInit(const StringInit &Other);  // Do not define.
+  StringInit &operator=(const StringInit &Other);  // Do not define.
+
 public:
-  StringInit(const std::string &V) : Value(V) {}
+  static const StringInit *Create(const std::string &V);
 
   const std::string &getValue() const { return Value; }
 
-  virtual Init *convertInitializerTo(RecTy *Ty) {
+  virtual const Init *convertInitializerTo(RecTy *Ty) const {
     return Ty->convertValue(this);
   }
 
-  virtual void print(std::ostream &OS) const { OS << "\"" << Value << "\""; }
+  virtual std::string getAsString() const { return "\"" + Value + "\""; }
+
+  /// resolveBitReference - This method is used to implement
+  /// VarBitInit::resolveReferences.  If the bit is able to be resolved, we
+  /// simply return the resolved value, otherwise we return null.
+  ///
+  virtual const Init *resolveBitReference(Record &R, const RecordVal *RV,
+                                          unsigned Bit) const {
+    assert(0 && "Illegal bit reference off string");
+    return 0;
+  }
+
+  /// resolveListElementReference - This method is used to implement
+  /// VarListElementInit::resolveReferences.  If the list element is resolvable
+  /// now, we return the resolved value, otherwise we return null.
+  virtual const Init *resolveListElementReference(Record &R,
+                                                  const RecordVal *RV,
+                                                  unsigned Elt) const {
+    assert(0 && "Illegal element reference off string");
+    return 0;
+  }
 };
 
 /// CodeInit - "[{...}]" - Represent a code fragment.
 ///
 class CodeInit : public Init {
   std::string Value;
+
+  explicit CodeInit(const FoldingSetNodeID &ID, const std::string &V)
+      : Init(ID), Value(V) {}
+
+  CodeInit(const CodeInit &Other);  // Do not define.
+  CodeInit &operator=(const CodeInit &Other);  // Do not define.
+
 public:
-  CodeInit(const std::string &V) : Value(V) {}
+  static const CodeInit *Create(const std::string &V);
 
-  const std::string getValue() const { return Value; }
+  const std::string &getValue() const { return Value; }
 
-  virtual Init *convertInitializerTo(RecTy *Ty) {
+  virtual const Init *convertInitializerTo(RecTy *Ty) const {
     return Ty->convertValue(this);
   }
 
-  virtual void print(std::ostream &OS) const { OS << "[{" << Value << "}]"; }
+  virtual std::string getAsString() const { return "[{" + Value + "}]"; }
 };
 
 /// ListInit - [AL, AH, CL] - Represent a list of defs
 ///
-class ListInit : public Init {
-  std::vector<Init*> Values;
+class ListInit : public TypedInit {
+  std::vector<const Init*> Values;
+
 public:
-  ListInit(std::vector<Init*> &Vs) {
+  typedef std::vector<const Init*>::const_iterator const_iterator;
+
+private:
+  ListInit(const FoldingSetNodeID &ID, std::vector<const Init*> &Vs,
+           RecTy *EltTy)
+      : TypedInit(ID, new ListRecTy(EltTy)) {
     Values.swap(Vs);
   }
 
+  template<typename InputIterator>
+  ListInit(const FoldingSetNodeID &ID, InputIterator Start, InputIterator End,
+           RecTy *EltTy)
+      : TypedInit(ID, new ListRecTy(EltTy)), Values(Start, End) {}
+
+  ListInit(const ListInit &Other);  // Do not define.
+  ListInit &operator=(const ListInit &Other);  // Do not define.
+
+public:
+  static const ListInit *Create(std::vector<const Init*> &Vs, RecTy *EltTy);
+
+  template<typename InputIterator>
+  static const ListInit *Create(InputIterator Start, InputIterator End,
+                                RecTy *EltTy) {
+    FoldingSetNodeID ID;
+    ID.AddInteger(initList);
+    ID.AddString(EltTy->getAsString());
+
+    InputIterator S = Start;
+    while (S != End)
+      ID.AddPointer(*S++); 
+
+    void *IP = 0;
+    if (const Init *I = UniqueInits.FindNodeOrInsertPos(ID, IP))
+      return static_cast<const ListInit *>(I);
+
+    ListInit *I = InitAllocator.Allocate<ListInit>();
+    new (I) ListInit(ID, Start, End, EltTy);
+    UniqueInits.InsertNode(I, IP);
+    return I;
+  }
+
   unsigned getSize() const { return Values.size(); }
-  Init *getElement(unsigned i) const {
+  const Init *getElement(unsigned i) const {
     assert(i < Values.size() && "List element index out of range!");
     return Values[i];
   }
 
-  virtual Init *convertInitializerTo(RecTy *Ty) {
+  Record *getElementAsRecord(unsigned i) const;
+
+  const Init *convertInitListSlice(const std::vector<unsigned> &Elements) const;
+
+  virtual const Init *convertInitializerTo(RecTy *Ty) const {
     return Ty->convertValue(this);
   }
 
-  virtual void print(std::ostream &OS) const;
-};
+  /// resolveReferences - This method is used by classes that refer to other
+  /// variables which may not be defined at the time they expression is formed.
+  /// If a value is set for the variable later, this method will be called on
+  /// users of the value to allow the value to propagate out.
+  ///
+  virtual const Init *resolveReferences(Record &R,
+                                        const RecordVal *RV) const;
 
+  virtual std::string getAsString() const;
 
-/// TypedInit - This is the common super-class of types that have a specific,
-/// explicit, type.
-///
-class TypedInit : public Init {
-  RecTy *Ty;
-public:  
-  TypedInit(RecTy *T) : Ty(T) {}
+  inline const_iterator begin() const { return Values.begin(); }
+  inline const_iterator end  () const { return Values.end();   }
 
-  RecTy *getType() const { return Ty; }
+  inline size_t         size () const { return Values.size();  }
+  inline bool           empty() const { return Values.empty(); }
 
   /// resolveBitReference - This method is used to implement
   /// VarBitInit::resolveReferences.  If the bit is able to be resolved, we
-  /// simply return the resolved value, otherwise we return this.
+  /// simply return the resolved value, otherwise we return null.
   ///
-  virtual Init *resolveBitReference(Record &R, unsigned Bit) = 0;
+  virtual const Init *resolveBitReference(Record &R, const RecordVal *RV,
+                                          unsigned Bit) const {
+    assert(0 && "Illegal bit reference off list");
+    return 0;
+  }
+
+  /// resolveListElementReference - This method is used to implement
+  /// VarListElementInit::resolveReferences.  If the list element is resolvable
+  /// now, we return the resolved value, otherwise we return null.
+  virtual const Init *resolveListElementReference(Record &R,
+                                                  const RecordVal *RV,
+                                                  unsigned Elt) const;
+};
+
+
+/// OpInit - Base class for operators
+///
+class OpInit : public TypedInit {
+  OpInit(const OpInit &Other);  // Do not define.
+  OpInit &operator=(OpInit &Other);  // Do not define.
+
+protected:
+  explicit OpInit(const FoldingSetNodeID &ID, RecTy *Type)
+      : TypedInit(ID, Type) {}
+
+public:
+  // Clone - Clone this operator, replacing arguments with the new list
+  virtual const OpInit *clone(std::vector<const Init *> &Operands) const = 0;
+
+  virtual int getNumOperands() const = 0;
+  virtual const Init *getOperand(int i) const = 0;
+
+  // Fold - If possible, fold this to a simpler init.  Return this if not
+  // possible to fold.
+  virtual const Init *Fold(Record *CurRec, MultiClass *CurMultiClass) const = 0;
+
+  virtual const Init *convertInitializerTo(RecTy *Ty) const {
+    return Ty->convertValue(this);
+  }
+
+  virtual const Init *resolveBitReference(Record &R, const RecordVal *RV,
+                                          unsigned Bit) const;
+  virtual const Init *resolveListElementReference(Record &R,
+                                                  const RecordVal *RV,
+                                                  unsigned Elt) const;
+};
+
+
+/// UnOpInit - !op (X) - Transform an init.
+///
+class UnOpInit : public OpInit {
+public:
+  enum UnaryOp { CAST, HEAD, TAIL, EMPTY };
+private:
+  UnaryOp Opc;
+  const Init *LHS;
+
+  UnOpInit(const FoldingSetNodeID &ID, UnaryOp opc, const Init *lhs,
+           RecTy *Type)
+      : OpInit(ID, Type), Opc(opc), LHS(lhs) {}
+
+  UnOpInit(const UnOpInit &Other);  // Do not define.
+  UnOpInit &operator=(const UnOpInit &Other);  // Do not define.
+
+public:
+  static const UnOpInit *Create(UnaryOp opc, const Init *lhs, RecTy *Type);
+
+  // Clone - Clone this operator, replacing arguments with the new list
+  virtual const OpInit *clone(std::vector<const Init *> &Operands) const {
+    assert(Operands.size() == 1 &&
+           "Wrong number of operands for unary operation");
+    return UnOpInit::Create(getOpcode(), *Operands.begin(), getType());
+  }
+
+  int getNumOperands() const { return 1; }
+  const Init *getOperand(int i) const {
+    assert(i == 0 && "Invalid operand id for unary operator");
+    return getOperand();
+  }
+
+  UnaryOp getOpcode() const { return Opc; }
+  const Init *getOperand() const { return LHS; }
+
+  // Fold - If possible, fold this to a simpler init.  Return this if not
+  // possible to fold.
+  const Init *Fold(Record *CurRec, MultiClass *CurMultiClass)const ;
+
+  virtual const Init *resolveReferences(Record &R,
+                                        const RecordVal *RV) const;
+
+  virtual std::string getAsString() const;
 };
 
+/// BinOpInit - !op (X, Y) - Combine two inits.
+///
+class BinOpInit : public OpInit {
+public:
+  enum BinaryOp { SHL, SRA, SRL, STRCONCAT, CONCAT, EQ };
+private:
+  BinaryOp Opc;
+  const Init *LHS, *RHS;
+
+  BinOpInit(const FoldingSetNodeID &ID, BinaryOp opc, const Init *lhs,
+            const Init *rhs, RecTy *Type) :
+      OpInit(ID, Type), Opc(opc), LHS(lhs), RHS(rhs) {}
+
+  BinOpInit(const BinOpInit &Other);  // Do not define.
+  BinOpInit &operator=(const BinOpInit &Other);  // Do not define.
+
+public:
+  static const BinOpInit *Create(BinaryOp opc, const Init *lhs, const Init *rhs,
+                                 RecTy *Type);
+
+  // Clone - Clone this operator, replacing arguments with the new list
+  virtual const OpInit *clone(std::vector<const Init *> &Operands) const {
+    assert(Operands.size() == 2 &&
+           "Wrong number of operands for binary operation");
+    return BinOpInit::Create(getOpcode(), Operands[0], Operands[1], getType());
+  }
+
+  int getNumOperands() const { return 2; }
+  const Init *getOperand(int i) const {
+    assert((i == 0 || i == 1) && "Invalid operand id for binary operator");
+    if (i == 0) {
+      return getLHS();
+    } else {
+      return getRHS();
+    }
+  }
+
+  BinaryOp getOpcode() const { return Opc; }
+  const Init *getLHS() const { return LHS; }
+  const Init *getRHS() const { return RHS; }
+
+  // Fold - If possible, fold this to a simpler init.  Return this if not
+  // possible to fold.
+  const Init *Fold(Record *CurRec, MultiClass *CurMultiClass) const;
+
+  virtual const Init *resolveReferences(Record &R,
+                                        const RecordVal *RV) const;
+
+  virtual std::string getAsString() const;
+};
+
+/// TernOpInit - !op (X, Y, Z) - Combine two inits.
+///
+class TernOpInit : public OpInit {
+public:
+  enum TernaryOp { SUBST, FOREACH, IF };
+private:
+  TernaryOp Opc;
+  const Init *LHS, *MHS, *RHS;
+
+  TernOpInit(const FoldingSetNodeID &ID, TernaryOp opc, const Init *lhs,
+             const Init *mhs, const Init *rhs, RecTy *Type) :
+      OpInit(ID, Type), Opc(opc), LHS(lhs), MHS(mhs), RHS(rhs) {}
+
+  TernOpInit(const TernOpInit &Other);  // Do not define.
+  TernOpInit &operator=(const TernOpInit &Other);  // Do not define.
+
+public:
+  static const TernOpInit *Create(TernaryOp opc, const Init *lhs,
+                                  const Init *mhs, const Init *rhs,
+                                  RecTy *Type);
+
+  // Clone - Clone this operator, replacing arguments with the new list
+  virtual const OpInit *clone(std::vector<const Init *> &Operands) const {
+    assert(Operands.size() == 3 &&
+           "Wrong number of operands for ternary operation");
+    return TernOpInit::Create(getOpcode(), Operands[0], Operands[1],
+                              Operands[2], getType());
+  }
+
+  int getNumOperands() const { return 3; }
+  const Init *getOperand(int i) const {
+    assert((i == 0 || i == 1 || i == 2) &&
+           "Invalid operand id for ternary operator");
+    if (i == 0) {
+      return getLHS();
+    } else if (i == 1) {
+      return getMHS();
+    } else {
+      return getRHS();
+    }
+  }
+
+  TernaryOp getOpcode() const { return Opc; }
+  const Init *getLHS() const { return LHS; }
+  const Init *getMHS() const { return MHS; }
+  const Init *getRHS() const { return RHS; }
+
+  // Fold - If possible, fold this to a simpler init.  Return this if not
+  // possible to fold.
+  const Init *Fold(Record *CurRec, MultiClass *CurMultiClass) const;
+
+  virtual bool isComplete() const { return false; }
+
+  virtual const Init *resolveReferences(Record &R,
+                                        const RecordVal *RV) const;
+
+  virtual std::string getAsString() const;
+};
+
+
 /// VarInit - 'Opcode' - Represent a reference to an entire variable object.
 ///
 class VarInit : public TypedInit {
   std::string VarName;
+
+  explicit VarInit(const FoldingSetNodeID &ID, const std::string &VN, RecTy *T)
+      : TypedInit(ID, T), VarName(VN) {}
+
+  VarInit(const VarInit &Other);  // Do not define.
+  VarInit &operator=(const VarInit &Other);  // Do not define.
+
 public:
-  VarInit(const std::string &VN, RecTy *T) : TypedInit(T), VarName(VN) {}
-  
-  virtual Init *convertInitializerTo(RecTy *Ty) {
+  static const VarInit *Create(const std::string &VN, RecTy *T);
+  static const VarInit *Create(const Init *VN, RecTy *T);
+
+  virtual const Init *convertInitializerTo(RecTy *Ty) const {
     return Ty->convertValue(this);
   }
 
   const std::string &getName() const { return VarName; }
 
-  virtual Init *convertInitializerBitRange(const std::vector<unsigned> &Bits);
-
-  virtual Init *resolveBitReference(Record &R, unsigned Bit);
+  virtual const Init *resolveBitReference(Record &R, const RecordVal *RV,
+                                          unsigned Bit) const;
+  virtual const Init *resolveListElementReference(Record &R,
+                                                  const RecordVal *RV,
+                                                  unsigned Elt) const;
 
   virtual RecTy *getFieldType(const std::string &FieldName) const;
-  virtual Init *getFieldInit(Record &R, const std::string &FieldName) const;
+  virtual const Init *getFieldInit(Record &R, const RecordVal *RV,
+                             const std::string &FieldName) const;
 
   /// resolveReferences - This method is used by classes that refer to other
   /// variables which may not be defined at the time they expression is formed.
   /// If a value is set for the variable later, this method will be called on
   /// users of the value to allow the value to propagate out.
   ///
-  virtual Init *resolveReferences(Record &R);
-  
-  virtual void print(std::ostream &OS) const { OS << VarName; }
+  virtual const Init *resolveReferences(Record &R,
+                                        const RecordVal *RV) const;
+
+  virtual std::string getAsString() const { return VarName; }
 };
 
 
 /// VarBitInit - Opcode{0} - Represent access to one bit of a variable or field.
 ///
 class VarBitInit : public Init {
-  TypedInit *TI;
+  const TypedInit *TI;
   unsigned Bit;
-public:
-  VarBitInit(TypedInit *T, unsigned B) : TI(T), Bit(B) {
+
+  VarBitInit(const FoldingSetNodeID &ID, const TypedInit *T, unsigned B)
+      : Init(ID), TI(T), Bit(B) {
     assert(T->getType() && dynamic_cast<BitsRecTy*>(T->getType()) &&
            ((BitsRecTy*)T->getType())->getNumBits() > B &&
            "Illegal VarBitInit expression!");
   }
 
-  virtual Init *convertInitializerTo(RecTy *Ty) {
+  VarBitInit(const VarBitInit &Other);  // Do not define.
+  VarBitInit &operator=(const VarBitInit &Other);  // Do not define.
+
+public:
+  static const VarBitInit *Create(const TypedInit *T, unsigned B);
+
+  virtual const Init *convertInitializerTo(RecTy *Ty) const {
     return Ty->convertValue(this);
   }
 
-  TypedInit *getVariable() const { return TI; }
+  const TypedInit *getVariable() const { return TI; }
   unsigned getBitNum() const { return Bit; }
-  
-  virtual void print(std::ostream &OS) const {
-    TI->print(OS); OS << "{" << Bit << "}";
-  }
-  virtual Init *resolveReferences(Record &R);
+
+  virtual std::string getAsString() const;
+  virtual const Init *resolveReferences(Record &R,
+                                        const RecordVal *RV) const;
 };
 
+/// VarListElementInit - List[4] - Represent access to one element of a var or
+/// field.
+class VarListElementInit : public TypedInit {
+  const TypedInit *TI;
+  unsigned Element;
+
+  VarListElementInit(const FoldingSetNodeID &ID, const TypedInit *T, unsigned E)
+      : TypedInit(ID, dynamic_cast<ListRecTy*>(T->getType())->getElementType()),
+                TI(T), Element(E) {
+    assert(T->getType() && dynamic_cast<ListRecTy*>(T->getType()) &&
+           "Illegal VarBitInit expression!");
+  }
+
+  VarListElementInit(const VarListElementInit &Other);  // Do not define.
+  VarListElementInit &operator=(const VarListElementInit &Other);  // Do
+                                                                   // not
+                                                                   // define.
+
+public:
+  static const VarListElementInit *Create(const TypedInit *T, unsigned E);
+
+  virtual const Init *convertInitializerTo(RecTy *Ty) const {
+    return Ty->convertValue(this);
+  }
+
+  const TypedInit *getVariable() const { return TI; }
+  unsigned getElementNum() const { return Element; }
+
+  virtual const Init *resolveBitReference(Record &R, const RecordVal *RV,
+                                          unsigned Bit) const;
+
+  /// resolveListElementReference - This method is used to implement
+  /// VarListElementInit::resolveReferences.  If the list element is resolvable
+  /// now, we return the resolved value, otherwise we return null.
+  virtual const Init *resolveListElementReference(Record &R, const RecordVal *RV,
+                                            unsigned Elt) const;
+
+  virtual std::string getAsString() const;
+  virtual const Init *resolveReferences(Record &R,
+                                        const RecordVal *RV) const;
+};
 
 /// DefInit - AL - Represent a reference to a 'def' in the description
 ///
-class DefInit : public Init {
+class DefInit : public TypedInit {
   Record *Def;
+
+  explicit DefInit(const FoldingSetNodeID &ID, Record *D)
+      : TypedInit(ID, new RecordRecTy(D)), Def(D) {}
+
+  DefInit(const DefInit &Other);  // Do not define.
+  DefInit &operator=(const DefInit &Other);  // Do not define.
+
 public:
-  DefInit(Record *D) : Def(D) {}
-  
-  virtual Init *convertInitializerTo(RecTy *Ty) {
+  static const DefInit *Create(Record *D);
+
+  virtual const Init *convertInitializerTo(RecTy *Ty) const {
     return Ty->convertValue(this);
   }
 
   Record *getDef() const { return Def; }
 
-  //virtual Init *convertInitializerBitRange(const std::vector<unsigned> &Bits);
+  //virtual const Init *
+  //convertInitializerBitRange(const std::vector<unsigned> &Bits) const;
 
   virtual RecTy *getFieldType(const std::string &FieldName) const;
-  virtual Init *getFieldInit(Record &R, const std::string &FieldName) const;
-  
-  virtual void print(std::ostream &OS) const;
+  virtual const Init *getFieldInit(Record &R, const RecordVal *RV,
+                             const std::string &FieldName) const;
+
+  virtual std::string getAsString() const;
+
+  /// resolveBitReference - This method is used to implement
+  /// VarBitInit::resolveReferences.  If the bit is able to be resolved, we
+  /// simply return the resolved value, otherwise we return null.
+  ///
+  virtual const Init *resolveBitReference(Record &R, const RecordVal *RV,
+                                          unsigned Bit) const {
+    assert(0 && "Illegal bit reference off def");
+    return 0;
+  }
+
+  /// resolveListElementReference - This method is used to implement
+  /// VarListElementInit::resolveReferences.  If the list element is resolvable
+  /// now, we return the resolved value, otherwise we return null.
+  virtual const Init *resolveListElementReference(Record &R,
+                                                  const RecordVal *RV,
+                                                  unsigned Elt) const {
+    assert(0 && "Illegal element reference off def");
+    return 0;
+  }
 };
 
 
 /// FieldInit - X.Y - Represent a reference to a subfield of a variable
 ///
 class FieldInit : public TypedInit {
-  Init *Rec;                // Record we are referring to
+  const Init *Rec;                // Record we are referring to
   std::string FieldName;    // Field we are accessing
-public:
-  FieldInit(Init *R, const std::string &FN)
-    : TypedInit(R->getFieldType(FN)), Rec(R), FieldName(FN) {
+
+  FieldInit(const FoldingSetNodeID &ID, const Init *R, const std::string &FN)
+      : TypedInit(ID, R->getFieldType(FN)), Rec(R), FieldName(FN) {
     assert(getType() && "FieldInit with non-record type!");
   }
 
-  virtual Init *convertInitializerTo(RecTy *Ty) {
+  FieldInit(const FieldInit &Other);  // Do not define.
+  FieldInit &operator=(const FieldInit &Other);  // Do not define.
+
+public:
+  static const FieldInit *Create(const Init *R, const std::string &FN);
+  static const FieldInit *Create(const Init *R, const Init *FN);
+
+  virtual const Init *convertInitializerTo(RecTy *Ty) const {
     return Ty->convertValue(this);
   }
 
-  virtual Init *convertInitializerBitRange(const std::vector<unsigned> &Bits);
-
-  virtual Init *resolveBitReference(Record &R, unsigned Bit);
+  virtual const Init *resolveBitReference(Record &R, const RecordVal *RV,
+                                          unsigned Bit) const;
+  virtual const Init *resolveListElementReference(Record &R,
+                                                  const RecordVal *RV,
+                                                  unsigned Elt) const;
 
-  virtual Init *resolveReferences(Record &R);
+  virtual const Init *resolveReferences(Record &R,
+                                        const RecordVal *RV) const;
 
-  virtual void print(std::ostream &OS) const {
-    Rec->print(OS); OS << "." << FieldName;
+  virtual std::string getAsString() const {
+    return Rec->getAsString() + "." + FieldName;
   }
 };
 
-/// DagInit - (def a, b) - Represent a DAG tree value.  DAG inits are required
-/// to have Records for their first value, after that, any legal Init is
-/// possible.
+/// DagInit - (v a, b) - Represent a DAG tree value.  DAG inits are required
+/// to have at least one value then a (possibly empty) list of arguments.  Each
+/// argument can have a name associated with it.
 ///
-class DagInit : public Init {
-  Record *NodeTypeDef;
-  std::vector<Init*> Args;
+class DagInit : public TypedInit {
+  const Init *Val;
+  std::string ValName;
+  std::vector<const Init*> Args;
   std::vector<std::string> ArgNames;
-public:
-  DagInit(Record *D, const std::vector<std::pair<Init*, std::string> > &args)
-    : NodeTypeDef(D) {
+
+  DagInit(const FoldingSetNodeID &ID, const Init *V, const std::string &VN,
+          const std::vector<std::pair<const Init*, std::string> > &args)
+      : TypedInit(ID, new DagRecTy), Val(V), ValName(VN) {
     Args.reserve(args.size());
     ArgNames.reserve(args.size());
     for (unsigned i = 0, e = args.size(); i != e; ++i) {
@@ -614,15 +1434,33 @@ public:
       ArgNames.push_back(args[i].second);
     }
   }
-  
-  virtual Init *convertInitializerTo(RecTy *Ty) {
+  DagInit(const FoldingSetNodeID &ID, const Init *V, const std::string &VN,
+          const std::vector<const Init*> &args,
+          const std::vector<std::string> &argNames)
+      : TypedInit(ID, new DagRecTy), Val(V), ValName(VN), Args(args),
+      ArgNames(argNames) { }
+
+  DagInit(const DagInit &Other);  // Do not define.
+  DagInit &operator=(const DagInit &Other);  // Do not define.
+
+public:
+  static const DagInit *Create(const Init *V, const std::string &VN,
+                               const std::vector<
+                                 std::pair<const Init*, std::string> > &args);
+  static const DagInit *Create(const Init *V, const std::string &VN,
+                               const std::vector<const Init*> &args,
+                               const std::vector<std::string> &argNames);
+
+  virtual const Init *convertInitializerTo(RecTy *Ty) const {
     return Ty->convertValue(this);
   }
 
-  Record *getNodeType() const { return NodeTypeDef; }
+  const Init *getOperator() const { return Val; }
+
+  const std::string &getName() const { return ValName; }
 
   unsigned getNumArgs() const { return Args.size(); }
-  Init *getArg(unsigned Num) const {
+  const Init *getArg(unsigned Num) const {
     assert(Num < Args.size() && "Arg number out of range!");
     return Args[Num];
   }
@@ -631,12 +1469,49 @@ public:
     return ArgNames[Num];
   }
 
-  void setArg(unsigned Num, Init *I) {
+  void setArg(unsigned Num, const Init *I) {
     assert(Num < Args.size() && "Arg number out of range!");
     Args[Num] = I;
   }
 
-  virtual void print(std::ostream &OS) const;
+  virtual const Init *resolveReferences(Record &R,
+                                        const RecordVal *RV) const;
+
+  virtual std::string getAsString() const;
+
+  typedef std::vector<const Init*>::iterator             arg_iterator;
+  typedef std::vector<const Init*>::const_iterator       const_arg_iterator;
+  typedef std::vector<std::string>::iterator       name_iterator;
+  typedef std::vector<std::string>::const_iterator const_name_iterator;
+
+  inline arg_iterator        arg_begin()       { return Args.begin(); }
+  inline const_arg_iterator  arg_begin() const { return Args.begin(); }
+  inline arg_iterator        arg_end  ()       { return Args.end();   }
+  inline const_arg_iterator  arg_end  () const { return Args.end();   }
+
+  inline size_t              arg_size () const { return Args.size();  }
+  inline bool                arg_empty() const { return Args.empty(); }
+
+  inline name_iterator       name_begin()       { return ArgNames.begin(); }
+  inline const_name_iterator name_begin() const { return ArgNames.begin(); }
+  inline name_iterator       name_end  ()       { return ArgNames.end();   }
+  inline const_name_iterator name_end  () const { return ArgNames.end();   }
+
+  inline size_t              name_size () const { return ArgNames.size();  }
+  inline bool                name_empty() const { return ArgNames.empty(); }
+
+  virtual const Init *resolveBitReference(Record &R, const RecordVal *RV,
+                                          unsigned Bit) const {
+    assert(0 && "Illegal bit reference off dag");
+    return 0;
+  }
+
+  virtual const Init *resolveListElementReference(Record &R,
+                                                  const RecordVal *RV,
+                                                  unsigned Elt) const {
+    assert(0 && "Illegal element reference off dag");
+    return 0;
+  }
 };
 
 //===----------------------------------------------------------------------===//
@@ -647,7 +1522,7 @@ class RecordVal {
   std::string Name;
   RecTy *Ty;
   unsigned Prefix;
-  Init *Value;
+  const Init *Value;
 public:
   RecordVal(const std::string &N, RecTy *T, unsigned P);
 
@@ -655,9 +1530,9 @@ public:
 
   unsigned getPrefix() const { return Prefix; }
   RecTy *getType() const { return Ty; }
-  Init *getValue() const { return Value; }
+  const Init *getValue() const { return Value; }
 
-  bool setValue(Init *V) {
+  bool setValue(const Init *V) {
     if (V) {
       Value = V->convertInitializerTo(Ty);
       return Value == 0;
@@ -667,49 +1542,70 @@ public:
   }
 
   void dump() const;
-  void print(std::ostream &OS, bool PrintSem = true) const;
+  void print(raw_ostream &OS, bool PrintSem = true) const;
 };
 
-inline std::ostream &operator<<(std::ostream &OS, const RecordVal &RV) {
+inline raw_ostream &operator<<(raw_ostream &OS, const RecordVal &RV) {
   RV.print(OS << "  ");
   return OS;
 }
 
-struct Record {
-  const std::string Name;
+class Record {
+  static unsigned LastID;
+
+  // Unique record ID.
+  unsigned ID;
+  std::string Name;
+  SMLoc Loc;
   std::vector<std::string> TemplateArgs;
   std::vector<RecordVal> Values;
   std::vector<Record*> SuperClasses;
+
+  // Tracks Record instances. Not owned by Record.
+  RecordKeeper &TrackedRecords;
+
 public:
 
-  Record(const std::string &N) : Name(N) {}
+  // Constructs a record.
+  explicit Record(const std::string &N, SMLoc loc, RecordKeeper &records) :
+    ID(LastID++), Name(N), Loc(loc), TrackedRecords(records) {}
   ~Record() {}
 
+
+  static unsigned getNewUID() { return LastID++; }
+
+
+  unsigned getID() const { return ID; }
+
   const std::string &getName() const { return Name; }
+  void setName(const std::string &Name);  // Also updates RecordKeeper.
+
+  SMLoc getLoc() const { return Loc; }
+
   const std::vector<std::string> &getTemplateArgs() const {
     return TemplateArgs;
   }
   const std::vector<RecordVal> &getValues() const { return Values; }
   const std::vector<Record*>   &getSuperClasses() const { return SuperClasses; }
 
-  bool isTemplateArg(const std::string &Name) const {
+  bool isTemplateArg(StringRef Name) const {
     for (unsigned i = 0, e = TemplateArgs.size(); i != e; ++i)
       if (TemplateArgs[i] == Name) return true;
     return false;
   }
 
-  const RecordVal *getValue(const std::string &Name) const {
+  const RecordVal *getValue(StringRef Name) const {
     for (unsigned i = 0, e = Values.size(); i != e; ++i)
       if (Values[i].getName() == Name) return &Values[i];
     return 0;
   }
-  RecordVal *getValue(const std::string &Name) {
+  RecordVal *getValue(StringRef Name) {
     for (unsigned i = 0, e = Values.size(); i != e; ++i)
       if (Values[i].getName() == Name) return &Values[i];
     return 0;
   }
 
-  void addTemplateArg(const std::string &Name) {
+  void addTemplateArg(StringRef Name) {
     assert(!isTemplateArg(Name) && "Template arg already defined!");
     TemplateArgs.push_back(Name);
   }
@@ -719,24 +1615,23 @@ public:
     Values.push_back(RV);
   }
 
-  void removeValue(const std::string &Name) {
-    assert(getValue(Name) && "Cannot remove an entry that does not exist!");
+  void removeValue(StringRef Name) {
     for (unsigned i = 0, e = Values.size(); i != e; ++i)
       if (Values[i].getName() == Name) {
         Values.erase(Values.begin()+i);
         return;
       }
-    assert(0 && "Name does not exist in record!");
+    assert(0 && "Cannot remove an entry that does not exist!");
   }
 
-  bool isSubClassOf(Record *R) const {
+  bool isSubClassOf(const Record *R) const {
     for (unsigned i = 0, e = SuperClasses.size(); i != e; ++i)
       if (SuperClasses[i] == R)
-       return true;
+        return true;
     return false;
   }
 
-  bool isSubClassOf(const std::string &Name) const {
+  bool isSubClassOf(StringRef Name) const {
     for (unsigned i = 0, e = SuperClasses.size(); i != e; ++i)
       if (SuperClasses[i]->getName() == Name)
         return true;
@@ -748,10 +1643,19 @@ public:
     SuperClasses.push_back(R);
   }
 
-  // resolveReferences - If there are any field references that refer to fields
-  // that have been filled in, we can propagate the values now.
-  //
-  void resolveReferences();
+  /// resolveReferences - If there are any field references that refer to fields
+  /// that have been filled in, we can propagate the values now.
+  ///
+  void resolveReferences() { resolveReferencesTo(0); }
+
+  /// resolveReferencesTo - If anything in this record refers to RV, replace the
+  /// reference to RV with the RHS of RV.  If RV is null, we resolve all
+  /// possible references.
+  void resolveReferencesTo(const RecordVal *RV);
+
+  RecordKeeper &getRecords() const {
+    return TrackedRecords;
+  }
 
   void dump() const;
 
@@ -762,65 +1666,100 @@ public:
   /// getValueInit - Return the initializer for a value with the specified name,
   /// or throw an exception if the field does not exist.
   ///
-  Init *getValueInit(const std::string &FieldName) const;
+  const Init *getValueInit(StringRef FieldName) const;
 
   /// getValueAsString - This method looks up the specified field and returns
   /// its value as a string, throwing an exception if the field does not exist
   /// or if the value is not a string.
   ///
-  std::string getValueAsString(const std::string &FieldName) const;
+  std::string getValueAsString(StringRef FieldName) const;
 
   /// getValueAsBitsInit - This method looks up the specified field and returns
   /// its value as a BitsInit, throwing an exception if the field does not exist
   /// or if the value is not the right type.
   ///
-  BitsInit *getValueAsBitsInit(const std::string &FieldName) const;
+  const BitsInit *getValueAsBitsInit(StringRef FieldName) const;
 
   /// getValueAsListInit - This method looks up the specified field and returns
   /// its value as a ListInit, throwing an exception if the field does not exist
   /// or if the value is not the right type.
   ///
-  ListInit *getValueAsListInit(const std::string &FieldName) const;
+  const ListInit *getValueAsListInit(StringRef FieldName) const;
+
+  /// getValueAsListOfDefs - This method looks up the specified field and
+  /// returns its value as a vector of records, throwing an exception if the
+  /// field does not exist or if the value is not the right type.
+  ///
+  std::vector<Record*> getValueAsListOfDefs(StringRef FieldName) const;
+
+  /// getValueAsListOfInts - This method looks up the specified field and
+  /// returns its value as a vector of integers, throwing an exception if the
+  /// field does not exist or if the value is not the right type.
+  ///
+  std::vector<int64_t> getValueAsListOfInts(StringRef FieldName) const;
+
+  /// getValueAsListOfStrings - This method looks up the specified field and
+  /// returns its value as a vector of strings, throwing an exception if the
+  /// field does not exist or if the value is not the right type.
+  ///
+  std::vector<std::string> getValueAsListOfStrings(StringRef FieldName) const;
 
   /// getValueAsDef - This method looks up the specified field and returns its
   /// value as a Record, throwing an exception if the field does not exist or if
   /// the value is not the right type.
   ///
-  Record *getValueAsDef(const std::string &FieldName) const;
+  Record *getValueAsDef(StringRef FieldName) const;
 
   /// getValueAsBit - This method looks up the specified field and returns its
   /// value as a bit, throwing an exception if the field does not exist or if
   /// the value is not the right type.
   ///
-  bool getValueAsBit(const std::string &FieldName) const;
+  bool getValueAsBit(StringRef FieldName) const;
 
   /// getValueAsInt - This method looks up the specified field and returns its
-  /// value as an int, throwing an exception if the field does not exist or if
-  /// the value is not the right type.
+  /// value as an int64_t, throwing an exception if the field does not exist or
+  /// if the value is not the right type.
   ///
-  int getValueAsInt(const std::string &FieldName) const;
+  int64_t getValueAsInt(StringRef FieldName) const;
 
   /// getValueAsDag - This method looks up the specified field and returns its
   /// value as an Dag, throwing an exception if the field does not exist or if
   /// the value is not the right type.
   ///
-  DagInit *getValueAsDag(const std::string &FieldName) const;
+  const DagInit *getValueAsDag(StringRef FieldName) const;
+
+  /// getValueAsCode - This method looks up the specified field and returns
+  /// its value as the string data in a CodeInit, throwing an exception if the
+  /// field does not exist or if the value is not a code object.
+  ///
+  std::string getValueAsCode(StringRef FieldName) const;
 };
 
-std::ostream &operator<<(std::ostream &OS, const Record &R);
+raw_ostream &operator<<(raw_ostream &OS, const Record &R);
+
+struct MultiClass {
+  Record Rec;  // Placeholder for template args and Name.
+  typedef std::vector<Record*> RecordVector;
+  RecordVector DefPrototypes;
+
+  void dump() const;
+
+  MultiClass(const std::string &Name, SMLoc Loc, RecordKeeper &Records) : 
+    Rec(Name, Loc, Records) {}
+};
 
 class RecordKeeper {
   std::map<std::string, Record*> Classes, Defs;
 public:
   ~RecordKeeper() {
     for (std::map<std::string, Record*>::iterator I = Classes.begin(),
-          E = Classes.end(); I != E; ++I)
+           E = Classes.end(); I != E; ++I)
       delete I->second;
     for (std::map<std::string, Record*>::iterator I = Defs.begin(),
-          E = Defs.end(); I != E; ++I)
+           E = Defs.end(); I != E; ++I)
       delete I->second;
   }
-  
+
   const std::map<std::string, Record*> &getClasses() const { return Classes; }
   const std::map<std::string, Record*> &getDefs() const { return Defs; }
 
@@ -841,6 +1780,19 @@ public:
     Defs.insert(std::make_pair(R->getName(), R));
   }
 
+  /// removeClass - Remove, but do not delete, the specified record.
+  ///
+  void removeClass(const std::string &Name) {
+    assert(Classes.count(Name) && "Class does not exist!");
+    Classes.erase(Name);
+  }
+  /// removeDef - Remove, but do not delete, the specified record.
+  ///
+  void removeDef(const std::string &Name) {
+    assert(Defs.count(Name) && "Def does not exist!");
+    Defs.erase(Name);
+  }
+
   //===--------------------------------------------------------------------===//
   // High-level helper methods, useful for tablegen backends...
 
@@ -850,13 +1802,27 @@ public:
   std::vector<Record*>
   getAllDerivedDefinitions(const std::string &ClassName) const;
 
-
   void dump() const;
 };
 
-std::ostream &operator<<(std::ostream &OS, const RecordKeeper &RK);
+/// LessRecord - Sorting predicate to sort record pointers by name.
+///
+struct LessRecord {
+  bool operator()(const Record *Rec1, const Record *Rec2) const {
+    return StringRef(Rec1->getName()).compare_numeric(Rec2->getName()) < 0;
+  }
+};
+
+/// LessRecordFieldName - Sorting predicate to sort record pointers by their
+/// name field.
+///
+struct LessRecordFieldName {
+  bool operator()(const Record *Rec1, const Record *Rec2) const {
+    return Rec1->getValueAsString("Name") < Rec2->getValueAsString("Name");
+  }
+};
 
-extern RecordKeeper Records;
+raw_ostream &operator<<(raw_ostream &OS, const RecordKeeper &RK);
 
 } // End llvm namespace