diff options
| author | bjorn <bjorn@bringert.net> | 2008-08-14 07:58:04 +0000 |
|---|---|---|
| committer | bjorn <bjorn@bringert.net> | 2008-08-14 07:58:04 +0000 |
| commit | 77270a010a0b453e9a84c3e62db7cfd22e49d55d (patch) | |
| tree | d17682a545d6ac1e68ff49b8c20964182794baf7 /grammars/database/RestaurantFre.gf | |
| parent | 0bbb906141711767678f82b15a7b43e65e0b5bd6 (diff) | |
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.
Diffstat (limited to 'grammars/database/RestaurantFre.gf')
| -rw-r--r-- | grammars/database/RestaurantFre.gf | 33 |
1 files changed, 0 insertions, 33 deletions
diff --git a/grammars/database/RestaurantFre.gf b/grammars/database/RestaurantFre.gf deleted file mode 100644 index 0400bde29..000000000 --- a/grammars/database/RestaurantFre.gf +++ /dev/null @@ -1,33 +0,0 @@ ---# -path=.:../newresource/abstract:../newresource/french:../newresource/romance:../prelude ---- path names: resource in release, newresource in cvs - -concrete RestaurantFre of Restaurant = - DatabaseFre ** open Prelude, ResourceFre, ParadigmsFre in { - -lin - Restaurant = UseN (nReg "restaurant" masculine) ; - Bar = UseN (nReg "bar" masculine) ; - French = AdjP1 (adj1Anglais "français" postpos) ; - Italian = AdjP1 (adj1Italien "italien" postpos) ; - Indian = AdjP1 (adj1Italien "indien" postpos) ; - Japanese = AdjP1 (adj1Anglais "japonais" postpos) ; - - address = funDe (nReg "adresse" feminine) ; - phone = funCNCase (AdvCN (UseN (nReg "numéro" masculine)) - (PrepNP PossessPrep (MassNP (UseN (nReg "téléphone" masculine))))) genitive ; - priceLevel = funCNCase (AdvCN (UseN (nEau "niveau" masculine)) - (PrepNP PossessPrep (MassNP (UseN (nCas "prix" masculine))))) genitive ; - - Cheap = aReg "cher" postpos ; ---- - Expensive = aReg ["pas cher"] postpos ; ---- - - WhoRecommend rest = - ss2 ["qui a recommandé"] rest.s ** {lock_Phr = <>} ; - WhoHellRecommend rest = - ss2 ["qui enfer a recommandé"] rest.s ** {lock_Phr = <>} ; - - LucasCarton = mkPN ["Lucas Carton"] masculine ; - LaCoupole = mkPN ["La Coupole"] feminine ; - BurgerKing =mkPN ["Burger King"] masculine ; - -} |
