diff options
author | Vladimir Azarov <avm@intermediate-node.net> | 2025-05-12 01:51:27 +0200 |
---|---|---|
committer | Vladimir Azarov <avm@intermediate-node.net> | 2025-05-12 01:51:27 +0200 |
commit | 52a6f8656e8a600a2c59fa2802fb46fafb30de45 (patch) | |
tree | 72511efdccc742709f40e52ca73b708a0c74c1c6 /ppc.sig | |
parent | e99a8dc48ede26696be2ba75a8cb0d5122d94598 (diff) |
Object-like macros
Diffstat (limited to 'ppc.sig')
-rw-r--r-- | ppc.sig | 31 |
1 files changed, 31 insertions, 0 deletions
@@ -0,0 +1,31 @@ +signature PPC = sig + + structure T: TOKENIZER + + type t + type tkErrorVal + type tkErrorExpVal + type tkPos + + exception TkError of tkErrorVal + exception TkErrorExp of tkErrorExpVal + + datatype expTk = + ExpTk of T.token | + ExpId | + ExpConst | + ExpUnop | + ExpBinop | + ExpOp + + + val create: { fname: string, incDirs: string list } -> t + val debugPrint: string -> string list -> unit + + + val raiseTkError: string -> tkPos -> 'a + val tkErrorPrint: tkErrorVal -> unit + + val raiseTkErrorExp: tkPos -> expTk list -> 'a + val tkErrorExpPrint: tkErrorExpVal -> unit +end |