GitHub/gf-rgl
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-rgl.git synced 2026-05-27 08:58:55 -06:00
Code Issues Packages Projects Releases Wiki Activity

(Ara) Fix the corner case where ReflVP is called after VPSlashPrep.

Browse Source 
Also fix noPrep to accPrep (the default object case).

Tested with gftest -o, only changes were in combinations of ReflVP and 
VPSlashPrep.
This commit is contained in:
Inari Listenmaa
2019-01-29 17:57:21 +01:00
parent ac5352f852
commit e468b48ded
1 changed files with 3 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
src/arabic/VerbAra.gf
View File

@@ -111,9 +111,11 @@ concrete VerbAra of Verb = CatAra ** open Prelude, ResAra, ParamX in {
-- : VPSlash -> VP ; -- love himself
ReflVP vps = vps ** {
s = \\pgn,vf => vps.s ! pgn ! vf
++ vps.obj.s -- only relevant if the VPSlash has been through VPSlashPrep
++ vps.c2.s ++ bindIf vps.c2.binds
++ reflPron vps.c2.c pgn ;
c2 = noPrep
c2 = accPrep ;
obj = emptyObj ; -- because old obj was moved in s
} ;
PassV2 = passPredV ;