GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-05-20 08:32:50 -06:00
Code Issues Packages Projects Releases Wiki Activity

completed QuestionBul module

Browse Source
This commit is contained in:
krasimir
2008-02-22 14:10:50 +00:00
parent 038bb07c33
commit dd8331ce2b
3 changed files with 22 additions and 14 deletions
Download Patch File Download Diff File Expand all files Collapse all files

11
lib/resource/bulgarian/ResBul.gf
View File

@@ -57,7 +57,7 @@ resource ResBul = ParamX ** open Prelude in {
-- The order of sentence is needed already in $VP$.
Order = ODir | OQuest ;
Order = Main | Inv | Quest ;
--2 For $Adjective$
@@ -360,8 +360,9 @@ resource ResBul = ParamX ** open Prelude in {
verb = vp.s ! t ! a ! b ! agr ;
compl = vp.s2 ! agr
in case o of {
ODir => subj ++ verb ++ compl ;
OQuest => subj ++ verb ++ "ëè" ++ compl
Main => subj ++ verb ++ compl ;
Inv => verb ++ subj ++ compl ;
Quest => subj ++ verb ++ "ëè" ++ compl
}
} ;
@@ -450,8 +451,8 @@ resource ResBul = ParamX ** open Prelude in {
let cls = cl.s ! t ! a ! p ;
why = wh.s
in table {
QDir => why ++ cls ! OQuest ;
QIndir => why ++ cls ! ODir
QDir => why ++ cls ! Inv ;
QIndir => why ++ cls ! Main
}
} ;
}