From 561b8edccfa76c6d82f1a9c63ea3699f76d1eca2 Mon Sep 17 00:00:00 2001
From: bringert <unknown>
Date: Wed, 25 May 2005 09:42:32 +0000
Subject: [PATCH] Added very basic list test grammars.

---
 grammars/bringert/ListTest.gf    |  8 ++++++++
 grammars/bringert/ListTestEng.gf | 12 ++++++++++++
 2 files changed, 20 insertions(+)
 create mode 100644 grammars/bringert/ListTest.gf
 create mode 100644 grammars/bringert/ListTestEng.gf

diff --git a/grammars/bringert/ListTest.gf b/grammars/bringert/ListTest.gf
new file mode 100644
index 000000000..7f280b524
--- /dev/null
+++ b/grammars/bringert/ListTest.gf
@@ -0,0 +1,8 @@
+abstract ListTest = {
+
+cat A; [A]; B; [B]{1};
+
+fun apa : A;
+fun bepa : B;
+
+}
\ No newline at end of file
diff --git a/grammars/bringert/ListTestEng.gf b/grammars/bringert/ListTestEng.gf
new file mode 100644
index 000000000..05ae4ce25
--- /dev/null
+++ b/grammars/bringert/ListTestEng.gf
@@ -0,0 +1,12 @@
+concrete ListTestEng of ListTest = {
+
+lin BaseA = { s = "" } ;
+lin ConsA a as = { s = a.s ++ "" ++ as.s } ;
+
+lin BaseB b = { s = b.s } ;
+lin ConsB b bs = { s = b.s ++ "," ++ bs.s } ;
+
+lin apa = { s = "apa" } ;
+lin bepa = { s = "bepa" } ;
+
+}
\ No newline at end of file