Commit f1902573 authored by Ryan Scott's avatar Ryan Scott Committed by Herbert Valerio Riedel

Migrate patches to most recent versions and clean up old patches

parent c0d50865
commit 43567905fcdebcaf781a194ad0a006a8053dec82
Author: Ryan Scott <ryan.gl.scott@gmail.com>
Date: Thu May 2 10:59:53 2019 -0400
Adapt to base-4.13.0.0
diff --git a/src/Graphics/Rendering/OpenGL/GL/IOState.hs b/src/Graphics/Rendering/OpenGL/GL/IOState.hs
index c81c4c0..3ec5cee 100644
--- a/src/Graphics/Rendering/OpenGL/GL/IOState.hs
+++ b/src/Graphics/Rendering/OpenGL/GL/IOState.hs
@@ -40,7 +40,9 @@ instance Functor (IOState s) where
instance Monad (IOState s) where
return a = IOState $ \s -> return (a, s)
m >>= k = IOState $ \s -> do (a, s') <- runIOState m s ; runIOState (k a) s'
+#if !(MIN_VERSION_base(4,13,0))
fail str = IOState $ \_ -> fail str
+#endif
getIOState :: IOState s (Ptr s)
getIOState = IOState $ \s -> return (s, s)
commit b7ab319ddfc1a5687ba94da7e2b658ffbce8d8b1
Author: Ryan Scott <ryan.gl.scott@gmail.com>
Date: Fri Mar 15 08:48:22 2019 -0400
Adapt to base-4.13.0.0
diff --git a/Text/Appar/Parser.hs b/Text/Appar/Parser.hs
index f949292..ab2b1f0 100644
--- a/Text/Appar/Parser.hs
+++ b/Text/Appar/Parser.hs
@@ -1,3 +1,4 @@
+{-# LANGUAGE CPP #-}
{-# LANGUAGE OverloadedStrings #-}
{-|
@@ -84,8 +85,10 @@ instance Monad (MkParser inp) where
p >>= f = P $ \bs -> case runParser p bs of
(Nothing, bs') -> (Nothing, bs')
(Just a, bs') -> runParser (f a) bs'
+#if !(MIN_VERSION_base(4,13,0))
-- fixme: GHC 8.x will remove the fail method
fail = Fail.fail
+#endif
instance MonadFail (MkParser inp) where
fail _ = P $ \bs -> (Nothing, bs)
name: bits
category: Data, Serialization
version: 0.5.1
x-revision: 5
license: BSD3
cabal-version: >= 1.8
license-file: LICENSE
author: Edward A. Kmett
maintainer: Edward A. Kmett <ekmett@gmail.com>
stability: experimental
homepage: http://github.com/ekmett/bits
bug-reports: http://github.com/ekmett/bits/issues
copyright: Copyright (C) 2013 Edward A. Kmett
build-type: Custom
tested-with: GHC == 7.8.4, GHC == 7.10.3, GHC == 8.0.2, GHC == 8.2.1
synopsis: Various bit twiddling and bitwise serialization primitives
description: Various bit twiddling and bitwise serialization primitives
extra-source-files:
.travis.yml
.ghci
.gitignore
.vim.custom
travis/cabal-apt-install
travis/config
AUTHORS.markdown
README.markdown
CHANGELOG.markdown
source-repository head
type: git
location: git://github.com/ekmett/bits.git
custom-setup
setup-depends:
base >= 4 && < 5,
Cabal,
cabal-doctest >= 1 && < 1.1
-- You can disable the doctests test suite with -f-test-doctests
flag test-doctests
default: True
manual: True
library
build-depends:
base >= 4.7 && < 5,
bytes >= 0.11 && < 1,
mtl >= 2.0 && < 2.3,
transformers >= 0.2 && < 0.6
exposed-modules:
Data.Bits.Coding
Data.Bits.Coded
Data.Bits.Extras
c-sources: cbits/debruijn.c
ghc-options: -Wall -fwarn-tabs -O2
hs-source-dirs: src
test-suite doctests
type: exitcode-stdio-1.0
main-is: doctests.hs
ghc-options: -Wall -threaded
hs-source-dirs: tests
c-sources: cbits/debruijn.c
if !flag(test-doctests)
buildable: False
else
build-depends:
base,
bits,
doctest >= 0.11.1 && < 0.17
commit 09e95ef0cb130b91b66240b11def6d019813c3bd
Author: Ryan Scott <ryan.gl.scott@gmail.com>
Date: Sat Mar 16 08:45:47 2019 -0400
Adapt to base-4.13.0.0
diff --git a/src/Data/Bits/Coding.hs b/src/Data/Bits/Coding.hs
index 700c118..833b41e 100644
--- a/src/Data/Bits/Coding.hs
+++ b/src/Data/Bits/Coding.hs
@@ -26,6 +26,7 @@ module Data.Bits.Coding
import Control.Applicative
import Control.Monad
+import qualified Control.Monad.Fail as Fail
import Control.Monad.State.Class
import Control.Monad.Reader.Class
import Control.Monad.Trans
@@ -60,8 +61,14 @@ instance Monad m => Monad (Coding m) where
{-# INLINE return #-}
Coding m >>= f = Coding $ \ k -> m $ \a -> runCoding (f a) k
{-# INLINE (>>=) #-}
+#if !(MIN_VERSION_base(4,13,0))
fail e = Coding $ \_ _ _ -> fail e
{-# INLINE fail #-}
+#endif
+
+instance Fail.MonadFail m => Fail.MonadFail (Coding m) where
+ fail e = Coding $ \_ _ _ -> Fail.fail e
+ {-# INLINE fail #-}
-- Binary.Get is strangely missing MonadPlus
instance (Monad m, Alternative m) => Alternative (Coding m) where
Name: blank-canvas
Version: 0.6.3
x-revision: 2
Synopsis: HTML5 Canvas Graphics Library
Description: @blank-canvas@ is a Haskell binding to the complete
<https://developer.mozilla.org/en-US/docs/Web/API/Canvas_API HTML5 Canvas API>.
@blank-canvas@ allows Haskell users to write, in Haskell,
interactive images onto their web browsers. @blank-canvas@
gives the user a single full-window canvas, and provides
many well-documented functions for rendering
images.
.
@
&#123;-&#35; LANGUAGE OverloadedStrings &#35;-&#125;
module Main where
import Graphics.Blank -- import the blank canvas
.
main = blankCanvas 3000 $ \\ context -> do -- start blank canvas on port 3000
&#32;&#32;send context $ do -- send commands to this specific context
&#32;&#32;&#32;&#32;moveTo(50,50)
&#32;&#32;&#32;&#32;lineTo(200,100)
&#32;&#32;&#32;&#32;lineWidth 10
&#32;&#32;&#32;&#32;strokeStyle \"red\"
&#32;&#32;&#32;&#32;stroke() -- this draws the ink into the canvas
@
.
<<https://github.com/ku-fpg/blank-canvas/wiki/images/Red_Line.png>>
.
For more details, read the <https://github.com/ku-fpg/blank-canvas/wiki blank-canvas wiki>.
.
License: BSD3
License-file: LICENSE
Author: Andy Gill and Ryan Scott
Maintainer: andygill@ku.edu
Copyright: Copyright (c) 2014 The University of Kansas
Homepage: https://github.com/ku-fpg/blank-canvas/wiki
Bug-reports: https://github.com/ku-fpg/blank-canvas/issues
Category: Graphics
Build-type: Simple
Stability: Beta
Extra-source-files: README.md
Changelog.md
Cabal-version: >= 1.10
tested-with: GHC == 7.8.4, GHC == 7.10.3, GHC == 8.0.2, GHC == 8.2.2, GHC == 8.4.1
data-files:
static/index.html
static/jquery.js
static/jquery-json.js
Library
Exposed-modules: Graphics.Blank
Graphics.Blank.Cursor
Graphics.Blank.Font
Graphics.Blank.GHCi
Graphics.Blank.Style
other-modules: Graphics.Blank.Canvas
Graphics.Blank.DeviceContext
Graphics.Blank.Events
Graphics.Blank.Generated
Graphics.Blank.JavaScript
Graphics.Blank.Parser
Graphics.Blank.Types
Graphics.Blank.Types.CSS
Graphics.Blank.Types.Cursor
Graphics.Blank.Types.Font
Graphics.Blank.Utils
Paths_blank_canvas
default-language: Haskell2010
build-depends: aeson >= 0.7 && < 1.5,
base64-bytestring == 1.0.*,
base >= 4.7 && < 4.13,
base-compat-batteries >= 0.10 && < 0.11,
bytestring == 0.10.*,
colour >= 2.2 && < 3.0,
containers >= 0.5 && < 0.7,
data-default-class >= 0.0.1 && < 0.2,
http-types >= 0.8 && < 0.13,
mime-types >= 0.1.0.3 && < 0.2,
kansas-comet >= 0.4 && < 0.5,
scotty >= 0.10 && < 0.12,
semigroups >= 0.18 && < 1,
stm >= 2.2 && < 2.6,
text >= 1.1 && < 1.3,
text-show >= 2 && < 4,
transformers >= 0.3 && < 0.6,
wai == 3.*,
wai-extra >= 3.0.1 && < 3.1,
warp == 3.*,
vector >= 0.10 && < 0.13
GHC-options: -Wall
GHC-prof-options: -Wall -fsimpl-tick-factor=100000
test-suite wiki-suite
build-depends: base >= 4.7 && < 4.13,
base-compat-batteries >= 0.10 && < 0.11,
blank-canvas,
containers >= 0.5 && < 0.7,
process >= 1.2 && < 1.7,
directory >= 1.2,
shake >= 0.13,
stm >= 2.2 && < 2.6,
text >= 1.1 && < 1.3,
time >= 1.4 && < 1.9,
unix == 2.7.*,
vector >= 0.10 && < 0.13
default-language: Haskell2010
GHC-options: -threaded -Wall
main-is: Main.hs
hs-source-dirs: wiki-suite
type: exitcode-stdio-1.0
other-modules: Arc
Bezier_Curve
Bounce
Circle
Clipping_Region
Color_Fill
Color_Square
Custom_Shape
Custom_Transform
Draw_Canvas
Draw_Device
Draw_Image
Favicon
Font_Size_and_Style
Get_Image_Data_URL
Global_Alpha
Global_Composite_Operations
Grayscale
Image_Crop
Image_Loader
Image_Size
Is_Point_In_Path
Key_Read
Line
Line_Cap
Line_Color
Line_Join
Line_Width
Linear_Gradient
Load_Image_Data_URL
Load_Image_Data_URL_2
Miter_Limit
Path
Pattern
Quadratic_Curve
Radial_Gradient
Rectangle
Red_Line
Rotate_Transform
Rotating_Square
Rounded_Corners
Scale_Transform
Semicircle
Shadow
Square
Text_Align
Text_Baseline
Text_Color
Text_Metrics
Text_Stroke
Text_Wrap
Tic_Tac_Toe
Translate_Transform
Wiki
source-repository head
type: git
location: https://github.com/ku-fpg/blank-canvas.git
diff -ru blank-canvas-0.6.3.orig/Graphics/Blank/Style.hs blank-canvas-0.6.3/Graphics/Blank/Style.hs
--- blank-canvas-0.6.3.orig/Graphics/Blank/Style.hs 2018-04-07 20:04:46.000000000 -0400
+++ blank-canvas-0.6.3/Graphics/Blank/Style.hs 2019-03-15 18:46:01.470815640 -0400
@@ -189,6 +189,8 @@
, rebeccapurple
) where
+import qualified Control.Monad.Fail as Fail
+
import qualified Data.Colour as Colour
import Data.Colour hiding (black, transparent)
import qualified Data.Colour.Names as Names
@@ -248,7 +250,7 @@
-- |
-- Takes a string naming a 'Colour' (must be all lowercase) and returns it. Fails if
-- the name is not recognized.
-readColourName :: Monad m => String -> m (Colour Double)
+readColourName :: Fail.MonadFail m => String -> m (Colour Double)
readColourName "rebeccapurple" = return rebeccapurple
readColourName name = Names.readColourName name
diff -ru colour-2.3.4.orig/Data/Colour/Names.hs colour-2.3.4/Data/Colour/Names.hs
--- colour-2.3.4.orig/Data/Colour/Names.hs 2017-12-03 22:43:01.000000000 -0500
+++ colour-2.3.4/Data/Colour/Names.hs 2019-03-15 09:50:01.875413167 -0400
@@ -182,10 +182,11 @@
where
import Prelude hiding (tan)
+import qualified Control.Monad.Fail as Fail
import Data.Colour.SRGB
import Data.Colour (black)
-readColourName :: (Monad m, Ord a, Floating a) => String -> m (Colour a)
+readColourName :: (Fail.MonadFail m, Ord a, Floating a) => String -> m (Colour a)
readColourName "aliceblue" = return aliceblue
readColourName "antiquewhite" = return antiquewhite
readColourName "aqua" = return aqua
commit e03f3dfcffdda101ff48b508a80cc5d99cba89e2
Author: Ryan Scott <ryan.gl.scott@gmail.com>
Date: Thu Feb 21 06:44:43 2019 -0500
Fix the build with GHC 8.9
diff --git a/src/Data/Constraint/Forall.hs b/src/Data/Constraint/Forall.hs
index 3932f29..185fc95 100644
--- a/src/Data/Constraint/Forall.hs
+++ b/src/Data/Constraint/Forall.hs
@@ -142,8 +142,14 @@ instance Forall (R p t a) => Q p t a
class Forall (Q p t) => ForallT (p :: k4 -> Constraint) (t :: (k1 -> k2) -> k3 -> k4)
instance Forall (Q p t) => ForallT p t
+#if __GLASGOW_HASKELL__ >= 809
+# define KVS(kvs) kvs
+#else
+# define KVS(kvs)
+#endif
+
-- | Instantiate a quantified @'ForallT' p t@ constraint at types @f@ and @a@.
-instT :: forall (p :: k4 -> Constraint) (t :: (k1 -> k2) -> k3 -> k4) (f :: k1 -> k2) (a :: k3). ForallT p t :- p (t f a)
+instT :: forall KVS(k4 k1 k2 k3) (p :: k4 -> Constraint) (t :: (k1 -> k2) -> k3 -> k4) (f :: k1 -> k2) (a :: k3). ForallT p t :- p (t f a)
instT = Sub $
case inst :: Forall (Q p t) :- Q p t f of { Sub Dict ->
case inst :: Forall (R p t f) :- R p t f a of
commit 5df9f75585a3f1aef9c4dfa593b6874e38f074dc
Author: Ryan Scott <ryan.gl.scott@gmail.com>
Date: Tue Mar 26 19:48:10 2019 -0400
Adapt to base-4.13.0.0
diff --git a/src/Control/Monad/Catch/Pure.hs b/src/Control/Monad/Catch/Pure.hs
index 72a8401..4e433b5 100644
--- a/src/Control/Monad/Catch/Pure.hs
+++ b/src/Control/Monad/Catch/Pure.hs
@@ -110,7 +110,9 @@ instance Monad m => Monad (CatchT m) where
CatchT m >>= k = CatchT $ m >>= \ea -> case ea of
Left e -> return (Left e)
Right a -> runCatchT (k a)
+#if !(MIN_VERSION_base(4,13,0))
fail = Fail.fail
+#endif
instance Monad m => Fail.MonadFail (CatchT m) where
fail = CatchT . return . Left . toException . userError
diff --git a/System/FileLock/Internal/Flock.hsc b/System/FileLock/Internal/Flock.hsc diff -ru filelock-0.1.1.3.orig/System/FileLock/Internal/Flock.hsc filelock-0.1.1.3/System/FileLock/Internal/Flock.hsc
index 6a5d9ea..559217a 100644 --- filelock-0.1.1.3.orig/System/FileLock/Internal/Flock.hsc 2001-09-08 21:46:40.000000000 -0400
--- a/System/FileLock/Internal/Flock.hsc +++ filelock-0.1.1.3/System/FileLock/Internal/Flock.hsc 2019-05-11 09:09:15.690243173 -0400
+++ b/System/FileLock/Internal/Flock.hsc @@ -12,7 +12,11 @@
@@ -12,7 +12,11 @@ import Data.Bits
import Foreign.C.Error import Foreign.C.Error
import Foreign.C.Types import Foreign.C.Types
import System.Posix.Files import System.Posix.Files
-import System.Posix.IO (openFd, closeFd, defaultFileFlags, OpenMode(..)) -import System.Posix.IO (openFd, closeFd, defaultFileFlags, OpenMode(..), setFdOption, FdOption(..))
+import System.Posix.IO ( openFd, closeFd, defaultFileFlags, OpenMode(..) +import System.Posix.IO ( openFd, closeFd, defaultFileFlags, OpenMode(..), setFdOption, FdOption(..)
+#if MIN_VERSION_unix(2,8,0) +#if MIN_VERSION_unix(2,8,0)
+ , creat + , creat
+#endif +#endif
...@@ -15,17 +14,17 @@ index 6a5d9ea..559217a 100644 ...@@ -15,17 +14,17 @@ index 6a5d9ea..559217a 100644
import System.Posix.Types import System.Posix.Types
import Prelude import Prelude
@@ -38,7 +42,12 @@ unlock :: Lock -> IO () @@ -39,7 +43,12 @@
unlock fd = closeFd fd
open :: FilePath -> IO Fd open :: FilePath -> IO Fd
-open path = openFd path WriteOnly (Just stdFileMode) defaultFileFlags open path = do
+open path = openFd path WriteOnly - fd <- openFd path WriteOnly (Just stdFileMode) defaultFileFlags
+ fd <- openFd path WriteOnly
+#if MIN_VERSION_unix(2,8,0) +#if MIN_VERSION_unix(2,8,0)
+ (defaultFileFlags {creat = Just stdFileMode}) + (defaultFileFlags {creat = Just stdFileMode})
+#else +#else
+ (Just stdFileMode) defaultFileFlags + (Just stdFileMode) defaultFileFlags
+#endif +#endif
-- Ideally, we would open the file descriptor with CLOEXEC enabled, but since
flock :: Fd -> Bool -> Bool -> IO Bool -- unix 2.8 hasn't been released yet and we want backwards compatibility with
flock (Fd fd) exclusive block = do -- older releases, we set CLOEXEC after opening the file descriptor. This
commit ef1cdd4ca6afd540ba142b545b9a5937ff8810f3
Author: Ryan Scott <ryan.gl.scott@gmail.com>
Date: Fri Mar 15 14:18:23 2019 -0400
Adapt to base-4.13.0.0
diff --git a/src/Control/Monad/Trans/Free.hs b/src/Control/Monad/Trans/Free.hs
index 555cc91..1d83846 100644
--- a/src/Control/Monad/Trans/Free.hs
+++ b/src/Control/Monad/Trans/Free.hs
@@ -308,9 +308,11 @@ instance (Functor f, Monad m) => Monad (FreeT f m) where
Pure a -> runFreeT (f a)
Free w -> return (Free (fmap (>>= f) w))
- fail = Fail.fail
+#if !(MIN_VERSION_base(4,13,0))
+ fail e = FreeT (fail e)
+#endif
-instance (Functor f, Monad m) => Fail.MonadFail (FreeT f m) where
+instance (Functor f, Fail.MonadFail m) => Fail.MonadFail (FreeT f m) where
fail e = FreeT (fail e)
instance MonadTrans (FreeT f) where
diff --git a/src/Control/Monad/Trans/Free/Ap.hs b/src/Control/Monad/Trans/Free/Ap.hs
index f739d2b..6239025 100644
--- a/src/Control/Monad/Trans/Free/Ap.hs
+++ b/src/Control/Monad/Trans/Free/Ap.hs
@@ -307,9 +307,11 @@ instance (Applicative f, Applicative m, Monad m) => Monad (FreeT f m) where
FreeT m >>= f = FreeT $ m >>= \v -> case v of
Pure a -> runFreeT (f a)
Free w -> return (Free (fmap (>>= f) w))
- fail = Fail.fail
+#if !(MIN_VERSION_base(4,13,0))
+ fail e = FreeT (fail e)
+#endif
-instance (Applicative f, Applicative m, Monad m) => Fail.MonadFail (FreeT f m) where
+instance (Applicative f, Applicative m, Fail.MonadFail m) => Fail.MonadFail (FreeT f m) where
fail e = FreeT (fail e)
instance MonadTrans (FreeT f) where
diff --git a/src/Control/Monad/Trans/Iter.hs b/src/Control/Monad/Trans/Iter.hs
index 25c8239..7a46ce2 100644
--- a/src/Control/Monad/Trans/Iter.hs
+++ b/src/Control/Monad/Trans/Iter.hs
@@ -219,8 +219,10 @@ instance Monad m => Monad (IterT m) where
{-# INLINE return #-}
IterT m >>= k = IterT $ m >>= either (runIterT . k) (return . Right . (>>= k))
{-# INLINE (>>=) #-}
+#if !(MIN_VERSION_base(4,13,0))
fail = Fail.fail
{-# INLINE fail #-}
+#endif
instance Monad m => Fail.MonadFail (IterT m) where
fail _ = never
commit dca20cc273e6ad80ae835d77866cd9a7350304b8
Author: Ryan Scott <ryan.gl.scott@gmail.com>
Date: Mon Dec 10 12:41:33 2018 -0500
Allow building with template-haskell-2.15.0.0
diff --git a/src/Generics/SOP/TH.hs b/src/Generics/SOP/TH.hs
index 4c3522e..fc3fc92 100644
--- a/src/Generics/SOP/TH.hs
+++ b/src/Generics/SOP/TH.hs
@@ -193,7 +193,12 @@ deriveGenericForDataDec f _isNewtype _cxt name bndrs cons _derivs = do
deriveGenericForDataType :: (Name -> Q Type) -> Q Type -> [Con] -> Q [Dec]
deriveGenericForDataType f typ cons = do
- let codeSyn = tySynInstD ''Code $ tySynEqn [typ] (codeFor f cons)
+ let codeSyn =
+#if MIN_VERSION_template_haskell(2,15,0)
+ tySynInstD $ tySynEqn Nothing (conT ''Code `appT` typ) (codeFor f cons)
+#else
+ tySynInstD ''Code $ tySynEqn [typ] (codeFor f cons)
+#endif
inst <- instanceD
(cxt [])
[t| Generic $typ |]
@@ -301,7 +306,11 @@ projection toName = funD toName . go'
metadataType :: Q Type -> Bool -> Name -> [Con] -> Q Dec
metadataType typ isNewtype typeName cs =
+#if MIN_VERSION_template_haskell(2,15,0)
+ tySynInstD (tySynEqn Nothing (conT ''DatatypeInfoOf `appT` typ) (metadataType' isNewtype typeName cs))
+#else
tySynInstD ''DatatypeInfoOf (tySynEqn [typ] (metadataType' isNewtype typeName cs))
+#endif
-- | Derive term-level metadata.
metadata' :: Bool -> Name -> [Con] -> Q Exp
diff -ru happy-1.19.10.orig/src/AttrGrammarParser.hs happy-1.19.10/src/AttrGrammarParser.hs
--- happy-1.19.10.orig/src/AttrGrammarParser.hs 2019-05-09 03:31:41.000000000 -0400
+++ happy-1.19.10/src/AttrGrammarParser.hs 2019-05-11 08:44:12.337786973 -0400
@@ -339,7 +339,7 @@
happyError :: P a
-happyError = fail ("Parse error\n")
+happyError = failP ("Parse error\n")
{-# LINE 1 "templates/GenericTemplate.hs" #-}
{-# LINE 1 "templates/GenericTemplate.hs" #-}
{-# LINE 1 "<built-in>" #-}
name: happy
version: 1.19.9
x-revision: 3
license: BSD2
license-file: LICENSE
copyright: (c) Andy Gill, Simon Marlow
author: Andy Gill and Simon Marlow
maintainer: Simon Marlow <marlowsd@gmail.com>
bug-reports: https://github.com/simonmar/happy/issues
stability: stable
homepage: https://www.haskell.org/happy/
synopsis: Happy is a parser generator for Haskell
category: Development
cabal-version: >= 1.8
build-type: Custom
Description:
Happy is a parser generator for Haskell. Given a grammar
specification in BNF, Happy generates Haskell code to parse the
grammar. Happy works in a similar way to the @yacc@ tool for C.
tested-with: GHC==8.0.1, GHC==7.10.3, GHC==7.8.4, GHC==7.6.3
extra-source-files:
ANNOUNCE
CHANGES
Makefile
README.md
TODO
doc/Makefile
doc/aclocal.m4
doc/config.mk.in
doc/configure.ac
doc/docbook-xml.mk
doc/fptools.css
doc/happy.1.in
doc/happy.xml
examples/glr/nlp/Main.lhs
examples/glr/nlp/Makefile
examples/glr/nlp/README
examples/glr/nlp/English.y
examples/glr/nlp/Hugs.lhs
examples/glr/Makefile
examples/glr/Makefile.defs
examples/glr/expr-eval/Main.lhs
examples/glr/expr-eval/Makefile
examples/glr/expr-eval/Expr.y
examples/glr/expr-eval/README
examples/glr/expr-eval/Hugs.lhs
examples/glr/expr-tree/Main.lhs
examples/glr/expr-tree/Makefile
examples/glr/expr-tree/Expr.y
examples/glr/expr-tree/README
examples/glr/expr-tree/Tree.lhs
examples/glr/expr-tree/Hugs.lhs
examples/glr/highly-ambiguous/Main.lhs
examples/glr/highly-ambiguous/Makefile
examples/glr/highly-ambiguous/Expr.y
examples/glr/highly-ambiguous/README
examples/glr/highly-ambiguous/Hugs.lhs
examples/glr/hidden-leftrec/Main.lhs
examples/glr/hidden-leftrec/Makefile
examples/glr/hidden-leftrec/Expr.y
examples/glr/hidden-leftrec/README
examples/glr/hidden-leftrec/Hugs.lhs
examples/glr/expr-monad/Main.lhs
examples/glr/expr-monad/Makefile
examples/glr/expr-monad/Expr.y
examples/glr/expr-monad/README
examples/glr/expr-monad/Hugs.lhs
examples/glr/bio-eg/Main.lhs
examples/glr/bio-eg/Makefile
examples/glr/bio-eg/Bio.y
examples/glr/bio-eg/README
examples/glr/bio-eg/1-1200.dna
examples/glr/bio-eg/1-600.dna
examples/glr/common/DV_lhs
examples/glr/common/DaVinciTypes.hs
examples/glr/packing/Main.lhs
examples/glr/packing/Makefile
examples/glr/packing/Expr.y
examples/glr/packing/README
examples/glr/packing/Hugs.lhs
examples/PgnParser.ly
examples/MonadTest.ly
examples/igloo/ParserM.hs
examples/igloo/Makefile
examples/igloo/Parser.y
examples/igloo/Foo.hs
examples/igloo/README
examples/igloo/Lexer.x
examples/README
examples/Calc.ly
examples/DavesExample.ly
examples/ErrorTest.ly
examples/ErlParser.ly
examples/SimonsExample.ly
examples/LexerTest.ly
happy.spec
src/ARRAY-NOTES
templates/GLR_Base.hs
templates/GenericTemplate.hs
templates/GLR_Lib.hs
tests/AttrGrammar001.y
tests/AttrGrammar002.y
tests/Makefile
tests/Partial.ly
tests/Test.ly
tests/TestMulti.ly
tests/TestPrecedence.ly
tests/bogus-token.y
tests/bug001.ly
tests/bug002.y
tests/error001.stderr
tests/error001.stdout
tests/error001.y
tests/monad001.y
tests/monad002.ly
tests/monaderror.y
tests/precedence001.ly
tests/precedence002.y
tests/test_rules.y
tests/issue91.y
tests/issue93.y
tests/issue94.y
tests/issue95.y
tests/monaderror-explist.y
tests/typeclass_monad001.y
tests/typeclass_monad002.ly
tests/typeclass_monad_lexer.y
custom-setup
setup-depends: Cabal <2.6,
base <5,
directory <1.4,
filepath <1.5
source-repository head
type: git
location: https://github.com/simonmar/happy.git
flag small_base
description: Deprecated. Does nothing.
executable happy
hs-source-dirs: src
main-is: Main.lhs
build-depends: base >= 4.6 && < 5,
array,
containers >= 0.4.2,
mtl >= 2.2.1
-- mtl-2.2.1 added Control.Monad.Except
extensions: CPP, MagicHash, FlexibleContexts
ghc-options: -Wall
other-modules:
Paths_happy
AbsSyn
First
GenUtils
Grammar
Info
LALR
Lexer
ParseMonad
Parser
ProduceCode
ProduceGLRCode
NameSet