diff options
| author | Vladimir Azarov <avm@intermediate-node.net> | 2025-05-25 19:59:56 +0200 |
|---|---|---|
| committer | Vladimir Azarov <avm@intermediate-node.net> | 2025-05-25 19:59:56 +0200 |
| commit | d9c809a5550b2fe23b2fd1e66672b503730d55f1 (patch) | |
| tree | 6f8001d56823305f9f93c52833362b28e9d2def4 /ccross.sml | |
| parent | 2a1cfad37d5e87b2d7eb3c9da16db66364a9b9a3 (diff) | |
Expression parsing
Diffstat (limited to 'ccross.sml')
| -rw-r--r-- | ccross.sml | 5 |
1 files changed, 3 insertions, 2 deletions
@@ -2,8 +2,9 @@ structure ccross:> CCROSS = struct structure T:> TOKENIZER = Tokenizer(structure H = Hashtable; structure S = Stream) structure ppc:> PPC = ppc(structure Tree = Tree; structure T = T) - structure D:> DRIVER = Driver(ppc) - structure ExnHandler: EXN_HANDLER = ExnHandler + structure Parser:> PARSER = Parser(ppc) + structure D:> DRIVER = Driver(Parser) + structure ExnHandler:> EXN_HANDLER = ExnHandler end val () = MLton.Exn.setTopLevelHandler ccross.ExnHandler.handler |