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

added prepositions in the functions for rendering dates

Browse Source
This commit is contained in:
Krasimir Angelov
2023-10-25 09:41:26 +02:00
parent 47365491ff
commit fa8cef4112
1 changed files with 4 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
src/spanish/ConstructionSpa.gf
View File

@@ -66,11 +66,11 @@ lin
weekdayLastAdv w = SyntaxSpa.mkAdv noPrep (mkNP the_Det (mkCN (mkA "pasado") w)) ; -- il lunedí scorso weekdayLastAdv w = SyntaxSpa.mkAdv noPrep (mkNP the_Det (mkCN (mkA "pasado") w)) ; -- il lunedí scorso
weekdayNextAdv w = SyntaxSpa.mkAdv noPrep (mkNP the_Det (mkCN (mkA "próximo") w)) ; -- il lunedí prossimo weekdayNextAdv w = SyntaxSpa.mkAdv noPrep (mkNP the_Det (mkCN (mkA "próximo") w)) ; -- il lunedí prossimo
monthAdv m = lin Adv {s = "en" ++ m.s ! C.Sg} ; -- in mggio monthAdv m = lin Adv {s = "en" ++ m.s ! C.Sg} ; -- en mayo
yearAdv y = SyntaxSpa.mkAdv (mkPrep "en") y ; ---- yearAdv y = SyntaxSpa.mkAdv (mkPrep "en") y ; ----
dayMonthAdv d m = ParadigmsSpa.mkAdv ("el" ++ (d.s ! R.Nom).comp ++ m.s ! C.Sg) ; -- le 17 mai dayMonthAdv d m = ParadigmsSpa.mkAdv ("el" ++ (d.s ! R.Nom).comp ++ "de" ++ m.s ! C.Sg) ; -- el 17 de mayo
monthYearAdv m y = lin Adv {s = "en" ++ m.s ! C.Sg ++ (y.s ! R.Nom).comp} ; -- in maggio 2012 monthYearAdv m y = lin Adv {s = "en" ++ m.s ! C.Sg ++ "de" ++ (y.s ! R.Nom).comp} ; -- en mayo de 2012
dayMonthYearAdv d m y = ParadigmsSpa.mkAdv ("el" ++ (d.s ! R.Nom).comp ++ m.s ! C.Sg ++ (y.s ! R.Nom).comp) ; -- il 17 maggio 2013 dayMonthYearAdv d m y = ParadigmsSpa.mkAdv ("el" ++ (d.s ! R.Nom).comp ++ "de" ++ m.s ! C.Sg ++ "de" ++ (y.s ! R.Nom).comp) ; -- el 17 de mayo de 2013
intYear = symb ; intYear = symb ;
intMonthday = symb ; intMonthday = symb ;