From 49849d7fe381bdf20e66e5255ee7d27a8dc300f9 Mon Sep 17 00:00:00 2001 From: bringert Date: Sat, 20 May 2006 01:41:53 +0000 Subject: Regenerated transfer bnfc stuff with latest bnfc, happy and alex, to be able to compile on GHC CVS. --- src/Transfer/Syntax/Par.hs | 22 +++------------------- 1 file changed, 3 insertions(+), 19 deletions(-) (limited to 'src/Transfer/Syntax/Par.hs') diff --git a/src/Transfer/Syntax/Par.hs b/src/Transfer/Syntax/Par.hs index f5869c75d..bd83f0a87 100644 --- a/src/Transfer/Syntax/Par.hs +++ b/src/Transfer/Syntax/Par.hs @@ -1,4 +1,5 @@ {-# OPTIONS -fglasgow-exts -cpp #-} +{-# OPTIONS -fno-warn-incomplete-patterns -fno-warn-overlapping-patterns #-} module Transfer.Syntax.Par where import Transfer.Syntax.Abs import Transfer.Syntax.Lex @@ -1576,7 +1577,6 @@ myLexer = tokens {-# LINE 1 "GenericTemplate.hs" #-} -- $Id$ - {-# LINE 28 "GenericTemplate.hs" #-} @@ -1586,20 +1586,11 @@ data Happy_IntList = HappyCons Int# Happy_IntList - {-# LINE 49 "GenericTemplate.hs" #-} - {-# LINE 59 "GenericTemplate.hs" #-} - - - - - - - - +{-# LINE 68 "GenericTemplate.hs" #-} infixr 9 `HappyStk` data HappyStk a = HappyStk a (HappyStk a) @@ -1651,14 +1642,7 @@ happyDoAction i tk st action | check = indexShortOffAddr happyTable off_i | otherwise = indexShortOffAddr happyDefActions st - - - - - - - - +{-# LINE 127 "GenericTemplate.hs" #-} indexShortOffAddr (HappyA# arr) off = -- cgit v1.2.3