Mercurial > urweb
diff src/pathcheck.sml @ 609:56aaa1941dad
First gimpy RPC
author | Adam Chlipala <adamc@hcoop.net> |
---|---|
date | Sun, 15 Feb 2009 10:32:50 -0500 |
parents | 78358e5df273 |
children | 70cbdcf5989b |
line wrap: on
line diff
--- a/src/pathcheck.sml Sun Feb 15 09:27:36 2009 -0500 +++ b/src/pathcheck.sml Sun Feb 15 10:32:50 2009 -0500 @@ -46,7 +46,7 @@ (funcs, SS.add (rels, s))) in case d of - DExport (_, s, _, _) => + DExport (_, s, _, _, _) => (if SS.member (funcs, s) then E.errorAt loc ("Duplicate function path " ^ s) else