GitHub/gf-rgl
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-rgl.git synced 2026-05-28 01:18:57 -06:00
Code Issues Packages Projects Releases Wiki Activity

(Por) avoid use of Extra in lang

Browse Source
This commit is contained in:
odanoburu
2018-12-22 16:20:59 -02:00
parent 20a44e26e0
commit d2de495bbf
2 changed files with 6 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
src/portuguese/ConstructionPor.gf
View File

@@ -1,15 +1,15 @@
--# -path=alltenses:.:../abstract --# -path=alltenses:.:../abstract:../common:../prelude:../romance:../api
concrete ConstructionPor of Construction = CatPor ** concrete ConstructionPor of Construction = CatPor **
open SyntaxPor, SymbolicPor, ParadigmsPor, BeschPor, open SyntaxPor, SymbolicPor, ParadigmsPor, BeschPor,
(L = LexiconPor), (E = ExtraPor), (B = IrregBeschPor), (R = ResPor), (L = LexiconPor), (B = IrregBeschPor), (R = ResPor),
(S = SyntaxPor), (C = CommonRomance), CommonRomance, (S = SyntaxPor), (C = CommonRomance), CommonRomance,
Prelude in { Prelude in {
flags coding=utf8 ; flags coding=utf8 ;
lin lin
hungry_VP = E.ComplCN have_V2 (mkCN (mkN "fome" feminine)) ; hungry_VP = mkVP have_V2 (mkNP (mkN "fome" feminine)) ;
thirsty_VP = E.ComplCN have_V2 (mkCN (mkN "sede" feminine)) ; thirsty_VP = mkVP have_V2 (mkNP (mkN "sede" feminine)) ;
tired_VP = mkVP (mkA "cansado") ; tired_VP = mkVP (mkA "cansado") ;
scared_VP = mkVP (mkA "assustado") ; scared_VP = mkVP (mkA "assustado") ;
ill_VP = mkVP (mkA "doente") ; ill_VP = mkVP (mkA "doente") ;
@@ -26,7 +26,7 @@ lin
-- some more things -- some more things
weather_adjCl ap = mkCl (mkVP (mkVA B.fazer_V) (lin AP ap)) ; weather_adjCl ap = mkCl (mkVP (mkVA B.fazer_V) (lin AP ap)) ;
is_right_VP = E.ComplCN have_V2 (mkCN (mkN "razão")) ; is_right_VP = mkVP (mkVA B.estar_V) (mkAP (mkA "certo")) ;
is_wrong_VP = mkVP (mkVA B.estar_V) (mkAP (mkA "errado")) ; is_wrong_VP = mkVP (mkVA B.estar_V) (mkAP (mkA "errado")) ;
n_units_AP card cn a = mkAP (lin AdA (mkUtt (mkNP <lin Card card : Card> (lin CN cn)))) (lin A a) ; n_units_AP card cn a = mkAP (lin AdA (mkUtt (mkNP <lin Card card : Card> (lin CN cn)))) (lin A a) ;

2
src/portuguese/LangPor.gf
View File

@@ -1,4 +1,4 @@
--# -path=.:../romance:../abstract:../common:../api --# -path=.:../romance:../abstract:../common:../api:../prelude
concrete LangPor of Lang = concrete LangPor of Lang =
GrammarPor, GrammarPor,