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

fixed bug with prawitz transform of course-of-values tables in Compute

Browse Source
This commit is contained in:
aarne
2007-11-12 12:36:40 +00:00
parent 2095351f96
commit 3104497559
3 changed files with 7 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
resource-1.0/Makefile
View File

@@ -156,7 +156,9 @@ gfdoc:
cp */Irreg???.gf doc/gfdoc cp */Irreg???.gf doc/gfdoc
mv ../prelude/*.html doc/gfdoc mv ../prelude/*.html doc/gfdoc
gf3: gf3: gf3present gf3alltenses
gf3alltenses:
# $(GFNew) arabic/GrammarAra.gf # $(GFNew) arabic/GrammarAra.gf
# $(GFNew) catalan/Catalan.gf # $(GFNew) catalan/Catalan.gf
$(GFNew) danish/Danish.gf $(GFNew) danish/Danish.gf

4
resource-1.0/spanish/DiffSpa.gf
View File

@@ -70,7 +70,7 @@ instance DiffSpa of DiffRomance = open CommonRomance, PhonoSpa, BeschSpa, Prelud
CPron ag an ap => <argPron ag an ap dative, ap,True> ; CPron ag an ap => <argPron ag an ap dative, ap,True> ;
_ => <[],P2,False> _ => <[],P2,False>
} }
in case <paccp.p2, pdatp.p2> of { in case <<paccp.p2, pdatp.p2> : Person * Person> of {
<P3,P3> => <"se" ++ paccp.p1, [],True> ; <P3,P3> => <"se" ++ paccp.p1, [],True> ;
_ => <pdatp.p1 ++ paccp.p1, [],orB paccp.p3 pdatp.p3> _ => <pdatp.p1 ++ paccp.p1, [],orB paccp.p3 pdatp.p3>
} ; } ;
@@ -139,7 +139,7 @@ instance DiffSpa of DiffRomance = open CommonRomance, PhonoSpa, BeschSpa, Prelud
_ => eux _ => eux
} ; } ;
in in
\g,n,p -> case <g,n,p> of { \g,n,p -> case <<g,n,p> : Gender * Number * Person> of {
<_,Sg,P1> => cases "me" "mí" ; <_,Sg,P1> => cases "me" "mí" ;
<_,Sg,P2> => cases "te" "tí" ; <_,Sg,P2> => cases "te" "tí" ;
<_,Pl,P1> => cases "nos" "nosotras" ; --- nosotros <_,Pl,P1> => cases "nos" "nosotras" ; --- nosotros

2
resource-1.0/spanish/ResSpa.gf
View File

@@ -8,6 +8,6 @@
instance ResSpa of ResRomance = DiffSpa ** open CommonRomance, Prelude in { instance ResSpa of ResRomance = DiffSpa ** open CommonRomance, Prelude in {
flags optimize=noexpand ; --- flags optimize=noexpand ;
} ; } ;