forked from GitHub/gf-rgl
bugfixes
This commit is contained in:
@@ -1,9 +1,9 @@
|
|||||||
concrete AdjectiveSqi of Adjective = CatSqi ** open ResSqi in {
|
concrete AdjectiveSqi of Adjective = CatSqi ** open ResSqi, Prelude in {
|
||||||
|
|
||||||
lin
|
lin
|
||||||
PositA a = {
|
PositA a = {
|
||||||
s = \\spec,c,g,n => case a.clit of {
|
s = \\spec,c,g,n => case a.clit of {
|
||||||
True => link_clitic ! Indef ! c ! g ! n ++ a.s ! c ! g ! n ;
|
True => link_clitic ! spec ! c ! g ! n ++ a.s ! c ! g ! n ;
|
||||||
False => a.s ! c ! g ! n
|
False => a.s ! c ! g ! n
|
||||||
}
|
}
|
||||||
} ;
|
} ;
|
||||||
|
|||||||
Reference in New Issue
Block a user