Commit 96921537 authored by david_v's avatar david_v
Browse files

from Valentin David <valentin@lrde.epita.fr>

	* src/genfilters/genfilters.str: Import "AsFix" against "asfix".

	* test/d.str.ref, test/f.str.ref: Update.

2004-05-04  Valentin David  <valentin@lrde.epita.fr>
parent 4d986e3b
2004-05-04 Valentin David <valentin@lrde.epita.fr>
* src/genfilters/genfilters.str: Import "AsFix" against "asfix".
* test/d.str.ref, test/f.str.ref: Update.
2004-05-04 Valentin David <valentin@lrde.epita.fr>
* src/syn/Makefile.am: Use stratego-regular to generate the
......
......@@ -162,7 +162,7 @@ strategies
collect(prod(id,id,attrs(at-dettag(id) <+ at-dettag(id,id))))
; map(torule(make-rules))
; !Module(<module-name>,
[Imports(["lib","asfix"]),
[Imports(["lib","AsFix"]),
Rules(<id>),
Strategies([SDefNoArgs(<module-name>,
Call(SVar("iowrap"),
......
module Convert
imports lib asfix
imports lib AsFix
rules
Tr :
appl(prod([cf(sort("A")),cf(opt(layout())),cf(sort("B")),cf(opt(layout())),cf(sort("C"))], cf(sort("D")), ), [ , , , , ]) -> appl(prod([lit("/*[foo]*/"),cf(opt(layout())),cf(sort("A")),cf(opt(layout())),cf(sort("B")),cf(opt(layout())),cf(sort("C")),cf(opt(layout())),lit("/*[/foo]*/")], cf(sort("D")), ), [ appl(prod([char-class([ 47 ]),char-class([ 42 ]),char-class([ 91 ]),char-class([ 102 ]),char-class([ 111 ]),char-class([ 111 ]),char-class([ 93 ]),char-class([ 42 ]),char-class([ 47 ])], lit("/*[foo]*/"), no-attrs()), [ 47 , 42 , 91 , 102 , 111 , 111 , 93 , 42 , 47 ]) , appl(prod([], cf(opt(layout())), no-attrs()), [ ]) , , , , , , appl(prod([], cf(opt(layout())), no-attrs()), [ ]) , appl(prod([char-class([ 47 ]),char-class([ 42 ]),char-class([ 91 ]),char-class([ 47 ]),char-class([ 102 ]),char-class([ 111 ]),char-class([ 111 ]),char-class([ 93 ]),char-class([ 42 ]),char-class([ 47 ])], lit("/*[/foo]*/"), no-attrs()), [ 47 , 42 , 91 , 47 , 102 , 111 , 111 , 93 , 42 , 47 ]) ])
......
module Convert
imports lib asfix
imports lib AsFix
rules
Tr :
appl(prod([lit("/*[foo]*/"),cf(opt(layout())),cf(sort("A")),cf(opt(layout())),cf(sort("B")),cf(opt(layout())),cf(sort("C")),cf(opt(layout())),lit("/*[/foo]*/")], cf(sort("D")), ), [ _ , _ , , , , , , _ , _ ]) -> appl(prod([cf(sort("A")),cf(opt(layout())),cf(sort("B")),cf(opt(layout())),cf(sort("C"))], cf(sort("D")), ), [ , , , , ])
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment