GitHub/gf-rgl
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-rgl.git synced 2026-05-27 17:08:54 -06:00
Code Issues Packages Projects Releases Wiki Activity

(Ger) Comment out lins that don't compile

Browse Source
This commit is contained in:
Inari Listenmaa
2023-08-21 11:44:49 +03:00
parent e872c57758
commit 98128cedd7
1 changed files with 21 additions and 11 deletions
Download Patch File Download Diff File Expand all files Collapse all files

16
src/german/NamesGer.gf
View File

@@ -35,7 +35,9 @@ lin FullName gn sn = {
rc, ext = []
} ;
lin UseLN ln = {
-- UseLN : LN -> NP ;
lin UseLN ln = notYet "UseLN" ;
{- Old version by Krasimir: {
s = \\c => case ln.hasArt of {
True => artDefContr (gennum ln.g ln.n) c ++ usePrepC c (\k -> ln.s ! Weak ! k) ;
False => usePrepC c (\k -> ln.s ! adjfCase Strong k ! k)
@@ -44,22 +46,30 @@ lin UseLN ln = {
w = WLight ;
rc, ext = []
} ;
-}
lin PlainLN ln = {
-- PlainLN : LN -> NP ;
lin PlainLN ln = notYet "PlainLN" ;
{- {
s = \\c => usePrepC c (\k -> ln.s ! adjfCase Strong k ! k) ;
a = agrgP3 ln.g ln.n ;
w = WLight ;
rc, ext = []
} ;
-}
lin InLN ln = {
-- InLN : LN -> Adv ;
lin InLN ln = notYet "InLN" ;
{- {
s = let c = NPP CInDat
in case ln.hasArt of {
True => artDefContr (gennum ln.g ln.n) c ++ usePrepC c (\k -> ln.s ! Weak ! k) ;
False => usePrepC c (\k -> ln.s ! adjfCase Strong k ! k)
} ;
} ;
-}
-- AdjLN : AP -> LN -> LN ;
lin AdjLN ap ln = ln ** {
s = \\a,c =>
preOrPost ap.isPre