coins.ffront
クラス F77Sym

java.lang.Object
  |
  +--coins.ffront.F77Sym

public class F77Sym
extends java.lang.Object


フィールドの概要
(パッケージプライベート)  FirList commonList
           
(パッケージプライベート)  FirList dataList
           
(パッケージプライベート)  FirList dimensionList
           
(パッケージプライベート)  FirList entryStmtList
           
(パッケージプライベート)  FirList equivList
           
(パッケージプライベート)  FirList externalList
           
(パッケージプライベート)  FirToHir fFirToHir
           
(パッケージプライベート)  java.util.Map formatMap
           
(パッケージプライベート)  FirList implicitList
           
(パッケージプライベート)  HeaderStmt programHeader
           
(パッケージプライベート)  java.lang.String programName
           
(パッケージプライベート)  FirList saveVarsList
           
(パッケージプライベート)  FirList typedDeclList
           
 
コンストラクタの概要
F77Sym(SymRoot sRoot, HirRoot hRoot, IoRoot iRoot, F77Hir fir)
           
 
メソッドの概要
 Node arrayDecl(Token pIdent, Node pDim, Node pOptLength)
          make Fir node of array declaration [f77.jay] one_declaration : IDENT dims opt_length_spec { $$ = fSym.arrayDecl($1, $2, $3); } common_var : IDENT dims { $$ = fSym.arrayDecl($1, $2, null); }
 Node block(Token p1, Node p2)
           
 Node blockDataStmt(Node p1, Node p2)
           
 char checkLetter(java.lang.String letter)
           
 FStmt commonDecl(FirList p1)
          add declaration list to commonList ???
 FStmt dataDecl(FirList p1)
          add declaration list to dataDeclList ???
 void debugPrint(int level, java.lang.String pMsg)
           
 FStmt declList(Node pType, FirList pList)
          add declaration list to dimensionList or typedDeclList [f77.jay] data_spec_stmt : type declaration_list { $$ = fSym.declList($1, $2); }
 Node dim(Node p1, Node p2)
           
 Node entryStmt(Token pIdent, FirList pArgs)
          make Fir node of entry statement and add it to entryStmtList [f77.jay] entry_stmt : opt_label_def ENTRY IDENT subr_dummy_args { $$ = fSym.entryStmt($3, $4); }
 FStmt equivalenceDecl(Node p1)
          add declaration list to equivalenceList ???
 FStmt externalDecl(Node p1)
          add declaration list to externalList.
 Node funcStmt(Node pType, Token pIdent, FirList pArgs)
          make Fir node of function header statement [f77.jay] function_stmt : opt_label_def type FUNCTION IDENT func_dummy_args { $$ = fSym.funcStmt($2, $4, $5); } | opt_label_def FUNCTION IDENT func_dummy_args { $$ = fSym.funcStmt(null, $3, $4); }
 Node impItem(Node p1, Node p2, Node p3)
           
 FStmt implicitDecl(FirList p1)
          add declaration list to implicitList ???
 void initialize()
           
 FStmt intrinsicDecl(Node p1)
          [f77.jay] functional_spec_stmt : INTRINSIC intrinsic_decl { $$ = fSym.intrinsicDecl($2); }
 Node letterGroup(Token p1, Token p2)
           
 FirList list()
           
 FirList list(java.lang.Object pElem)
           
 Token modifiedToken(Token t)
          Add an instance of FirToHir to Token
