diff options
Diffstat (limited to 'src/compiler.sml')
| -rw-r--r-- | src/compiler.sml | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/src/compiler.sml b/src/compiler.sml index 569980f4..3d2ce354 100644 --- a/src/compiler.sml +++ b/src/compiler.sml @@ -93,6 +93,9 @@ fun op o (tr2 : ('b, 'c) transform, tr1 : ('a, 'b) transform) = { end } +fun check (tr : ('src, 'dst) transform) x = (ErrorMsg.resetErrors (); + ignore (#func tr x)) + fun run (tr : ('src, 'dst) transform) x = (ErrorMsg.resetErrors (); #func tr x) |