mirror of
https://github.com/GrammaticalFramework/gf-rgl.git
synced 2026-07-02 20:18:33 -06:00
(Por) add IrregBesch module with verbs using Besch paradigms
- 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:
@@ -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 = <>} ;
|
||||
|
||||
}
|
||||
|
||||
Reference in New Issue
Block a user