src/Pure/Syntax/ROOT.ML
author wenzelm
Mon, 04 Oct 1993 15:30:49 +0100
changeset 18 c9ec452ff08f
parent 0 a5a9c433f639
child 42 d981488bda7b
permissions -rw-r--r--
lots of internal cleaning and tuning; removed {parse,print}_{pre,post}_proc; new lexer: now human readable due to scanner combinators; new parser installed, but still inactive (due to grammar ambiguities); added Syntax.test_read; typ_of_term: sorts now made distinct and sorted; mixfix: added forced line breaks (//); PROP now printed before subterm of type prop with non-const head;
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
18
c9ec452ff08f lots of internal cleaning and tuning;
wenzelm
parents: 0
diff changeset
     1
(*  Title:      Pure/Syntax/ROOT.ML
0
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
     2
    ID:         $Id$
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
     3
    Author:     Tobias Nipkow and Markus Wenzel, TU Muenchen
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
     4
18
c9ec452ff08f lots of internal cleaning and tuning;
wenzelm
parents: 0
diff changeset
     5
This file builds the syntax module.
0
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
     6
*)
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
     7
18
c9ec452ff08f lots of internal cleaning and tuning;
wenzelm
parents: 0
diff changeset
     8
use "lib.ML";   (* FIXME *)
c9ec452ff08f lots of internal cleaning and tuning;
wenzelm
parents: 0
diff changeset
     9
c9ec452ff08f lots of internal cleaning and tuning;
wenzelm
parents: 0
diff changeset
    10
use "pretty.ML";
c9ec452ff08f lots of internal cleaning and tuning;
wenzelm
parents: 0
diff changeset
    11
0
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    12
use "ast.ML";
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    13
use "xgram.ML";
18
c9ec452ff08f lots of internal cleaning and tuning;
wenzelm
parents: 0
diff changeset
    14
use "lexicon.ML";
0
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    15
use "extension.ML";
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    16
use "parse_tree.ML";
18
c9ec452ff08f lots of internal cleaning and tuning;
wenzelm
parents: 0
diff changeset
    17
use "parser.ML";
c9ec452ff08f lots of internal cleaning and tuning;
wenzelm
parents: 0
diff changeset
    18
use "earley0A.ML";        (* FIXME *)
0
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    19
use "type_ext.ML";
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    20
use "sextension.ML";
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    21
use "printer.ML";
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    22
use "syntax.ML";
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    23
18
c9ec452ff08f lots of internal cleaning and tuning;
wenzelm
parents: 0
diff changeset
    24
structure Pretty = PrettyFun();
c9ec452ff08f lots of internal cleaning and tuning;
wenzelm
parents: 0
diff changeset
    25
c9ec452ff08f lots of internal cleaning and tuning;
wenzelm
parents: 0
diff changeset
    26
structure Ast = AstFun(Pretty);
0
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    27
structure XGram = XGramFun(Ast);
18
c9ec452ff08f lots of internal cleaning and tuning;
wenzelm
parents: 0
diff changeset
    28
structure Lexicon = LexiconFun();
c9ec452ff08f lots of internal cleaning and tuning;
wenzelm
parents: 0
diff changeset
    29
structure Extension = ExtensionFun(structure XGram = XGram and Lexicon = Lexicon);
c9ec452ff08f lots of internal cleaning and tuning;
wenzelm
parents: 0
diff changeset
    30
structure ParseTree = ParseTreeFun(structure Ast = Ast and Lexicon = Lexicon);
c9ec452ff08f lots of internal cleaning and tuning;
wenzelm
parents: 0
diff changeset
    31
structure Parser = ParserFun(structure Symtab = Symtab and XGram = XGram
c9ec452ff08f lots of internal cleaning and tuning;
wenzelm
parents: 0
diff changeset
    32
  and ParseTree = ParseTree);
c9ec452ff08f lots of internal cleaning and tuning;
wenzelm
parents: 0
diff changeset
    33
structure Earley = EarleyFun(structure Symtab = Symtab and XGram = XGram
c9ec452ff08f lots of internal cleaning and tuning;
wenzelm
parents: 0
diff changeset
    34
  and ParseTree = ParseTree);     (* FIXME *)
0
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    35
structure TypeExt = TypeExtFun(structure Extension = Extension
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    36
  and Lexicon = Lexicon);
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    37
structure SExtension = SExtensionFun(structure TypeExt = TypeExt
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    38
  and Lexicon = Lexicon);
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    39
structure Printer = PrinterFun(structure Symtab = Symtab and Lexicon = Lexicon
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    40
  and TypeExt = TypeExt and SExtension = SExtension and Pretty = Pretty);
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    41
structure Syntax = SyntaxFun(structure Symtab = Symtab and TypeExt = TypeExt
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    42
  and Parser = Earley and SExtension = SExtension and Printer = Printer);
18
c9ec452ff08f lots of internal cleaning and tuning;
wenzelm
parents: 0
diff changeset
    43
     (* FIXME  ^^^^^^ *)
0
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    44
18
c9ec452ff08f lots of internal cleaning and tuning;
wenzelm
parents: 0
diff changeset
    45
(*BasicSyntax has the most important primitives, which are made pervasive*)
0
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    46
signature BASIC_SYNTAX = sig include SEXTENSION0 include PRINTER0 end;
18
c9ec452ff08f lots of internal cleaning and tuning;
wenzelm
parents: 0
diff changeset
    47
structure BasicSyntax: BASIC_SYNTAX = Syntax;
0
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    48