summaryrefslogtreecommitdiff
path: root/src/marshalcheck.sml
diff options
context:
space:
mode:
Diffstat (limited to 'src/marshalcheck.sml')
-rw-r--r--src/marshalcheck.sml2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/marshalcheck.sml b/src/marshalcheck.sml
index 10129aef..de6879ae 100644
--- a/src/marshalcheck.sml
+++ b/src/marshalcheck.sml
@@ -89,7 +89,7 @@ fun check file =
foldl (fn ((_, n, t, _, tag), emap) => IM.insert (emap, n, (t, tag)))
emap vis)
- | DExport (_, n) =>
+ | DExport (_, n, _) =>
(case IM.find (emap, n) of
NONE => raise Fail "MarshalCheck: Unknown export"
| SOME (t, tag) =>