diff options
author | Vladimir Azarov <avm@intermediate-node.net> | 2025-04-11 21:54:16 +0200 |
---|---|---|
committer | Vladimir Azarov <avm@intermediate-node.net> | 2025-04-11 21:54:16 +0200 |
commit | e99a8dc48ede26696be2ba75a8cb0d5122d94598 (patch) | |
tree | c3dcd1d6a9b96aaedd081f13b9dc7e7d6c07e2bd /cpp.sig | |
parent | 8e2dc7712de206b87e1c46df9383c3fa1e18a43a (diff) |
#include directive
Diffstat (limited to 'cpp.sig')
-rw-r--r-- | cpp.sig | 15 |
1 files changed, 9 insertions, 6 deletions
@@ -3,9 +3,12 @@ signature CPP = sig type t type tkPos - type tkExpectedValue - exception TkExpected of tkExpectedValue + type tkExpectedVal + exception TkExpected of tkExpectedVal + + type tkErrorVal + exception TkError of tkErrorVal datatype tkExp = Tk of T.token | @@ -16,12 +19,12 @@ signature CPP = sig BinOp | Op - val create: string -> t + val create: string -> string list -> t val getToken: t -> T.token * t val getLastPos: t -> tkPos - val prepAndRaise: t -> tkPos -> tkExp list -> 'a - val tkExpectedPrint: tkExpectedValue -> unit + val tkExpectedPrint: tkExpectedVal -> unit + val tkErrorPrint: tkErrorVal -> unit - val debugPrint: string -> unit + val debugPrint: t -> unit end |