uuagc 0.9.32 → 0.9.33

raw patch · 32 files changed

+37/−39 lines, 32 files

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 +1/−1
src-derived/Visage.hs +1/−1
src-derived/VisagePatterns.hs +1/−1
src-derived/VisageSyntax.hs +1/−1
src/Parser.hs +6/−8
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.30 (AG2AspectAG.ag)+-- UUAGC 0.9.32 (AG2AspectAG.ag) module AG2AspectAG where {-# LINE 7 "AG2AspectAG.ag" #-}

src-derived/AbstractSyntax.hs view

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

src-derived/AbstractSyntaxDump.hs view

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

src-derived/Code.hs view

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

src-derived/CodeSyntax.hs view

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

src-derived/CodeSyntaxDump.hs view

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

src-derived/ConcreteSyntax.hs view

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

src-derived/DeclBlocks.hs view

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

src-derived/DefaultRules.hs view

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

src-derived/Desugar.hs view

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

src-derived/ErrorMessages.hs view

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

src-derived/Expression.hs view

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

src-derived/GenerateCode.hs view

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

src-derived/HsToken.hs view

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

src-derived/Interfaces.hs view

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

src-derived/InterfacesRules.hs view

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

src-derived/Order.hs view

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

src-derived/Patterns.hs view

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

src-derived/PrintCode.hs view

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

src-derived/PrintErrorMessages.hs view

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

src-derived/PrintOcamlCode.hs view

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

src-derived/PrintVisitCode.hs view

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

src-derived/SemHsTokens.hs view

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

src-derived/TfmToVisage.hs view

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

src-derived/Transform.hs view

@@ -1,6 +1,6 @@  --- UUAGC 0.9.30 (Transform.ag)+-- UUAGC 0.9.32 (Transform.ag) module Transform where {-# LINE 8 "Transform.ag" #-}

src-derived/Visage.hs view

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

src-derived/VisagePatterns.hs view

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

src-derived/VisageSyntax.hs view

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

src/Parser.hs view

@@ -20,6 +20,7 @@ import UU.Scanner.Position import UU.Scanner.TokenShow() import System.Directory+import System.FilePath import HsTokenScanner import Options @@ -262,14 +263,11 @@  resolveFile :: [FilePath] -> FilePath -> IO FilePath resolveFile path fname = search (path ++ ["."])                                                  - where search (p:ps) = do dExists <- doesDirectoryExist p-                          if dExists-                             then do let filename = p++pathSeparator++fname-                                     fExists <- doesFileExist filename-                                     if fExists-                                        then return filename-                                        else search ps      -                             else search ps+ where search (p:ps) = do let filename = joinPath [p, fname]+                          fExists <- doesFileExist filename+                          if fExists+                            then return filename+                            else search ps        search []     = error ("File: " ++ show fname ++ " not found in search path: " ++ show (concat (intersperse ";" (path ++ ["."]))) )                        pathSeparator = "/"

src/Version.hs view

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

uuagc.cabal view

@@ -1,7 +1,7 @@ cabal-version: >=1.2 build-type: Simple name: uuagc-version: 0.9.32+version: 0.9.33 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.32+version: 0.9.33 license: GPL license-file: LICENSE maintainer: Arie Middelkoop <ariem@cs.uu.nl>