typedef union
{
- exprNode expr;
- /*@only@*/ sRef sref;
+ /*@exposed@*/ exprNode expr;
+ /*@exposed@*/ sRef sref;
int intlit;
} constraintTermValue;
} constraintTermType;
struct _constraintTerm {
- fileloc loc;
- constraintTermValue value;
+ /*@only@*/ fileloc loc;
+ constraintTermValue value;
constraintTermType kind;
};
abst_typedef struct _constraintTerm * constraintTerm;
-
+extern constraintTermType constraintTerm_getKind (constraintTerm) ;
+extern /*@exposed@*/ sRef constraintTerm_getSRef (constraintTerm) ;
extern /*@falsenull@*/ bool constraintTerm_isDefined (constraintTerm p_e) /*@*/;
extern /*@unused@*/ /*@truenull@*/ bool constraintTerm_isUndefined (constraintTerm p_e) /*@*/ ;
constraintTerm constraintTerm_simplify (/*@returned@*/ constraintTerm term) /*@modifies term@*/ ;
-constraintTerm constraintTerm_makeExprNode (/*@only@*/ exprNode e) /*@*/;
+/*@only@*/ constraintTerm constraintTerm_makeExprNode (/*@exposed@*/ exprNode e) /*@*/;
constraintTerm constraintTerm_copy (constraintTerm term) /*@*/;
//constraintTerm exprNode_makeConstraintTerm ( exprNode e) /*@*/;
-bool constraintTerm_same (constraintTerm term1, constraintTerm term2) /*@*/;
+//bool constraintTerm_same (constraintTerm term1, constraintTerm term2) /*@*/;
bool constraintTerm_similar (constraintTerm term1, constraintTerm term2) /*@*/;
cstring constraintTerm_print (constraintTerm term) /*@*/;
-constraintTerm constraintTerm_makesRef (/*@only@*/ sRef s) /*@*/;
+constraintTerm constraintTerm_makesRef (/*@exposed@*/ sRef s) /*@*/;
-bool constraintTerm_probSame (constraintTerm term1, constraintTerm term2) /*@*/;
+/*@unused@*/ bool constraintTerm_probSame (constraintTerm term1, constraintTerm term2) /*@*/;
constraintTerm constraintTerm_setFileloc (/*@returned@*/ constraintTerm term, fileloc loc) /*@modifies term@*/;
cstring constraintTerm_getStringLiteral (constraintTerm c) /*@*/;
-constraintTerm
-constraintTerm_doSRefFixBaseParam (constraintTerm term, exprNodeList arglist) /*@modifies term@*/;
+constraintTerm constraintTerm_doSRefFixBaseParam (/*@returned@*/ constraintTerm term, exprNodeList arglist) /*@modifies term@*/;
#else