src/lib/support/Symbol.h

Go to the documentation of this file.

// -*-Mode: C++;-*-
// $Header: /m_home/m_utkej/Argonne/cvs2svn/cvs/OpenADFortTk/src/lib/support/Symbol.h,v 1.1 2007-10-08 18:28:33 utke Exp $

#ifndef Symbol_H 
#define Symbol_H

#include "Open64IRInterface/Open64BasicTypes.h"
#include "WhirlIDMaps.h"

namespace fortTkSupport { 

  class Symbol {
  public:
    Symbol();
    Symbol(const ST* st, WNId wnid, bool act);
    virtual ~Symbol();
  
    // -------------------------------------------------------
  
    // Return the WHIRL symbol
    ST* GetST() const { return st; }
    void SetST(const ST* x) { st = const_cast<ST*>(x); }
  
    // -------------------------------------------------------
  
    bool IsPathCollapsed() { return wnid != 0; }

    WNId GetPathVorlage() { return wnid; }
    void SetPathVorlage(WNId x) { wnid = x; }
  
    // -------------------------------------------------------
  
    // Is the symbol active in the AD sense
    bool IsActive() const { return active; }
    void SetActive(bool act) { active = act; }
  
    virtual void Dump(std::ostream& o = std::cerr) const;
    virtual void DDump() const;

  private:
    // These could make sense, but I just haven't implemented them yet
    Symbol(const Symbol& x) { }
    Symbol& operator=(const Symbol& x) { return *this; }

  private:
    ST* st;     // 
    WNId wnid;  // for a scalarized symbol
    bool active;
  };

}

#endif