1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
|
/********************* */
/*! \file node.cpp
** \verbatim
** Original author: Dejan Jovanovic
** Major contributors: Morgan Deters
** Minor contributors (to current version): none
** This file is part of the CVC4 project.
** Copyright (c) 2009-2013 New York University and The University of Iowa
** See the file COPYING in the top-level source directory for licensing
** information.\endverbatim
**
** \brief Reference-counted encapsulation of a pointer to node information.
**
** Reference-counted encapsulation of a pointer to node information.
**/
#include "expr/node.h"
#include "expr/attribute.h"
#include "util/output.h"
#include <iostream>
#include <cstring>
using namespace std;
namespace CVC4 {
TypeCheckingExceptionPrivate::TypeCheckingExceptionPrivate(TNode node,
std::string message) throw() :
Exception(message),
d_node(new Node(node)) {
#ifdef CVC4_DEBUG
// yes, this leaks memory, but only in debug modes with exceptions occurring
s_debugLastException = strdup(toString().c_str());
#endif /* CVC4_DEBUG */
}
TypeCheckingExceptionPrivate::~TypeCheckingExceptionPrivate() throw () {
delete d_node;
}
void TypeCheckingExceptionPrivate::toStream(std::ostream& os) const throw() {
os << "Error during type checking: " << d_msg << std::endl << *d_node << endl << "The ill-typed expression: " << *d_node;
}
NodeTemplate<true> TypeCheckingExceptionPrivate::getNode() const throw() {
return *d_node;
}
UnknownTypeException::UnknownTypeException(TNode n) throw() :
TypeCheckingExceptionPrivate(n, "this expression contains an element of unknown type (such as an abstract value);"
" its type cannot be computed until it is substituted away") {
}
/** Is this node constant? (and has that been computed yet?) */
struct IsConstTag { };
struct IsConstComputedTag { };
typedef expr::Attribute<IsConstTag, bool> IsConstAttr;
typedef expr::Attribute<IsConstComputedTag, bool> IsConstComputedAttr;
template <bool ref_count>
bool NodeTemplate<ref_count>::isConst() const {
assertTNodeNotExpired();
Debug("isConst") << "Node::isConst() for: " << *this << std::endl;
if(isNull()) {
return false;
}
switch(getMetaKind()) {
case kind::metakind::CONSTANT:
Debug("isConst") << "Node::isConst() returning true, it's a CONSTANT" << std::endl;
return true;
case kind::metakind::VARIABLE:
Debug("isConst") << "Node::isConst() returning false, it's a VARIABLE" << std::endl;
return false;
default:
if(expr::TypeChecker::neverIsConst(NodeManager::currentNM(), *this)){
Debug("isConst") << "Node::isConst() returning false, the kind is never const" << std::endl;
return false;
}
if(getAttribute(IsConstComputedAttr())) {
bool bval = getAttribute(IsConstAttr());
Debug("isConst") << "Node::isConst() returning cached value " << (bval ? "true" : "false") << " for: " << *this << std::endl;
return bval;
} else {
bool bval = expr::TypeChecker::computeIsConst(NodeManager::currentNM(), *this);
Debug("isConst") << "Node::isConst() computed value " << (bval ? "true" : "false") << " for: " << *this << std::endl;
const_cast< NodeTemplate<ref_count>* >(this)->setAttribute(IsConstAttr(), bval);
const_cast< NodeTemplate<ref_count>* >(this)->setAttribute(IsConstComputedAttr(), true);
return bval;
}
}
}
template bool NodeTemplate<true>::isConst() const;
template bool NodeTemplate<false>::isConst() const;
}/* CVC4 namespace */
|
