Main = . //DH-full //-------------------- // Copyright (C) 1991 Northeastern University. // Permission is granted to any individual or institution to use, copy, modify, // and distribute this class dictionary, provided that this complete copyright // and permission notice is maintained, intact, in all copies and supporting // documentation. Cd_graph = < adjacencies > Nlist(Adjacency) . Adjacency = < source > Vertex ["(" < parameters> Comma_list(Vertex) ")"] < ns > Neighbors "." . Neighbors : Neighbors_wc | Repetit_n *common*. Neighbors_wc : Construct_ns | Alternat_ns *common* < construct_ns > List(Any_vertex). Construct_ns = "=". Alternat_ns = ":" < alternat_ns > Bar_list(Term) [ Common]. Common = "*common*". Repetit_n = "~" Sandwich(Kernel). Kernel = [ Term ] "{" Sandwich(Term) "}". Any_vertex : Opt_labeled_term | Optional_term | Syntax_vertex . Vertex = < vertex_name > Ident. Syntax_vertex : Regular_syntax | Print_command *common*. Print_command : Print_indent | Print_unindent | Print_skip | Print_space *common*. Print_indent = "+" . Print_unindent = "-" . Print_skip = "*l" . Print_space = "*s" . Regular_syntax = < string > String . Opt_labeled_term : Labeled | Regular *common* Term. Regular = . Labeled = "<" < label_name > Ident ">" . Term : Normal *common* Vertex ["@" Module_name] ["(" Comma_list(Term) ")" ] . Module_name = Ident. Normal = . Optional_term = "[" Sandwich(Opt_labeled_term) "]". // parameterized classes List(S) ~ {S}. Nlist(S) ~ S {S}. Bar_list(S) ~ S {"|" S}. Comma_list(S) ~ S {"," S}. Sandwich(S) = List(Syntax_vertex) S List(Syntax_vertex) .