urdu relatives

2026-05-01 23:32:51 -06:00 · 2010-03-29 12:40:51 +00:00
parent 997ca76c1b
commit 1402b10138
2 changed files with 5 additions and 2 deletions
--- a/lib/src/urdu/RelativeUrd.gf
+++ b/lib/src/urdu/RelativeUrd.gf
@@ -14,7 +14,8 @@ concrete RelativeUrd of Relative = CatUrd ** open ResUrd in {
      c = Dir
      } ;

-{-    RelVP rp vp = {
+-- {-
+    RelVP rp vp = {
      s = \\t,p,o,ag => 
        let 
          agr = case rp.a of {
@@ -43,7 +44,7 @@ concrete RelativeUrd of Relative = CatUrd ** open ResUrd in {
 --		   };
      c = Dir
      } ;
-}
+-- -}
    FunRP p np rp = {
      s = \\n,c => rp.s ! n ! c ++ np.s ! NPC c ++ p.s  ;
      a = RAg np.a