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