refactoring to make it easier to add new conjuncts

This commit is contained in:
Krasimir Angelov committed 2018-09-09 14:10:16 +02:00
1 parent 790d4bc04a
commit 285bca2ef5
8 files changed
+60 -62

No files matched your search

+1 -1
View File
@@ -23,7 +23,7 @@ concrete PhraseBul of Phrase = CatBul ** open Prelude, ResBul in {
UttInterj i = i ;
NoPConj = {s = []} ;
PConjConj conj = {s = conj.s ++ linCoord!conj.conj} ;
PConjConj conj = {s = conj.s} ;
NoVoc = {s = []} ;
VocNP np = {s = bindComma ++ np.s ! RVoc} ;