1) Include files for NG were neither recursively processes nor accumulated.

[helm.git] / helm / software / matita / matitacLib.ml

diff --git a/helm/software/matita/matitacLib.ml b/helm/software/matita/matitacLib.ml
index 36f7cda6dc9d059bb22a14324dfbdd3febdc00f5..2c5160572f57e6f873a682d9efed6f7c0aaa9e20 100644 (file)
--- a/helm/software/matita/matitacLib.ml
+++ b/helm/software/matita/matitacLib.ml
@@ -77,7 +77,7 @@ let dump f =
                  (Helm_registry.get_bool "matita.paste_unicode_as_tex")
         in
          output_string och str
-      | G.Executable (loc, G.Command (_, G.Include (_, false, _))) -> ()
+      | G.Executable (loc, G.Command (_, G.Include (_, false, _, _))) -> ()
       | stm ->
          output_string och (pp_statement stm); nl (); nl ()
    in