uuagc 0.9.35 → 0.9.36

raw patch · 33 files changed

+37/−35 lines, 33 filesnew-uploader

Files

src-derived/AG2AspectAG.hs +1/−1
src-derived/AbstractSyntax.hs +1/−1
src-derived/AbstractSyntaxDump.hs +1/−1
src-derived/Code.hs +1/−1
src-derived/CodeSyntax.hs +1/−1
src-derived/CodeSyntaxDump.hs +1/−1
src-derived/ConcreteSyntax.hs +1/−1
src-derived/DeclBlocks.hs +1/−1
src-derived/DefaultRules.hs +1/−1
src-derived/Desugar.hs +1/−1
src-derived/ErrorMessages.hs +1/−1
src-derived/Expression.hs +1/−1
src-derived/GenerateCode.hs +1/−1
src-derived/HsToken.hs +1/−1
src-derived/Interfaces.hs +1/−1
src-derived/InterfacesRules.hs +1/−1
src-derived/Order.hs +1/−1
src-derived/Patterns.hs +1/−1
src-derived/PrintCode.hs +1/−1
src-derived/PrintErrorMessages.hs +1/−1
src-derived/PrintOcamlCode.hs +1/−1
src-derived/PrintVisitCode.hs +1/−1
src-derived/SemHsTokens.hs +1/−1
src-derived/TfmToVisage.hs +1/−1
src-derived/Transform.hs +2/−2
src-derived/Visage.hs +1/−1
src-derived/VisagePatterns.hs +1/−1
src-derived/VisageSyntax.hs +1/−1
src/Scanner.hs +2/−2
src/TokenDef.hs +3/−1
src/Version.hs +1/−1
uuagc.cabal +1/−1
uuagc.cabal-for-ghc-6.6 +1/−1

src-derived/AG2AspectAG.hs view

