diff options
| author | bringert <unknown> | 2005-06-17 13:15:16 +0000 |
|---|---|---|
| committer | bringert <unknown> | 2005-06-17 13:15:16 +0000 |
| commit | 2c48a10236bb19d8b04382cb1e957ce18b9d29fd (patch) | |
| tree | 1194fc1981b5cd2a144b72f4fff261edfeb1af2e /src/GF/Canon/ParGFC.hs | |
| parent | 05b5ffe5bf03a870f6fe0728ace6c0d8de69b89e (diff) | |
Changed name of Con constructor in GFC.cf to avoid errors on Windows when generating Java code with BNFC for the GFC grammar. CON is a reserved filename on Windows. Con was changed to Par, and all the code using was changed too.
Diffstat (limited to 'src/GF/Canon/ParGFC.hs')
| -rw-r--r-- | src/GF/Canon/ParGFC.hs | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/src/GF/Canon/ParGFC.hs b/src/GF/Canon/ParGFC.hs index 9fbb39c83..3727ab9bf 100644 --- a/src/GF/Canon/ParGFC.hs +++ b/src/GF/Canon/ParGFC.hs @@ -2,9 +2,9 @@ module GF.Canon.ParGFC where import GF.Canon.AbsGFC import GF.Canon.LexGFC -import GF.Data.ErrM -import GF.Infra.Ident --H -import Data.Array +import GF.Data.ErrM -- H +import GF.Infra.Ident -- H +import Array #if __GLASGOW_HASKELL__ >= 503 import GHC.Exts #else @@ -511,7 +511,7 @@ happyReduce_2 = happySpecReduce_1 0# happyReduction_2 happyReduction_2 happy_x_1 = case happyOutTok happy_x_1 of { (PT _ (TV happy_var_1)) -> happyIn5 - (identC happy_var_1 --H + (identC happy_var_1 )} happyReduce_3 = happySpecReduce_1 1# happyReduction_3 @@ -1194,7 +1194,7 @@ happyReduction_75 (happy_x_4 `HappyStk` = case happyOut19 happy_x_2 of { happy_var_2 -> case happyOut53 happy_x_3 of { happy_var_3 -> happyIn33 - (Con happy_var_2 (reverse happy_var_3) + (Par happy_var_2 (reverse happy_var_3) ) `HappyStk` happyRest}} happyReduce_76 = happySpecReduce_2 28# happyReduction_76 @@ -1836,7 +1836,7 @@ happyError ts = myLexer = tokens {-# LINE 1 "GenericTemplate.hs" #-} --- $Id: ParGFC.hs,v 1.10 2005/05/27 21:05:17 aarne Exp $ +-- $Id: ParGFC.hs,v 1.11 2005/06/17 14:15:17 bringert Exp $ |