diff options
author | 2009-12-31 11:41:57 -0500 | |
---|---|---|
committer | 2009-12-31 11:41:57 -0500 | |
commit | d92155463bff760184418a3d282730841c9e3b7f (patch) | |
tree | bd23d8cf5bd50193307b43173436dee92553e4cd /src/marshalcheck.sml | |
parent | 1cde40c8c97b7edc597ed62edce0484e178dfe7d (diff) |
Basis.serialize; separate file for mhash; run transactional finishers in reverse order; set needs_sig properly
Diffstat (limited to 'src/marshalcheck.sml')
-rw-r--r-- | src/marshalcheck.sml | 2 |
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) => |