@@ -1,6 +1,6 @@  --- UUAGC 0.9.34 (AG2AspectAG.ag)+-- UUAGC 0.9.35 (AG2AspectAG.ag) module AG2AspectAG where {-# LINE 7 "AG2AspectAG.ag" #-}

src-derived/AbstractSyntax.hs view

@@ -1,6 +1,6 @@  --- UUAGC 0.9.34 (AbstractSyntax.ag)+-- UUAGC 0.9.35 (AbstractSyntax.ag) module AbstractSyntax where {-# LINE 2 "AbstractSyntax.ag" #-}

src-derived/AbstractSyntaxDump.hs view

@@ -1,6 +1,6 @@  --- UUAGC 0.9.34 (AbstractSyntaxDump.ag)+-- UUAGC 0.9.35 (AbstractSyntaxDump.ag) module AbstractSyntaxDump where {-# LINE 6 "AbstractSyntaxDump.ag" #-}

src-derived/Code.hs view

@@ -1,6 +1,6 @@  --- UUAGC 0.9.34 (Code.ag)+-- UUAGC 0.9.35 (Code.ag) module Code where {-# LINE 2 "Code.ag" #-}

src-derived/CodeSyntax.hs view

@@ -1,6 +1,6 @@  --- UUAGC 0.9.34 (CodeSyntax.ag)+-- UUAGC 0.9.35 (CodeSyntax.ag) module CodeSyntax where {-# LINE 2 "CodeSyntax.ag" #-}

src-derived/CodeSyntaxDump.hs view

@@ -1,6 +1,6 @@  --- UUAGC 0.9.34 (CodeSyntaxDump.ag)+-- UUAGC 0.9.35 (CodeSyntaxDump.ag) module CodeSyntaxDump where {-# LINE 5 "CodeSyntaxDump.ag" #-}

src-derived/ConcreteSyntax.hs view

@@ -1,6 +1,6 @@  --- UUAGC 0.9.34 (ConcreteSyntax.ag)+-- UUAGC 0.9.35 (ConcreteSyntax.ag) module ConcreteSyntax where {-# LINE 2 "ConcreteSyntax.ag" #-}

src-derived/DeclBlocks.hs view

@@ -1,6 +1,6 @@  --- UUAGC 0.9.34 (DeclBlocks.ag)+-- UUAGC 0.9.35 (DeclBlocks.ag) module DeclBlocks where {-# LINE 2 "DeclBlocks.ag" #-}

src-derived/DefaultRules.hs view

@@ -1,6 +1,6 @@ {-# OPTIONS_GHC -XBangPatterns #-} --- UUAGC 0.9.34 (DefaultRules.ag)+-- UUAGC 0.9.35 (DefaultRules.ag) module DefaultRules where {-# LINE 10 "DefaultRules.ag" #-}

src-derived/Desugar.hs view

@@ -1,6 +1,6 @@ {-# OPTIONS_GHC -XBangPatterns #-} --- UUAGC 0.9.34 (Desugar.ag)+-- UUAGC 0.9.35 (Desugar.ag) module Desugar where {-# LINE 13 "Desugar.ag" #-}

src-derived/ErrorMessages.hs view

@@ -1,6 +1,6 @@  --- UUAGC 0.9.34 (ErrorMessages.ag)+-- UUAGC 0.9.35 (ErrorMessages.ag) module ErrorMessages where {-# LINE 2 "ErrorMessages.ag" #-}

src-derived/Expression.hs view

@@ -1,6 +1,6 @@  --- UUAGC 0.9.34 (Expression.ag)+-- UUAGC 0.9.35 (Expression.ag) module Expression where {-# LINE 2 "Expression.ag" #-}

src-derived/GenerateCode.hs view

@@ -1,6 +1,6 @@  --- UUAGC 0.9.34 (GenerateCode.ag)+-- UUAGC 0.9.35 (GenerateCode.ag) module GenerateCode where {-# LINE 9 "GenerateCode.ag" #-}

src-derived/HsToken.hs view

@@ -1,6 +1,6 @@  --- UUAGC 0.9.34 (HsToken.ag)+-- UUAGC 0.9.35 (HsToken.ag) module HsToken where {-# LINE 2 "HsToken.ag" #-}

src-derived/Interfaces.hs view

@@ -1,6 +1,6 @@  --- UUAGC 0.9.34 (Interfaces.ag)+-- UUAGC 0.9.35 (Interfaces.ag) module Interfaces where {-# LINE 2 "Interfaces.ag" #-}

src-derived/InterfacesRules.hs view

@@ -1,6 +1,6 @@ {-# OPTIONS_GHC -XBangPatterns #-} --- UUAGC 0.9.34 (InterfacesRules.lag)+-- UUAGC 0.9.35 (InterfacesRules.lag) module InterfacesRules where {-# LINE 10 "InterfacesRules.lag" #-}

src-derived/Order.hs view

@@ -1,6 +1,6 @@  --- UUAGC 0.9.34 (Order.ag)+-- UUAGC 0.9.35 (Order.ag) module Order where {-# LINE 9 "Order.ag" #-}

src-derived/Patterns.hs view

@@ -1,6 +1,6 @@  --- UUAGC 0.9.34 (Patterns.ag)+-- UUAGC 0.9.35 (Patterns.ag) module Patterns where {-# LINE 2 "Patterns.ag" #-}

src-derived/PrintCode.hs view

@@ -1,6 +1,6 @@ {-# OPTIONS_GHC -XBangPatterns #-} --- UUAGC 0.9.34 (PrintCode.ag)+-- UUAGC 0.9.35 (PrintCode.ag) module PrintCode where {-# LINE 10 "PrintCode.ag" #-}

src-derived/PrintErrorMessages.hs view

@@ -1,6 +1,6 @@  --- UUAGC 0.9.34 (PrintErrorMessages.ag)+-- UUAGC 0.9.35 (PrintErrorMessages.ag) module PrintErrorMessages where {-# LINE 4 "PrintErrorMessages.ag" #-}

src-derived/PrintOcamlCode.hs view

@@ -1,6 +1,6 @@ {-# OPTIONS_GHC -XBangPatterns #-} --- UUAGC 0.9.34 (PrintOcamlCode.ag)+-- UUAGC 0.9.35 (PrintOcamlCode.ag) module PrintOcamlCode where {-# LINE 10 "PrintOcamlCode.ag" #-}

src-derived/PrintVisitCode.hs view

@@ -1,6 +1,6 @@  --- UUAGC 0.9.34 (PrintVisitCode.ag)+-- UUAGC 0.9.35 (PrintVisitCode.ag) module PrintVisitCode where {-# LINE 10 "PrintVisitCode.ag" #-}

src-derived/SemHsTokens.hs view

@@ -1,6 +1,6 @@  --- UUAGC 0.9.34 (SemHsTokens.ag)+-- UUAGC 0.9.35 (SemHsTokens.ag) module SemHsTokens where {-# LINE 4 "SemHsTokens.ag" #-}

src-derived/TfmToVisage.hs view

@@ -1,6 +1,6 @@  --- UUAGC 0.9.34 (TfmToVisage.ag)+-- UUAGC 0.9.35 (TfmToVisage.ag) module TfmToVisage where {-# LINE 8 "TfmToVisage.ag" #-}

src-derived/Transform.hs view

@@ -1,6 +1,6 @@  --- UUAGC 0.9.34 (Transform.ag)+-- UUAGC 0.9.35 (Transform.ag) module Transform where {-# LINE 8 "Transform.ag" #-} @@ -276,7 +276,7 @@              ++ Map.findWithDefault [] con (Map.findWithDefault Map.empty nt allInsts)              -- may have duplicates -    groups = Map.assocs $ Map.foldWithKey (\i r m -> Map.insertWith (++) r [i] m) Map.empty usMap+    groups = Map.assocs $ Map.foldrWithKey (\i r m -> Map.insertWith (++) r [i] m) Map.empty usMap     apply (ref,us) = mkRule ref (findOutField ref) us     findOutField ref = case [ chld | (chld,NT tp _) <- fields, tp `hasSyn` ref] of                          []    -> _LHS

src-derived/Visage.hs view

@@ -1,6 +1,6 @@  --- UUAGC 0.9.34 (Visage.ag)+-- UUAGC 0.9.35 (Visage.ag) module Visage where {-# LINE 6 "Visage.ag" #-}

src-derived/VisagePatterns.hs view

@@ -1,6 +1,6 @@  --- UUAGC 0.9.34 (VisagePatterns.ag)+-- UUAGC 0.9.35 (VisagePatterns.ag) module VisagePatterns where {-# LINE 2 "VisagePatterns.ag" #-}

src-derived/VisageSyntax.hs view

@@ -1,6 +1,6 @@  --- UUAGC 0.9.34 (VisageSyntax.ag)+-- UUAGC 0.9.35 (VisageSyntax.ag) module VisageSyntax where {-# LINE 2 "VisageSyntax.ag" #-}

src/Scanner.hs view

@@ -1,5 +1,5 @@-{-# OPTIONS -fglasgow-exts #-}
-
+{-# LANGUAGE MagicHash,
+             UnboxedTuples #-}
 module Scanner where
 import GHC.Prim
 import TokenDef

src/TokenDef.hs view

@@ -1,4 +1,6 @@-{-# OPTIONS -fglasgow-exts #-}+{-# LANGUAGE MagicHash,+             UnboxedTuples #-}+ module TokenDef where
 
 import GHC.Prim

src/Version.hs view

@@ -1,4 +1,4 @@ module Version where
 
 banner :: String
-banner = "Attribute Grammar compiler / HUT project. Version 0.9.35"
+banner = "Attribute Grammar compiler / HUT project. Version 0.9.36"

uuagc.cabal view

@@ -1,7 +1,7 @@ cabal-version: >=1.2 build-type: Simple name: uuagc-version: 0.9.35+version: 0.9.36 license: GPL license-file: LICENSE maintainer: Arie Middelkoop <ariem@cs.uu.nl>

uuagc.cabal-for-ghc-6.6 view

@@ -1,5 +1,5 @@ name: uuagc-version: 0.9.35+version: 0.9.36 license: GPL license-file: LICENSE maintainer: Arie Middelkoop <ariem@cs.uu.nl>