From f8fdaa7accef4c6935e5ecdf9ef292b1f7b2901b Mon Sep 17 00:00:00 2001
From: aarne <aarne@chalmers.se>
Date: Mon, 22 Jun 2009 14:30:55 +0000
Subject: fixed warnings in present compilation of resource, esp. unreached
 patterns

---
 next-lib/src/bulgarian/ResBul.gf | 15 ++++++++-------
 1 file changed, 8 insertions(+), 7 deletions(-)

(limited to 'next-lib/src/bulgarian/ResBul.gf')

diff --git a/next-lib/src/bulgarian/ResBul.gf b/next-lib/src/bulgarian/ResBul.gf
index c26a92824..527dceef4 100644
--- a/next-lib/src/bulgarian/ResBul.gf
+++ b/next-lib/src/bulgarian/ResBul.gf
@@ -454,13 +454,14 @@ resource ResBul = ParamX ** open Prelude in {
 
           verbs : {aux:{s1:Str; s2:Str}; main:Str} =
             case <t,a> of {
-              <Pres,Simul> => {aux=vf2 clitic.s;  main=presentImperf} ;
-              <Pres,Anter> => {aux=vf1 clitic.s;  main=perfect} ;
-              <Past,Simul> => {aux=vf2 clitic.s;  main=aorist} ;
-              <Past,Anter> => {aux=vf4 auxAorist; main=perfect} ;
-              <Fut, Simul> => {aux=vf3 clitic.s;  main=present} ;
-              <Fut, Anter> => {aux=vf3 (apc []);  main=perfect} ;
-              <Cond,_    > => {aux=vf4 auxCond ;  main=perfect}
+              <Pres,Simul> => {aux=vf2 clitic.s;  main=presentImperf}
+              ;                                                    --# notpresent
+              <Pres,Anter> => {aux=vf1 clitic.s;  main=perfect} ; --# notpresent
+              <Past,Simul> => {aux=vf2 clitic.s;  main=aorist} ; --# notpresent
+              <Past,Anter> => {aux=vf4 auxAorist; main=perfect} ; --# notpresent
+              <Fut, Simul> => {aux=vf3 clitic.s;  main=present} ; --# notpresent
+              <Fut, Anter> => {aux=vf3 (apc []);  main=perfect} ; --# notpresent
+              <Cond,_    > => {aux=vf4 auxCond ;  main=perfect} --# notpresent
             }
 
       in verb.ad.s ++ li0 ++ verbs.aux.s1 ++ verbs.main ++ verbs.aux.s2 ;
-- 
cgit v1.2.3