001 /* Copyright 2000, 2001, Compaq Computer Corporation */ 002 003 /* IF THIS IS A JAVA FILE, DO NOT EDIT IT! 004 005 Most Java files in this directory which are part of the Javafe AST 006 are automatically generated using the astgen comment (see 007 ESCTools/Javafe/astgen) from the input file 'hierarchy.h'. If you 008 wish to modify AST classes or introduce new ones, modify 009 'hierarchy.j.' 010 */ 011 012 package escjava.ast; 013 014 import java.util.Hashtable; 015 import java.util.Set; 016 import java.util.ArrayList; 017 018 import javafe.ast.*; 019 import javafe.util.Assert; 020 import javafe.util.Location; 021 import escjava.ParsedRoutineSpecs; 022 023 // Convention: unless otherwise noted, integer fields named "loc" refer 024 // to the location of the first character of the syntactic unit 025 026 //# TagBase javafe.tc.TagConstants.LAST_TAG + 1 027 //# VisitorRoot javafe.ast.Visitor 028 029 030 public class SetStmtPragma extends StmtPragma 031 { 032 // set 'target' = 'value': 033 034 public /*@ non_null @*/ Expr target; 035 036 public int locOp; 037 038 public /*@ non_null @*/ Expr value; 039 040 public int loc; 041 042 043 public int getStartLoc() { return loc; } 044 public int getEndLoc() { return value.getEndLoc(); } 045 046 047 // Generated boilerplate constructors: 048 049 /** 050 * Construct a raw SetStmtPragma whose class invariant(s) have not 051 * yet been established. It is the caller's job to 052 * initialize the returned node's fields so that any 053 * class invariants hold. 054 */ 055 //@ requires I_will_establish_invariants_afterwards; 056 protected SetStmtPragma() {} //@ nowarn Invariant,NonNullInit; 057 058 059 // Generated boilerplate methods: 060 061 public final int childCount() { 062 return 2; 063 } 064 065 public final Object childAt(int index) { 066 /*throws IndexOutOfBoundsException*/ 067 if (index < 0) 068 throw new IndexOutOfBoundsException("AST child index " + index); 069 int indexPre = index; 070 071 int sz; 072 073 if (index == 0) return this.target; 074 else index--; 075 076 if (index == 0) return this.value; 077 else index--; 078 079 throw new IndexOutOfBoundsException("AST child index " + indexPre); 080 } //@ nowarn Exception; 081 082 public final String toString() { 083 return "[SetStmtPragma" 084 + " target = " + this.target 085 + " locOp = " + this.locOp 086 + " value = " + this.value 087 + " loc = " + this.loc 088 + "]"; 089 } 090 091 public final int getTag() { 092 return TagConstants.SETSTMTPRAGMA; 093 } 094 095 public final void accept(javafe.ast.Visitor v) { 096 if (v instanceof Visitor) ((Visitor)v).visitSetStmtPragma(this); 097 } 098 099 public final Object accept(javafe.ast.VisitorArgResult v, Object o) { 100 if (v instanceof VisitorArgResult) return ((VisitorArgResult)v).visitSetStmtPragma(this, o); else return null; 101 } 102 103 public void check() { 104 this.target.check(); 105 this.value.check(); 106 } 107 108 //@ ensures \result != null; 109 public static SetStmtPragma make(/*@ non_null @*/ Expr target, int locOp, /*@ non_null @*/ Expr value, int loc) { 110 //@ set I_will_establish_invariants_afterwards = true; 111 SetStmtPragma result = new SetStmtPragma(); 112 result.target = target; 113 result.locOp = locOp; 114 result.value = value; 115 result.loc = loc; 116 return result; 117 } 118 }