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 ImportPragma extends LexicalPragma
031    {
032      public /*@ non_null @*/ ImportDecl decl;
033    
034      public int loc;
035    
036    
037      public int getStartLoc() { return loc; }
038    
039    
040    // Generated boilerplate constructors:
041    
042      /**
043       * Construct a raw ImportPragma whose class invariant(s) have not
044       * yet been established.  It is the caller's job to
045       * initialize the returned node's fields so that any
046       * class invariants hold.
047       */
048      //@ requires I_will_establish_invariants_afterwards;
049      protected ImportPragma() {}    //@ nowarn Invariant,NonNullInit;
050    
051    
052    // Generated boilerplate methods:
053    
054      public final int childCount() {
055         return 1;
056      }
057    
058      public final Object childAt(int index) {
059              /*throws IndexOutOfBoundsException*/
060         if (index < 0)
061            throw new IndexOutOfBoundsException("AST child index " + index);
062         int indexPre = index;
063    
064         int sz;
065    
066         if (index == 0) return this.decl;
067         else index--;
068    
069         throw new IndexOutOfBoundsException("AST child index " + indexPre);
070      }   //@ nowarn Exception;
071    
072      public final String toString() {
073         return "[ImportPragma"
074            + " decl = " + this.decl
075            + " loc = " + this.loc
076            + "]";
077      }
078    
079      public final int getTag() {
080         return TagConstants.IMPORTPRAGMA;
081      }
082    
083      public final void accept(javafe.ast.Visitor v) { 
084        if (v instanceof Visitor) ((Visitor)v).visitImportPragma(this);
085      }
086    
087      public final Object accept(javafe.ast.VisitorArgResult v, Object o) { 
088        if (v instanceof VisitorArgResult) return ((VisitorArgResult)v).visitImportPragma(this, o); else return null;
089      }
090    
091      public void check() {
092         this.decl.check();
093      }
094    
095      //@ ensures \result != null;
096      public static ImportPragma make(/*@ non_null @*/ ImportDecl decl, int loc) {
097         //@ set I_will_establish_invariants_afterwards = true;
098         ImportPragma result = new ImportPragma();
099         result.decl = decl;
100         result.loc = loc;
101         return result;
102      }
103    }