2003-06-13 Valentin David <valentin@lrde.epita.fr>

        * configure.ac: Tarball renamed to boxedsdf.
	
        * src/pack-boxedsdf/Makefile.am,
        * src/pack-boxedsdf/pack-boxedsdf.str: Removed debugging outputs.

meta-sdf-boxed/ChangeLog

+2003-06-13  Valentin David  <valentin@lrde.epita.fr>
+
+	* configure.ac: Tarball renamed to boxedsdf.
+
+	* src/pack-boxedsdf/Makefile.am,
+	* src/pack-boxedsdf/pack-boxedsdf.str: Removed debugging outputs.
+
 2003-06-13  Valentin David  <valentin@lrde.epita.fr>
 
 	* test/defs.in: StrategoXT 0.9.1 update.

meta-sdf-boxed/configure.ac

 AC_PREREQ(2.57)
 
-AC_INIT(sdf-box, 0.1, valentin@lrde.epita.fr)
+AC_INIT(boxedsdf, 0.1, valentin@lrde.epita.fr)
 
 AC_CONFIG_AUX_DIR(config)
 AC_CONFIG_FILES(config/Makefile)

meta-sdf-boxed/src/pack-boxedsdf/Makefile.am

@@ -2,7 +2,7 @@ include $(top_srcdir)/config/Makefile.xt
 -include pack-boxedsdf.c.dep
 
 bin_PROGRAMS	= pack-boxedsdf
-SCFLAGS         = --main $* --trace-all
+SCFLAGS         = --main $*
 STRINCLUDES	= -I $(top_builddir)/src/syn \
 		  -I $(ASFIX_TOOLS)/share/asfix-tools \
 		  -I $(XTC)/share/xtc

meta-sdf-boxed/src/pack-boxedsdf/pack-boxedsdf.str

@@ -90,21 +90,21 @@ get-module-name =
 
 ConcatModules =
    rec x(
-   {w1, w2, m, m1, m2, xs: debug(!"1");
-      []; debug(!"2");
-      !(NoCfLayout, EmptyModuleIterStar, NoCfLayout) ;debug(!"3")
+   {w1, w2, m, m1, m2, xs:
+      [];
+      !(NoCfLayout, EmptyModuleIterStar, NoCfLayout)
    <+
-      [id]; debug(!"4");
-      ?[Module_START(w1, m, w2)];  debug(!"5");
-      !(NoCfLayout, M-iter(m), NoCfLayout) ;debug(!"6")
+      [id];
+      ?[Module_START(w1, m, w2)];
+      !(NoCfLayout, M-iter(m), NoCfLayout)
    <+
-      ?[m1,m2|xs]; debug(!"7");
-      <concat-modules>( <x>[m1], <x>[m2|xs]) ;debug(!"8")
-   }) => (w1, modules, w2); debug(!"9");
+      ?[m1,m2|xs];
+      <concat-modules>( <x>[m1], <x>[m2|xs])
+   }) => (w1, modules, w2);
    !parsetree(SDF_START(NoCfLayout, 
       Definition-overlay(
          <concat-layout>[OptNewLine, w1], 
-         Module-s-overlay(NonEmptyModuleIterStar(modules))),w2),0) ;debug(!"10")
+         Module-s-overlay(NonEmptyModuleIterStar(modules))),w2),0)
 
 concat-modules =
    ?( (w1, m1, w2), (w3, m2, w4) );