refactored Fin so that the stemmed and the unstemmed versions share all code except StemFin. It is chosen by setting the path; a functor solution would be purer, but it feels like overkill.

2013-08-06 21:36:12 +00:00
parent c836e04764
commit 7a446f5cd1
32 changed files with 417 additions and 2903 deletions
--- a/lib/src/finnish/stemmed/ParseFin.gf
+++ b/lib/src/finnish/stemmed/ParseFin.gf
@@ -66,7 +66,7 @@ oper
      s2 = vp.s2 ;
      adv = vp.adv ;
      ext = vp.ext ;
-      qp = vp.qp ;
+      h = vp.h ;
      isNeg = vp.isNeg ;
      sc = case vp.c2.c of {NPCase Nom => NPAcc ; c => c}
      } ;