(パッケージプライベート)  void p(java.lang.String str)
           
 Pair pair(Node n1, Node n2)
           
 FStmt parameterDecl(Node p1)
          add declaration list to paramList ???
 void print(int level)
           
 Node programStmt(Token pName)
          set main program name [f77.jay] program_stmt : opt_label_def PROGRAM IDENT EOS { $$ = fSym.programStmt($3); }
 void registFormat(Token label, java.lang.String formatstring)
           
 FStmt saveDecl(Node p1)
          add declaration list to saveList ???
 Node scalarDecl(Token pIdent, Node pOptLength)
          make Fir node of scalar declaration [f77.jay] one_declaration : IDENT opt_length_spec { $$ = fSym.scalarDecl($1, $2); } common_var : IDENT { $$ = fSym.scalarDecl($1, null);; }
 void setProgramHeader(FStmt pHeader)
           
 Node subrStmt(Token pIdent, FirList pArgs)
          make Fir node of subroutine header statement [f77.jay] subroutine_stmt : opt_label_def SUBROUTINE IDENT subr_dummy_args { $$ = fSym.subrStmt($3, $4); }
 Node type(Token pType, Node pOptLength)
          make Fir node of type declaration [f77.jay] type : type_name opt_length_spec { $$ = fSym.type($1, $2); } | DIMENSION { $$ = $1; }
 
クラス java.lang.Object から継承したメソッド
clone, equals, finalize, getClass, hashCode, notify, notifyAll, toString, wait, wait, wait
 

フィールドの詳細

fFirToHir

FirToHir fFirToHir

dimensionList

FirList dimensionList

typedDeclList

FirList typedDeclList

implicitList

FirList implicitList

entryStmtList

FirList entryStmtList

externalList

FirList externalList

dataList

FirList dataList

commonList

FirList commonList

equivList

FirList equivList

saveVarsList

FirList saveVarsList

formatMap

java.util.Map formatMap

programName

java.lang.String programName

programHeader

HeaderStmt programHeader
コンストラクタの詳細

F77Sym

public F77Sym(SymRoot sRoot,
              HirRoot hRoot,
              IoRoot iRoot,
              F77Hir fir)
メソッドの詳細

initialize

public void initialize()

debugPrint

public void debugPrint(int level,
                       java.lang.String pMsg)

print

public void print(int level)

list

public FirList list(java.lang.Object pElem)

list

public FirList list()

pair

public Pair pair(Node n1,
                 Node n2)

modifiedToken

public Token modifiedToken(Token t)
Add an instance of FirToHir to Token

パラメータ:
t - old Token
戻り値:
modified Token

setProgramHeader

public void setProgramHeader(FStmt pHeader)

funcStmt

public Node funcStmt(Node pType,
                     Token pIdent,
                     FirList pArgs)
make Fir node of function header statement [f77.jay] function_stmt : opt_label_def type FUNCTION IDENT func_dummy_args { $$ = fSym.funcStmt($2, $4, $5); } | opt_label_def FUNCTION IDENT func_dummy_args { $$ = fSym.funcStmt(null, $3, $4); }

パラメータ:
pType -
pIdent -
pArgs -
戻り値:
function header statement.

subrStmt

public Node subrStmt(Token pIdent,
                     FirList pArgs)
make Fir node of subroutine header statement [f77.jay] subroutine_stmt : opt_label_def SUBROUTINE IDENT subr_dummy_args { $$ = fSym.subrStmt($3, $4); }

パラメータ:
pIdent -
pArgs -
戻り値:
subroutine header.

entryStmt

public Node entryStmt(Token pIdent,
                      FirList pArgs)
make Fir node of entry statement and add it to entryStmtList [f77.jay] entry_stmt : opt_label_def ENTRY IDENT subr_dummy_args { $$ = fSym.entryStmt($3, $4); }

パラメータ:
pIdent -
pArgs -
戻り値:
entry statement.

programStmt

public Node programStmt(Token pName)
set main program name [f77.jay] program_stmt : opt_label_def PROGRAM IDENT EOS { $$ = fSym.programStmt($3); }

パラメータ:
pName -
戻り値:
null.

blockDataStmt

public Node blockDataStmt(Node p1,
                          Node p2)

declList

public FStmt declList(Node pType,
                      FirList pList)
add declaration list to dimensionList or typedDeclList [f77.jay] data_spec_stmt : type declaration_list { $$ = fSym.declList($1, $2); }

