From 7bfdd9349b08b82f4e8fceb75749c17f8e8324e2 Mon Sep 17 00:00:00 2001
From: Adam Chlipala <adamc@hcoop.net>
Date: Sun, 15 Feb 2009 10:32:50 -0500
Subject: First gimpy RPC

---
 src/pathcheck.sml | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src/pathcheck.sml')

diff --git a/src/pathcheck.sml b/src/pathcheck.sml
index ed6a4124..036d286f 100644
--- a/src/pathcheck.sml
+++ b/src/pathcheck.sml
@@ -46,7 +46,7 @@ fun checkDecl ((d, loc), (funcs, rels)) =
              (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
-- 
cgit v1.2.3