GitHub/gf-rgl
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-rgl.git synced 2026-06-07 14:16:31 -06:00
Code Issues Packages Projects Releases Wiki Activity

adjusting Fre question forms

Browse Source
This commit is contained in:
Aarne Ranta
2017-10-04 15:03:56 +02:00
parent 76d6749797
commit 77ecb64756
6 changed files with 19 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
src/romance/QuestionRomance.gf
View File

@@ -38,8 +38,8 @@ incomplete concrete QuestionRomance of Question =
s = \\t,a,p,q =>
let
ord = case q of {
QDir => DInv ;
QIndir => DInv
QDir => iAdvQuestionInv ;
QIndir => iAdvQuestionInv
} ;
cls = cl.s ! ord ! t ! a ! p ! Indic ;
why = iadv.s