From 71cc64ad35debb1950827e4be6c6a3d5cfc216fc Mon Sep 17 00:00:00 2001 From: Adam Chlipala Date: Thu, 26 Sep 2013 16:22:06 -0400 Subject: Get -root working properly again --- src/source.sml | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/source.sml') diff --git a/src/source.sml b/src/source.sml index d66160db..639ea716 100644 --- a/src/source.sml +++ b/src/source.sml @@ -154,7 +154,7 @@ datatype decl' = | DVal of string * con option * exp | DValRec of (string * con option * exp) list | DSgn of string * sgn - | DStr of string * sgn option * Time.time option * str + | DStr of string * sgn option * Time.time option * str * bool (* did this module come from the '-root' directive? *) | DFfiStr of string * sgn * Time.time option | DOpen of string * string list | DConstraint of con * con -- cgit v1.2.3