comparison src/pathcheck.sml @ 1104:72670131dace

Basis.serialize; separate file for mhash; run transactional finishers in reverse order; set needs_sig properly
author Adam Chlipala <adamc@hcoop.net>
date Thu, 31 Dec 2009 11:41:57 -0500
parents 4c5796512edc
children c1e3805e604e
comparison
equal deleted inserted replaced
1103:2f42c61b8d0a 1104:72670131dace
65 else 65 else
66 (); 66 ();
67 (funcs, rels, cookies, SS.add (styles, s))) 67 (funcs, rels, cookies, SS.add (styles, s)))
68 in 68 in
69 case d of 69 case d of
70 DExport (_, s, _, _, _) => doFunc s 70 DExport (_, s, _, _, _, _) => doFunc s
71 71
72 | DTable (s, _, pe, ce) => 72 | DTable (s, _, pe, ce) =>
73 let 73 let
74 fun constraints (e, rels) = 74 fun constraints (e, rels) =
75 case #1 e of 75 case #1 e of