more cabal file cleanups

This commit is contained in:
sheaf 2023-01-09 02:54:42 +01:00
parent cca4558985
commit 22820b328d
27 changed files with 72 additions and 48 deletions

View file

@ -60,13 +60,11 @@ common common
DeriveTraversable
DeriveGeneric
DerivingVia
DuplicateRecordFields
FlexibleContexts
FlexibleInstances
FunctionalDependencies
GADTs
GeneralisedNewtypeDeriving
ImplicitParams
InstanceSigs
LambdaCase
LexicalNegation
@ -74,11 +72,8 @@ common common
MultiWayIf
NamedFieldPuns
PatternSynonyms
QuantifiedConstraints
RankNTypes
RecordWildCards
RecursiveDo
ScopedTypeVariables
StandaloneDeriving
StandaloneKindSignatures
TupleSections
@ -86,7 +81,6 @@ common common
TypeFamilies
TypeOperators
UnboxedTuples
UndecidableInstances
ViewPatterns
ghc-options:
@ -105,6 +99,16 @@ common common
-fwarn-missing-deriving-strategies
-fno-warn-unticked-promoted-constructors
if flag(asserts)
cpp-options:
-DASSERTS
autogen-modules:
Paths_MetaBrush
other-modules:
Paths_MetaBrush
common extras
build-depends:
@ -190,6 +194,7 @@ library splines
, vector
>= 0.12.1.2 && < 0.14
library metabrushes
import:
@ -214,14 +219,6 @@ library metabrushes
, MetaBrush.Serialisable
, MetaBrush.Unique
, MetaBrush.Util
, Paths_MetaBrush
autogen-modules:
Paths_MetaBrush
if flag(asserts)
cpp-options:
-DASSERTS
build-depends:
splines
@ -229,12 +226,6 @@ library metabrushes
^>= 0.3.0.0
, bytestring
>= 0.10.10.0 && < 0.12
, dlist
^>= 1.0
, Earley
^>= 0.13.0.1
, tree-view
^>= 0.5
executable convert-metafont
@ -305,18 +296,10 @@ executable MetaBrush
, MetaBrush.UI.ToolBar
, MetaBrush.UI.Viewport
, MetaBrush.Time
, Paths_MetaBrush
autogen-modules:
Paths_MetaBrush
ghc-options:
-threaded -rtsopts
if flag(asserts)
cpp-options:
-DASSERTS
build-depends:
splines
, metabrushes

View file

