Merge pull request #3541 from mtzguido/nits

Improving a few errors

src/parser/FStar.Parser.Dep.fst

@@ -1521,8 +1521,10 @@ let collect (all_cmd_line_files: list file_name)
       with_file_outchannel fn (fun outc -> print_graph outc fn dep_graph);
 
       print_string "\n";
-      raise_error0 Errors.Fatal_CyclicDependence
-        (BU.format1 "Recursive dependency on module %s\n" filename)
+      raise_error0 Errors.Fatal_CyclicDependence [
+        text (BU.format1 "Recursive dependency on module %s." filename);
+        text "A full dependency graph was written to dep.graph.";
+      ]
   in
   (* full_cycle_detection finds cycles across interface
      boundaries that can otherwise be exploited to

src/syntax/FStar.Syntax.DsEnv.fst

@@ -1492,8 +1492,8 @@ let fail_or env lookup lid =
        match resolve_module_name env modul true with
        | None ->
            let opened_modules = String.concat ", " opened_modules |> Errors.text in
-           msg @ [Errors.text (BU.format1 "Module %s does not belong to the list of modules in scope, namely:"
-                                          (string_of_lid modul)) ^^ subdoc opened_modules]
+           msg @ [Errors.text (BU.format1 "Could not resolve module name %s"
+                                          (string_of_lid modul))]
        | Some modul' when (not (List.existsb (fun m -> m = (string_of_lid modul')) opened_modules)) ->
            let opened_modules = String.concat ", " opened_modules |> Errors.text in
            msg @ [Errors.text (BU.format2 "Module %s resolved into %s, which does not belong to the list of modules in scope, namely:"