src/Pure/Syntax/syntax.ML
changeset 47 0af9dbb93529
parent 18 c9ec452ff08f
child 144 0a0da273a6c5
equal deleted inserted replaced
46:f0f4978af183 47:0af9dbb93529
    38 
    38 
    39 functor SyntaxFun(structure Symtab: SYMTAB and TypeExt: TYPE_EXT
    39 functor SyntaxFun(structure Symtab: SYMTAB and TypeExt: TYPE_EXT
    40   and Parser: PARSER and SExtension: SEXTENSION and Printer: PRINTER
    40   and Parser: PARSER and SExtension: SEXTENSION and Printer: PRINTER
    41   sharing TypeExt.Extension = SExtension.Extension
    41   sharing TypeExt.Extension = SExtension.Extension
    42   and Parser.XGram = TypeExt.Extension.XGram = Printer.XGram
    42   and Parser.XGram = TypeExt.Extension.XGram = Printer.XGram
    43   and Parser.XGram.Ast = Parser.ParseTree.Ast)(*: SYNTAX *) = (* FIXME *)
    43   and Parser.XGram.Ast = Parser.ParseTree.Ast): SYNTAX =
    44 struct
    44 struct
    45 
    45 
    46 structure Extension = TypeExt.Extension;
    46 structure Extension = TypeExt.Extension;
    47 structure XGram = Extension.XGram;
    47 structure XGram = Extension.XGram;
    48 structure Lexicon = Parser.ParseTree.Lexicon;
    48 structure Lexicon = Parser.ParseTree.Lexicon;