(Dut) Fix bug in regAdjective: now matching a pattern #dupCons, not just any suffix

This commit is contained in:
Inari Listenmaa
2018-06-12 14:18:49 +02:00
parent 1d06f09813
commit f1889644d4

View File

@@ -111,7 +111,7 @@ resource ResDut = ParamX ** open Prelude, Predef in {
b + v@#dupVow + c@? => b + shortVoc v c + "e" ; b + v@#dupVow + c@? => b + shortVoc v c + "e" ;
b + #diphthong + ? => endCons s + "e" ; b + #diphthong + ? => endCons s + "e" ;
b + v@#vowel + c@dupCons => b + v + c + c + "e" ; b + v@#vowel + c@#dupCons => b + v + c + c + "e" ;
_ => endCons s + "e" _ => endCons s + "e"
} ; } ;
in reg2Adjective s se ; in reg2Adjective s se ;