diff --git a/lib/src/Make.hs b/lib/src/Make.hs
index 10e7b87e2..c3a6530ba 100644
--- a/lib/src/Make.hs
+++ b/lib/src/Make.hs
@@ -54,7 +54,7 @@ langsCoding = [
 langs = map fst langsCoding
 
 -- languagues for which to compile Lang
-langsLang = langs `except` ["Pol","Tur"]
+langsLang = langs `except` ["Tur"]
 
 -- languages for which to compile Try 
 langsAPI  = langsLang `except` ["Ara","Bul","Hin","Ina","Lat","Rus","Tha"]
diff --git a/lib/src/api/SymbolicPol.gf b/lib/src/api/SymbolicPol.gf
new file mode 100644
index 000000000..28c15ffa3
--- /dev/null
+++ b/lib/src/api/SymbolicPol.gf
@@ -0,0 +1,5 @@
+--# -path=.:present
+
+resource SymbolicPol = Symbolic with 
+  (Symbol = SymbolPol),
+  (Grammar = GrammarPol) ;
diff --git a/lib/src/api/TryPol.gf b/lib/src/api/TryPol.gf
index 73c88ebc1..48107cc40 100644
--- a/lib/src/api/TryPol.gf
+++ b/lib/src/api/TryPol.gf
@@ -3,10 +3,10 @@
 resource TryPol = SyntaxPol, LexiconPol, ParadigmsPol - [mkAdv] ** 
   open (P = ParadigmsPol) in {
 
-oper
+--oper
 
-  mkAdv = overload SyntaxPol {
-    mkAdv : Str -> Adv = P.mkAdv ;
-  } ;
+--  mkAdv = overload SyntaxPol {
+--    mkAdv : Str -> Adv = P.mkAdv ;
+--  } ;
 
 }
diff --git a/lib/src/polish/GrammarPol.gf b/lib/src/polish/GrammarPol.gf
index 4b1de6143..ab922857d 100644
--- a/lib/src/polish/GrammarPol.gf
+++ b/lib/src/polish/GrammarPol.gf
@@ -13,7 +13,7 @@ concrete GrammarPol of Grammar =
   RelativePol,
   ConjunctionPol,
   PhrasePol,
-  TextPol,
+  TextX - [CAdv],
   StructuralPol,
   IdiomPol
    ** { flags  startcat = Phr ; unlexer = text ; lexer = text ;} ;
diff --git a/lib/src/polish/TextPol.gf b/lib/src/polish/TextPol.gf
deleted file mode 100644
index 87a2e3ebc..000000000
--- a/lib/src/polish/TextPol.gf
+++ /dev/null
@@ -1,9 +0,0 @@
-concrete TextPol of Text = {
-
-  lin
-    TEmpty = {s = []} ;
-    TFullStop x xs = {s = x.s ++ "." ++ xs.s} ;
-    TQuestMark x xs = {s = x.s ++ "?" ++ xs.s} ;
-    TExclMark x xs = {s = x.s ++ "!" ++ xs.s} ;
-
-}