mirror of
https://github.com/GrammaticalFramework/gf-rgl.git
synced 2026-05-27 17:08:54 -06:00
(Hun) Use regNoun in mkAdj
This commit is contained in:
@@ -321,7 +321,7 @@ oper
|
|||||||
isPost : Bool ; -- put adjective past the thing it modifies
|
isPost : Bool ; -- put adjective past the thing it modifies
|
||||||
} ;
|
} ;
|
||||||
|
|
||||||
mkAdj : Str -> Adjective = \sgnom -> mkAdj2 sgnom (mkNoun sgnom) ;
|
mkAdj : Str -> Adjective = \sgnom -> mkAdj2 sgnom (regNoun sgnom) ;
|
||||||
|
|
||||||
|
|
||||||
mkAdj2 : Str -> Noun -> Adjective = \sgnom,adjAsNoun -> adjAsNoun ** {
|
mkAdj2 : Str -> Noun -> Adjective = \sgnom,adjAsNoun -> adjAsNoun ** {
|
||||||
|
|||||||
Reference in New Issue
Block a user