]> matita.cs.unibo.it Git - helm.git/commitdiff
change naming scheme for rottened script, so that they do not mess up matitadep/make...
authorStefano Zacchiroli <zack@upsilon.cc>
Tue, 27 Nov 2007 15:13:38 +0000 (15:13 +0000)
committerStefano Zacchiroli <zack@upsilon.cc>
Tue, 27 Nov 2007 15:13:38 +0000 (15:13 +0000)
helm/software/matita/Makefile
helm/software/matita/rottener.ml

index 97a34f70dde5ccdbb24805202f2521ae73ff5e5c..6595af73e5768fab4b52fe44e82b957ba82a4581 100644 (file)
@@ -145,7 +145,7 @@ rottener.opt: rottener.ml $(CLIBX_DEPS) $(CCMXS) $(MAINCMXS)
        $(H)echo "  OCAMLOPT $<"
        $(H)$(OCAMLOPT) $(CPKGS) -package lablgtk2 -linkpkg -o $@ $(CCMXS) $(MAINCMXS) rottener.ml
 clean-rottened:
-       find . -type f -name "*.rottened.*.ma" -exec rm {} \;
+       find . -type f -name "*.ma.*.rottened" -exec rm {} \;
 
 matitatop: matitatop.ml $(CLIB_DEPS) $(CCMOS)
        $(H)echo "  OCAMLC $<"
index 82f4d5947300cb9272c7c20d8adf09398db28c52..3674d25ebac94177cc329f39f92db287e8a45f20 100644 (file)
@@ -111,7 +111,7 @@ let rotten_script ~fname statement =
   let script' = sprintf "%s%s%s%s" matches.(1) statement' matches.(3) trailer in
   let md5 = Digest.to_hex (Digest.string script') in
   HExtlib.output_file
-    ~filename:(sprintf "%s.rottened.%s.ma" (Filename.chop_extension fname) md5)
+    ~filename:(sprintf "%s.%s.rottened" fname md5)
     ~text:script'
 
 let grep () =