mirror of
https://github.com/GrammaticalFramework/gf-rgl.git
synced 2026-05-28 01:18:57 -06:00
Ara.ExtAdvS
This commit is contained in:
@@ -71,4 +71,5 @@ concrete SentenceAra of Sentence = CatAra ** open
|
|||||||
UseSlash t p cls = UseCl t p (complClSlash cls) ;
|
UseSlash t p cls = UseCl t p (complClSlash cls) ;
|
||||||
|
|
||||||
AdvS adv s = s ** {s = \\o => adv.s ++ s.s ! o} ;
|
AdvS adv s = s ** {s = \\o => adv.s ++ s.s ! o} ;
|
||||||
|
ExtAdvS adv s = s ** {s = \\o => adv.s ++ s.s ! o} ;
|
||||||
}
|
}
|
||||||
|
|||||||
Reference in New Issue
Block a user