(Fin) Update all functions that use CN to use postmod field

This commit is contained in:
Inari Listenmaa
2020-09-17 21:04:36 +02:00
parent dd813bc7cc
commit d4ee4addc5
8 changed files with 23 additions and 9 deletions
+2 -2
View File
@@ -1,9 +1,9 @@
--# -path=.:../abstract:../common
concrete MarkupFin of Markup = CatFin, MarkHTMLX ** {
concrete MarkupFin of Markup = CatFin, MarkHTMLX ** open ResFin in {
lin
MarkupCN m cn = cn ** {s = \\nf => appMark m (cn.s ! nf)} ;
MarkupCN m cn = cn ** {s = \\nf => appMark m (linCN nf cn)} ;
MarkupNP m np = np ** {s = \\c => appMark m (np.s ! c)} ;
MarkupAP m ap = ap ** {s = \\b,nf => appMark m (ap.s ! b ! nf)} ;
MarkupAdv m adv = {s = appMark m adv.s} ;