パラメータ:
pType -
pList -
戻り値:
null.

commonDecl

public FStmt commonDecl(FirList p1)
add declaration list to commonList ??? not yet [f77.jay] data_spec_stmt : COMMON common_decl { $$ = fSym.commonDecl($2); }

パラメータ:
p1 -
戻り値:
null.

equivalenceDecl

public FStmt equivalenceDecl(Node p1)
add declaration list to equivalenceList ??? not yet [f77.jay] data_spec_stmt : EQUIVALENCE equivalence_decl { $$ = fSym.equivalenceDecl($2); }

パラメータ:
p1 -
戻り値:
equivalence list.

dataDecl

public FStmt dataDecl(FirList p1)
add declaration list to dataDeclList ??? not yet [f77.jay] data_spec_stmt : DATA data_decl { $$ = fSym.dataDecl($2); }

パラメータ:
p1 -
戻り値:
null.

implicitDecl

public FStmt implicitDecl(FirList p1)
add declaration list to implicitList ??? not yet [f77.jay] data_spec_stmt : IMPLICIT implicit_decl { $$ = fSym.implicitDecl($2); }

パラメータ:
p1 - declaration list.
戻り値:
null.

saveDecl

public FStmt saveDecl(Node p1)
add declaration list to saveList ??? not yet [f77.jay] data_spec_stmt : SAVE opt_save_list { $$ = fSym.saveDecl($2); }

パラメータ:
p1 -
戻り値:
null.

parameterDecl

public FStmt parameterDecl(Node p1)
add declaration list to paramList ??? not yet [f77.jay] data_spec_stmt : PARAM '(' const_list ')' { $$ = fSym.parameterDecl($3); }

パラメータ:
p1 -
戻り値:
parameter list.

externalDecl

public FStmt externalDecl(Node p1)
add declaration list to externalList. [f77.jay] functional_spec_stmt : EXTERNAL external_decl { $$ = fSym.externalDecl($2); }

パラメータ:
p1 -
戻り値:
null.

intrinsicDecl

public FStmt intrinsicDecl(Node p1)
[f77.jay] functional_spec_stmt : INTRINSIC intrinsic_decl { $$ = fSym.intrinsicDecl($2); }

パラメータ:
p1 -
戻り値:
intrinsic declaration.

arrayDecl

public Node arrayDecl(Token pIdent,
                      Node pDim,
                      Node pOptLength)
make Fir node of array declaration [f77.jay] one_declaration : IDENT dims opt_length_spec { $$ = fSym.arrayDecl($1, $2, $3); } common_var : IDENT dims { $$ = fSym.arrayDecl($1, $2, null); }

パラメータ:
pIdent -
pDim -
pOptLength -
戻り値:
array declaration node.

scalarDecl

public Node scalarDecl(Token pIdent,
                       Node pOptLength)
make Fir node of scalar declaration [f77.jay] one_declaration : IDENT opt_length_spec { $$ = fSym.scalarDecl($1, $2); } common_var : IDENT { $$ = fSym.scalarDecl($1, null);; }

パラメータ:
pIdent -
pOptLength -
戻り値:
scalar declaration.

type

public Node type(Token pType,
                 Node pOptLength)
make Fir node of type declaration [f77.jay] type : type_name opt_length_spec { $$ = fSym.type($1, $2); } | DIMENSION { $$ = $1; }

パラメータ:
pType -
pOptLength -
戻り値:
type declaration.

block

public Node block(Token p1,
                  Node p2)

dim

public Node dim(Node p1,
                Node p2)

registFormat

public void registFormat(Token label,
                         java.lang.String formatstring)

impItem

public Node impItem(Node p1,
                    Node p2,
                    Node p3)

letterGroup

public Node letterGroup(Token p1,
                        Token p2)

checkLetter

public char checkLetter(java.lang.String letter)

p

void p(java.lang.String str)