You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
75 lines
1.9 KiB
75 lines
1.9 KiB
15 years ago
|
#include "antlr/ASTRefCount.hpp"
|
||
|
|
#include "antlr/AST.hpp"
|
||
|
|
|
||
|
|
ANTLR_BEGIN_NAMESPACE(antlr)
|
||
|
|
|
||
|
|
/**
|
||
|
|
* <b>SOFTWARE RIGHTS</b>
|
||
|
|
* <p>
|
||
|
|
* ANTLR 2.6.0 MageLang Insitute, 1999
|
||
|
|
* <p>
|
||
|
|
* We reserve no legal rights to the ANTLR--it is fully in the
|
||
|
|
* public domain. An individual or company may do whatever
|
||
|
|
* they wish with source code distributed with ANTLR or the
|
||
|
|
* code generated by ANTLR, including the incorporation of
|
||
|
|
* ANTLR, or its output, into commerical software.
|
||
|
|
* <p>
|
||
|
|
* We encourage users to develop software with ANTLR. However,
|
||
|
|
* we do ask that credit is given to us for developing
|
||
|
|
* ANTLR. By "credit", we mean that if you use ANTLR or
|
||
|
|
* incorporate any source code into one of your programs
|
||
|
|
* (commercial product, research project, or otherwise) that
|
||
|
|
* you acknowledge this fact somewhere in the documentation,
|
||
|
|
* research report, etc... If you like ANTLR and have
|
||
|
|
* developed a nice tool with the output, please mention that
|
||
|
|
* you developed it using ANTLR. In addition, we ask that the
|
||
|
|
* headers remain intact in our source code. As long as these
|
||
|
|
* guidelines are kept, we expect to continue enhancing this
|
||
|
|
* system and expect to make other tools available as they are
|
||
|
|
* completed.
|
||
|
|
* <p>
|
||
|
|
* The ANTLR gang:
|
||
|
|
* @version ANTLR 2.6.0 MageLang Insitute, 1999
|
||
|
|
* @author Terence Parr, <a href=http://www.MageLang.com>MageLang Institute</a>
|
||
|
|
* @author <br>John Lilley, <a href=http://www.Empathy.com>Empathy Software</a>
|
||
|
|
* @author <br><a href="mailto:pete@yamuna.demon.co.uk">Pete Wells</a>
|
||
|
|
*/
|
||
|
|
|
||
|
|
ASTRef::ASTRef(AST* p)
|
||
|
|
: ptr(p), count(1)
|
||
|
|
{
|
||
|
|
if (p && !p->ref)
|
||
|
|
p->ref = this;
|
||
|
|
}
|
||
|
|
|
||
|
|
ASTRef::~ASTRef()
|
||
|
|
{
|
||
|
|
delete ptr;
|
||
|
|
}
|
||
|
|
|
||
|
|
ASTRef* ASTRef::increment()
|
||
|
|
{
|
||
|
|
++count;
|
||
|
|
return this;
|
||
|
|
}
|
||
|
|
|
||
|
|
bool ASTRef::decrement()
|
||
|
|
{
|
||
|
|
return (--count==0);
|
||
|
|
}
|
||
|
|
|
||
|
|
ASTRef* ASTRef::getRef(const AST* p)
|
||
|
|
{
|
||
|
|
if (p) {
|
||
|
|
AST* pp = const_cast<AST*>(p);
|
||
|
|
if (pp->ref)
|
||
|
|
return pp->ref->increment();
|
||
|
|
else
|
||
|
|
return new ASTRef(pp);
|
||
|
|
} else
|
||
|
|
return 0;
|
||
|
|
}
|
||
|
|
|
||
|
|
ANTLR_END_NAMESPACE
|
||
|
|
|