Files
gf-core/test/srg/cyclic-empty-prod/cyclic-empty-prod.gf
2007-03-25 16:42:52 +00:00

10 lines
138 B
Plaintext

cat S; E;
fun s : S ;
fun es : E -> S -> S ;
fun e : E ;
lin s = { s = "s" } ;
lin es e s = { s = e.s ++ s.s } ;
lin e = { s = [] } ;