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

(Por) add IrregBesch module with verbs using Besch paradigms

Browse Source 
- Besch :
  - use hack to prevent runtime failure with glue in in vars output
  - rm paradigm numbers
- add IrregBeschPor, verbs that use only bescherelle paradigms
  - use them in Construction, Structural, Idiom, Extra
- Diff and Paradigms had (almost) the same oper (verboV/verbBeschH),
  so combine them into one and use it
This commit is contained in:
odanoburu
2018-05-17 12:46:10 -03:00
parent 23c5ce2381
commit 71220ebaf4
11 changed files with 839 additions and 141 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/portuguese/DiffPor.gf
+6 -6
View File
@@ -143,7 +143,7 @@ instance DiffPor of DiffRomance - [partAgr,vpAgrSubj,vpAgrClits] = open CommonRo
RNeg _ => <"não",[]>
} ;
copula : Verb = verbBeschH (ser_3 "ser") ;
copula : Verb = verboV (ser_Besch "ser") ;
oper
conjThan = "que" ;
@@ -223,14 +223,14 @@ instance DiffPor of DiffRomance - [partAgr,vpAgrSubj,vpAgrClits] = open CommonRo
<_, Pl,P3> => cases3 "os" "seus" "eles"
} ;
estar_V : Verb = verbBeschH (estar_10 "estar") ;
estar_V : Verb = verboV (estar_Besch "estar") ;
haver_V : Verb = verbBeschH (haver_2 "haver") ;
haver_V : Verb = verboV (haver_Besch "haver") ;
ficar_V : Verb = verbBeschH (ficar_12 "ficar") ;
ficar_V : Verb = verboV (ficar_Besch "ficar") ;
verbBeschH : Verbum -> Verb ;
verboV : Verbum -> Verb ;
-- make a verb of type haver
verbBeschH v = verbBesch v ** {vtyp = VHabere ; p = []} ;
verboV v = verbBesch v ** {vtyp = VHabere ; p = [] ; lock_V = <>} ;
}