Commit b26209a9 authored by David Davó's avatar David Davó

Merge singletons 3.0

parents 2ebdc43b a6d0a651
...@@ -41,6 +41,7 @@ jobs: ...@@ -41,6 +41,7 @@ jobs:
- stack-yaml: 'stack-8.2.yaml' - stack-yaml: 'stack-8.2.yaml'
- stack-yaml: 'stack-8.4.yaml' - stack-yaml: 'stack-8.4.yaml'
- stack-yaml: 'stack-8.6.yaml' - stack-yaml: 'stack-8.6.yaml'
- stack-yaml: 'stack-8.8.yaml'
- stack-yaml: 'stack.yaml' - stack-yaml: 'stack.yaml'
steps: steps:
......
...@@ -17,12 +17,14 @@ ...@@ -17,12 +17,14 @@
#endif #endif
module IHaskell.Display.Widgets.Singletons where module IHaskell.Display.Widgets.Singletons where
import Data.Singletons.TH
#if MIN_VERSION_singletons(2,4,0) #if MIN_VERSION_singletons(3,0,0)
import Data.Singletons.Base.TH
#elif MIN_VERSION_singletons(2,4,0)
import Data.Singletons.TH
#else #else
import Data.Singletons.Prelude.Ord import Data.Singletons.Prelude.Ord
import Data.Singletons.TH
#endif #endif
-- Widget properties -- Widget properties
......
...@@ -13,6 +13,7 @@ ...@@ -13,6 +13,7 @@
{-# LANGUAGE ConstraintKinds #-} {-# LANGUAGE ConstraintKinds #-}
{-# LANGUAGE ExistentialQuantification #-} {-# LANGUAGE ExistentialQuantification #-}
{-# LANGUAGE GADTs #-} {-# LANGUAGE GADTs #-}
{-# LANGUAGE AutoDeriveTypeable #-}
{-# LANGUAGE CPP #-} {-# LANGUAGE CPP #-}
{-# LANGUAGE FlexibleContexts #-} {-# LANGUAGE FlexibleContexts #-}
...@@ -86,16 +87,19 @@ import Data.Vinyl.Functor (Compose(..), Const(..)) ...@@ -86,16 +87,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
import Data.Text.Lazy (unpack) #if MIN_VERSION_singletons(3,0,0)
import Data.Text.Lazy.Encoding import Data.Singletons.Base.TH
#else
import Data.Singletons.TH import Data.Singletons.TH
#endif
import GHC.IO.Exception import GHC.IO.Exception
......
...@@ -222,6 +222,7 @@ mkConfig var = KernelConfig ...@@ -222,6 +222,7 @@ mkConfig var = KernelConfig
, languageFileExtension = ".txt" , languageFileExtension = ".txt"
, languageCodeMirrorMode = "null" , languageCodeMirrorMode = "null"
, languagePygmentsLexer = "Text" , languagePygmentsLexer = "Text"
, languageMimeType = "x/extended-huttons-razor"
} }
, writeKernelspec = const $ return $ KernelSpec , writeKernelspec = const $ return $ KernelSpec
{ kernelDisplayName = "Hutton's Razor" { kernelDisplayName = "Hutton's Razor"
......
...@@ -62,6 +62,7 @@ languageConfig = LanguageInfo ...@@ -62,6 +62,7 @@ languageConfig = LanguageInfo
, languageFileExtension = ".txt" , languageFileExtension = ".txt"
, languageCodeMirrorMode = "null" , languageCodeMirrorMode = "null"
, languagePygmentsLexer = "Text" , languagePygmentsLexer = "Text"
, languageMimeType = "x/funcalc"
} }
languageKernelspec :: KernelSpec languageKernelspec :: KernelSpec
......
...@@ -52,4 +52,4 @@ nix: ...@@ -52,4 +52,4 @@ nix:
- pango - pango
- pkgconfig - pkgconfig
- zeromq - zeromq
- zlib - zlib
\ No newline at end of file
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment