bugfixes
This commit is contained in:
1 parent
02456811ee
commit
bcf5db743f
1 file changed
+2
-2
@@ -1,9 +1,9 @@
|
||||
concrete AdjectiveSqi of Adjective = CatSqi ** open ResSqi in {
|
||||
concrete AdjectiveSqi of Adjective = CatSqi ** open ResSqi, Prelude in {
|
||||
|
||||
lin
|
||||
PositA a = {
|
||||
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
|
||||
}
|
||||
} ;
|
||||
|
||||
Reference in new issue
Block a user