@ -1,5 +1,6 @@
{-# LANGUAGE OverloadedLabels #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE RecursiveDo #-}
module MetaBrush.Application
( runApplication )

View file

@ -1,4 +1,5 @@
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE ScopedTypeVariables #-}
module MetaBrush.Document.Selection
( SelectionMode(..), selectionMode

View file

@ -1,3 +1,6 @@
{-# LANGUAGE ImplicitParams #-}
{-# LANGUAGE ScopedTypeVariables #-}
module MetaBrush.Event
( handleEvents )
where

View file

@ -1,3 +1,5 @@
{-# LANGUAGE ScopedTypeVariables #-}
module MetaBrush.GTK.Util
( withRGBA, showRGBA
, widgetAddClasses, widgetAddClass

View file

@ -1,5 +1,6 @@
{-# LANGUAGE AllowAmbiguousTypes #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE AllowAmbiguousTypes #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE ScopedTypeVariables #-}
module MetaBrush.Render.Document
( getDocumentRender, blankRender )

View file

@ -1,3 +1,5 @@
{-# LANGUAGE ScopedTypeVariables #-}
module MetaBrush.Render.Rulers
( renderRuler )
where

View file

@ -1,4 +1,6 @@
{-# LANGUAGE AllowAmbiguousTypes #-}
{-# LANGUAGE AllowAmbiguousTypes #-}
{-# LANGUAGE ScopedTypeVariables #-}
{-# LANGUAGE UndecidableInstances #-}
module MetaBrush.Brush
( Brush(..), SomeBrush(..), BrushFunction

View file

@ -1,6 +1,5 @@
{-# LANGUAGE OverloadedStrings #-}
{-# OPTIONS_GHC -fno-warn-orphans #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE UndecidableInstances #-}
module MetaBrush.Document
( AABB(..), mkAABB

View file

@ -1,4 +1,5 @@
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE ScopedTypeVariables #-}
module MetaBrush.Document.Draw
( DrawAnchor(..), anchorsAreComplementary

View file

@ -1,5 +1,6 @@
{-# LANGUAGE AllowAmbiguousTypes #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE ScopedTypeVariables #-}
module MetaBrush.Document.Serialise
( documentToJSON, documentFromJSON

View file

@ -1,4 +1,5 @@
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE ScopedTypeVariables #-}
module MetaBrush.Document.SubdivideStroke
( subdivide )

View file

@ -1,5 +1,7 @@
{-# LANGUAGE AllowAmbiguousTypes #-}
{-# LANGUAGE PolyKinds #-}
{-# LANGUAGE AllowAmbiguousTypes #-}
{-# LANGUAGE PolyKinds #-}
{-# LANGUAGE ScopedTypeVariables #-}
{-# LANGUAGE UndecidableInstances #-}
module MetaBrush.Records where

View file

@ -1,4 +1,6 @@
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE ScopedTypeVariables #-}
{-# LANGUAGE UndecidableInstances #-}
module MetaBrush.Serialisable
( Serialisable(..)

View file

@ -1,4 +1,5 @@
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE UndecidableInstances #-}
module MetaBrush.Unique
( MonadUnique(freshUnique)

View file

@ -1,4 +1,6 @@
{-# LANGUAGE AllowAmbiguousTypes #-}
{-# LANGUAGE AllowAmbiguousTypes #-}
{-# LANGUAGE ScopedTypeVariables #-}
{-# LANGUAGE UndecidableInstances #-}
module Math.Bezier.Cubic
( Bezier(..)

View file

@ -1,3 +1,5 @@
{-# LANGUAGE ScopedTypeVariables #-}
module Math.Bezier.Cubic.Fit
( FitParameters(..), FitPoint(..)
, fitSpline, fitPiece

View file

@ -1,3 +1,6 @@
{-# LANGUAGE ScopedTypeVariables #-}
-- TODO: unused module.
module Math.Bezier.Envelope where
-- acts

View file

@ -1,4 +1,6 @@
{-# LANGUAGE AllowAmbiguousTypes #-}
{-# LANGUAGE AllowAmbiguousTypes #-}
{-# LANGUAGE ScopedTypeVariables #-}
{-# LANGUAGE UndecidableInstances #-}
module Math.Bezier.Quadratic
( Bezier(..)

View file

@ -1,3 +1,7 @@
{-# LANGUAGE QuantifiedConstraints #-}
{-# LANGUAGE ScopedTypeVariables #-}
{-# LANGUAGE UndecidableInstances #-}
module Math.Bezier.Spline where
-- base

View file

@ -1,6 +1,5 @@
{-# LANGUAGE AllowAmbiguousTypes #-}
{-# OPTIONS_GHC -Wno-type-defaults #-}
{-# LANGUAGE ScopedTypeVariables #-}
module Math.Bezier.Stroke
( Offset(..)

View file

@ -1,3 +1,5 @@
{-# LANGUAGE ScopedTypeVariables #-}
module Math.Epsilon
( epsilon, nearZero )
where

View file

@ -1,6 +1,7 @@
{-# LANGUAGE AllowAmbiguousTypes #-}
{-# LANGUAGE PolyKinds #-}
{-# LANGUAGE UnliftedNewtypes #-}
{-# LANGUAGE PolyKinds #-}
{-# LANGUAGE ScopedTypeVariables #-}
{-# LANGUAGE UnliftedNewtypes #-}
module Math.Linear
( -- * Points and vectors

View file

@ -1,4 +1,6 @@
{-# LANGUAGE AllowAmbiguousTypes #-}
{-# LANGUAGE AllowAmbiguousTypes #-}
{-# LANGUAGE DuplicateRecordFields #-}
{-# LANGUAGE UndecidableInstances #-}
module Math.Linear.Dual where

View file

@ -1,4 +1,6 @@
{-# LANGUAGE AllowAmbiguousTypes #-}
{-# LANGUAGE AllowAmbiguousTypes #-}
{-# LANGUAGE ScopedTypeVariables #-}
{-# LANGUAGE UndecidableInstances #-}
module Math.Module
( Module(..), lerp

View file

@ -1,4 +1,5 @@
{-# LANGUAGE AllowAmbiguousTypes #-}
{-# LANGUAGE ScopedTypeVariables #-}
module Math.Orientation
( Orientation(..), reverseOrientation

View file

@ -1,3 +1,5 @@
{-# LANGUAGE ScopedTypeVariables #-}
module Math.Roots where
-- base