msyds/gf-rgl
1
0
Fork 0
forked from GitHub/gf-rgl
Code Pull Requests Activity

(Jpn) add GN, LN, SN + constructors

Browse Source
This commit is contained in:
Inari Listenmaa
2026-04-01 16:21:58 +02:00
parent 4c55592af4
commit 84e0e2c08f
2 changed files with 5 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
src/japanese/CatJpn.gf
View File

@@ -83,6 +83,6 @@ flags coding = utf8 ;
-- counter : Str ; counterReplace : Bool ; counterTsu : Bool} ;
N2 = Noun ** {prep : Str; object : Style => Str} ;
N3 = Noun ** {prep1 : Str; prep2 : Str} ;
PN = PropNoun ; -- {s : Style => Str ; anim : Animateness} ;
PN,LN,GN,SN = PropNoun ; -- {s : Style => Str ; anim : Animateness} ;
}

4
src/japanese/ParadigmsJpn.gf
View File

@@ -50,6 +50,10 @@ oper
= \jon,jonsan -> lin PN (personPN jon jonsan)
} ;
mkGN : Str -> GN = \s -> lin GN (regPN s);
mkLN : Str -> LN = \s -> lin LN (regPN s);
mkSN : Str -> SN = \s -> lin SN (regPN s);
mkPron = overload {
mkPron : (kare : Str) -> (Pron1Sg : Bool) -> (anim : Animacy) -> Pron
= \kare,b,a -> lin Pron (regPron kare b a) ;