15.4.1  src/app/burg/burg-ast.pkg

# 
# burg-ast.pkg
#
# Abstract syntax trees for BURG specifications.
#
# $Log: burg-ast.pkg, v $
# Revision 1.2  2000/06/01 18:33:42  monnier
# bring revisions from the vendor branch to the trunk
#
# Revision 1.1.1.8  1999/04/17 18:56:03  monnier
# version 110.16
#
# Revision 1.1.1.1  1997/01/14 01:37:59  george
#   Version 109.24
#
# Revision 1.1.1.2  1997/01/11  18:52:28  george
#   mythryl-burg Version 109.24
#
# Revision 1.1.1.1  1996/01/31  16:01:24  george
# Version 109

# Compiled by:
#     src/app/burg/mythryl-burg.lib



package burg_ast {


     Decl_Ast = START  String
                      | TERM   List ((String, Null_Or( String )) )
                      | TERMPREFIX  String
                      | RULEPREFIX  String
                      | BEGIN_API  String;

     Pattern_Ast = PAT  ((String, List( Pattern_Ast )) );

     Rule_Ast = RULE  ((String, Pattern_Ast, String, List Int));

     Spec_Ast = SPEC  { head:  List( String ),
                                 decls:  List( Decl_Ast ), 
                                 rules:  List( Rule_Ast ),
                                 tail:  List( String ) };
}; #  BurgAST