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    }