import java.util.*;
public class VarExpr extends Expr {
- static boolean DOMEMCHECKS=true;
+ static boolean DOMEMCHECKS=false;
static boolean DOTYPECHECKS=false;
static boolean DONULL=false;
return hs;
}
+ public Expr getLower() {
+ return vd.getLower();
+ }
+
+ public Expr getUpper() {
+ return vd.getUpper();
+ }
+
+ public SetDescriptor getSet() {
+ if (vd==null)
+ return null;
+ return vd.getSet();
+ }
+
public VarExpr(String varname) {
- this.varname = varname;
+ this.varname = varname;
}
public VarExpr(VarDescriptor vd) {
this.vd=vd;
varname=vd.getSymbol();
- this.td = vd.getType();
+ this.td = vd.getType();
}
public String name() {
return false;
}
+ public Set useDescriptor(Descriptor d) {
+ HashSet newset=new HashSet();
+ if (d==vd)
+ newset.add(this);
+ return newset;
+ }
+
public boolean isNonNull() {
return true;
}
}
public Set getRequiredDescriptors() {
- return new HashSet();
+ Set s=new HashSet();
+ s.add(vd);
+ return s;
+
}
-
+
public VarDescriptor getVar() {
return vd;
}
return vd.isGlobal();
}
- public void generate(CodeWriter writer, VarDescriptor dest) {
+ public boolean isInvariant(Set vars) {
+ return vd.isGlobal()||vars.contains(vd);
+ }
- // #TBD#: bit of a hack, really should have been type checked properly
+ public Set findInvariants(Set vars) {
+ if (isInvariant(vars)) {
+ Set s=new HashSet();
+ s.add(this);
+ return s;
+ } else
+ return new HashSet();
+ }
- vd = (VarDescriptor) writer.getSymbolTable().get(varname);
+ public void generate(CodeWriter writer, VarDescriptor dest) {
+ // #TBD#: bit of a hack, really should have been type checked properly
assert vd != null;
assert vd.getType() != null;
- this.td = vd.getType();
-
+ this.td = vd.getType();
+
+ if (writer.getInvariantValue()!=null&&
+ writer.getInvariantValue().isInvariant(this)) {
+ writer.addDeclaration(vd.getType().getGenerateType().getSafeSymbol(),dest.getSafeSymbol());
+ writer.outputline(dest.getSafeSymbol()+"="+writer.getInvariantValue().getValue(this).getSafeSymbol()+";");
+ writer.outputline("maybe="+writer.getInvariantValue().getMaybe(this).getSafeSymbol()+";");
+ return;
+ }
- writer.outputline(vd.getType().getGenerateType().getSafeSymbol() + " " + dest.getSafeSymbol() +
- " = (" + vd.getType().getGenerateType().getSafeSymbol() + ") " + vd.getSafeSymbol() + "; //varexpr");
+ writer.addDeclaration(vd.getType().getGenerateType().getSafeSymbol(),dest.getSafeSymbol());
+ writer.outputline(dest.getSafeSymbol() +
+ " = (" + vd.getType().getGenerateType().getSafeSymbol() + ") " + vd.getSafeSymbol() + "; /*varexpr*/");
if (vd.isGlobal() && (DOTYPECHECKS||DOMEMCHECKS) && (td instanceof StructureTypeDescriptor)) {
VarDescriptor typevar=VarDescriptor.makeNew("typechecks");
writer.outputline("if ("+dest.getSafeSymbol()+")");
writer.startblock();
- if (DOTYPECHECKS)
- writer.outputline("bool "+typevar.getSafeSymbol()+"=assertvalidtype(" + dest.getSafeSymbol() + ", " + td.getId() + ");");
- else
- writer.outputline("bool "+typevar.getSafeSymbol()+"=assertvalidmemory(" + dest.getSafeSymbol() + ", " + td.getId() + ");");
+ if (DOTYPECHECKS) {
+ writer.addDeclaration("bool",typevar.getSafeSymbol());
+ writer.outputline(typevar.getSafeSymbol()+"=assertvalidtype(" + dest.getSafeSymbol() + ", " + td.getId() + ");");
+ } else {
+ writer.addDeclaration("bool",typevar.getSafeSymbol());
+ writer.outputline(typevar.getSafeSymbol()+"=assertvalidmemory(" + dest.getSafeSymbol() + ", " + td.getId() + ");");
+ }
writer.outputline("if (!"+typevar.getSafeSymbol()+")");
writer.startblock();
writer.outputline(dest.getSafeSymbol()+"=0;");
public TypeDescriptor typecheck(SemanticAnalyzer sa) {
typechecked = true;
vd = (VarDescriptor) sa.getSymbolTable().get(varname);
-
if (vd == null) {
- System.out.println(varname);
+ //System.out.println(varname);
sa.getErrorReporter().report(null, "Undefined variable '" + varname + "'");
return null;
}
-
assert vd.getType() != null;
-
this.td = vd.getType();
return this.td;
}
-
}