Skip to content
Projects
Groups
Snippets
Help
Loading...
Help
Submit feedback
Contribute to GitLab
Sign in
Toggle navigation
G
gargantext-ihaskell
Project
Project
Details
Activity
Releases
Cycle Analytics
Repository
Repository
Files
Commits
Branches
Tags
Contributors
Graph
Compare
Charts
Issues
0
Issues
0
List
Board
Labels
Milestones
Merge Requests
0
Merge Requests
0
CI / CD
CI / CD
Pipelines
Jobs
Schedules
Charts
Wiki
Wiki
Snippets
Snippets
Members
Members
Collapse sidebar
Close sidebar
Activity
Graph
Charts
Create a new issue
Jobs
Commits
Issue Boards
Open sidebar
gargantext
gargantext-ihaskell
Commits
dcdf4574
Commit
dcdf4574
authored
Jul 04, 2021
by
Vaibhav Sagar
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
ihaskell-widgets: support singletons-3.0
parent
00dbaa52
Changes
3
Hide whitespace changes
Inline
Side-by-side
Showing
3 changed files
with
14 additions
and
3 deletions
+14
-3
ihaskell-widgets.cabal
ihaskell-display/ihaskell-widgets/ihaskell-widgets.cabal
+3
-0
Singletons.hs
...askell-widgets/src/IHaskell/Display/Widgets/Singletons.hs
+4
-2
Types.hs
...ay/ihaskell-widgets/src/IHaskell/Display/Widgets/Types.hs
+7
-1
No files found.
ihaskell-display/ihaskell-widgets/ihaskell-widgets.cabal
View file @
dcdf4574
...
@@ -112,6 +112,9 @@ library
...
@@ -112,6 +112,9 @@ library
-- so let cabal choose the right one.
-- so let cabal choose the right one.
, singletons -any
, singletons -any
if impl (ghc >= 9.0)
build-depends: singletons-base -any
-- Directories containing source files.
-- Directories containing source files.
hs-source-dirs: src
hs-source-dirs: src
...
...
ihaskell-display/ihaskell-widgets/src/IHaskell/Display/Widgets/Singletons.hs
View file @
dcdf4574
...
@@ -18,11 +18,13 @@
...
@@ -18,11 +18,13 @@
module
IHaskell.Display.Widgets.Singletons
where
module
IHaskell.Display.Widgets.Singletons
where
#
if
MIN_VERSION_singletons
(
3
,
0
,
0
)
import
Data.Singletons.Base.TH
#
elif
MIN_VERSION_singletons
(
2
,
4
,
0
)
import
Data.Singletons.TH
import
Data.Singletons.TH
#
if
MIN_VERSION_singletons
(
2
,
4
,
0
)
#
else
#
else
import
Data.Singletons.Prelude.Ord
import
Data.Singletons.Prelude.Ord
import
Data.Singletons.TH
#
endif
#
endif
-- Widget properties
-- Widget properties
...
...
ihaskell-display/ihaskell-widgets/src/IHaskell/Display/Widgets/Types.hs
View file @
dcdf4574
...
@@ -85,13 +85,19 @@ import Data.Vinyl.Functor (Compose(..), Const(..))
...
@@ -85,13 +85,19 @@ import Data.Vinyl.Functor (Compose(..), Const(..))
import
Data.Vinyl.Lens
(
rget
,
rput
,
type
(
∈
))
import
Data.Vinyl.Lens
(
rget
,
rput
,
type
(
∈
))
import
Data.Vinyl.TypeLevel
(
RecAll
)
import
Data.Vinyl.TypeLevel
(
RecAll
)
#
if
MIN_VERSION_singletons
(
2
,
4
,
0
)
#
if
MIN_VERSION_singletons
(
3
,
0
,
0
)
import
Data.List.Singletons
#
elif
MIN_VERSION_singletons
(
2
,
4
,
0
)
import
Data.Singletons.Prelude.List
import
Data.Singletons.Prelude.List
#
else
#
else
import
Data.Singletons.Prelude
((
:++
))
import
Data.Singletons.Prelude
((
:++
))
#
endif
#
endif
#
if
MIN_VERSION_singletons
(
3
,
0
,
0
)
import
Data.Singletons.Base.TH
#
else
import
Data.Singletons.TH
import
Data.Singletons.TH
#
endif
import
GHC.IO.Exception
import
GHC.IO.Exception
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment