Remove the grammars directory. It was full of old grammars that don't compile these days. See the old source distributions if you want them.

1 files changed, 0 insertions, 33 deletions

diff --git a/grammars/database/RestaurantSwe.gf b/grammars/database/RestaurantSwe.gf
deleted file mode 100644
index 81e023cf5..000000000
--- a/grammars/database/RestaurantSwe.gf
+++ /dev/null
@@ -1,33 +0,0 @@
---# -path=.:../newresource/abstract:../newresource/swedish:../resource/abstract:../resource/swedish:../prelude
---- path names: resource in release, newresource in cvs
-
-concrete RestaurantSwe of Restaurant = 
-  DatabaseSwe ** open Prelude, ResourceSwe, ParadigmsSwe in {
-
-lin 
-  Restaurant = UseN (nRisk "restaurang") ;
-  Bar = UseN (nRisk "bar") ;
-  French = AdjP1 (adjReg "fransk") ;
-  Italian = AdjP1 (adjReg "italiensk") ;
-  Indian = AdjP1 (adjReg "indisk") ;
-  Japanese = AdjP1 (adjReg "japansk") ;
-
-  address = funAv (nRisk "adress") ;
-  phone = 
-    funTill (mkN "telefonnummer" "telefonnumret" "telefonnummer"
-                 "telefonnumren" neutrum nonmasculine) ;
-  priceLevel = funPaa (nRisk "prisnivå") ;
-
-  Cheap = aReg "billig" ;
-  Expensive = aReg "dyr" ;
-
-  WhoRecommend rest = 
-    ss2 ["vem rekommenderade"] (rest.s ! nominative) ** {lock_Phr = <>} ;
-  WhoHellRecommend rest = 
-    ss2 ["vem fan rekommenderade"] (rest.s ! nominative) ** {lock_Phr = <>} ;
-
-  LucasCarton = pnReg ["Lucas-Carton"] neutrum nonmasculine ; --- -
-  LaCoupole  = pnReg ["La-Coupole"] neutrum nonmasculine ;
-  BurgerKing = pnS (variants {["Burger King"] ; "BK"}) neutrum nonmasculine ;
-
-}