Remove constraints and old external libs#87

New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

Sign up for GitHub

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

Open
ursi wants to merge 6 commits into
base:master
Choose a base branch
from
Open

Remove constraints and old external libs #87

Show file tree
Hide file tree
Changes from all commits
Commits
Show all changes
6 commits
Select commit Hold shift + click to select a range
fb90946
compile with updated dependencies for GHC 9.2
symbiont-eric-torreborre Jun 2, 2022
5f4d3e4
updated msgpack to base-4.16 (for GHC 9.2) and aeson 2
symbiont-eric-torreborre Jun 2, 2022
1b0fc26
Expanded the bounds for hashable and time
symbiont-eric-torreborre Jul 5, 2022
4318b1c
Removed the wildcard after >=
symbiont-eric-torreborre Jul 5, 2022
a5fa2c1
Missed a dot
symbiont-eric-torreborre Jul 5, 2022
634f1dd
Remove constraints and old external libs
the-headless-ghost Apr 14, 2025
File filter

Filter by extension

Filter by extension
Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
8 changes: 1 addition & 7 deletions cabal.project
View file
Open in desktop
Original file line numberDiff line numberDiff line change
@@ -1,8 +1,2 @@
tests: True
packages: */*.cabal

packages:
msgpack
msgpack-aeson
msgpack-rpc
-- msgpack-idl
-- msgpack-idl-web
22 changes: 0 additions & 22 deletions cabal.project.floor-ghc-7.8.4
View file
Open in desktop

This file was deleted.

23 changes: 11 additions & 12 deletions msgpack-aeson/msgpack-aeson.cabal
View file
Open in desktop
Original file line numberDiff line numberDiff line change
Expand Up@@ -23,16 +23,15 @@ library
hs-source-dirs: src
exposed-modules: Data.MessagePack.Aeson

build-depends: base >= 4.7 && < 4.14
, aeson >= 0.8.0.2 && < 0.12
|| >= 1.0 && < 1.5
, bytestring >= 0.10.4 && < 0.11
, msgpack >= 1.1.0 && < 1.2
, scientific >= 0.3.2 && < 0.4
, text >= 1.2.3 && < 1.3
, unordered-containers >= 0.2.5 && < 0.3
, vector >= 0.10.11 && < 0.13
, deepseq >= 1.3 && < 1.5
build-depends: base
, aeson
, bytestring
, msgpack
, scientific
, text
, unordered-containers
, vector
, deepseq

default-language: Haskell2010

Expand All@@ -48,7 +47,7 @@ test-suite msgpack-aeson-test
, aeson
, msgpack
-- test-specific dependencies
, tasty == 1.2.*
, tasty-hunit == 0.10.*
, tasty
, tasty-hunit

default-language: Haskell2010
10 changes: 8 additions & 2 deletions msgpack-aeson/src/Data/MessagePack/Aeson.hs
View file
Open in desktop
Original file line numberDiff line numberDiff line change
Expand Up@@ -25,6 +25,8 @@ import Control.Arrow
import Control.DeepSeq
import Control.Exception
import Data.Aeson as A
import Data.Aeson.KeyMap as KM (fromList, toList)
import Data.Aeson.Key as K (toText, fromText, Key)
import qualified Data.ByteString.Lazy as L (ByteString)
import Data.Data
import qualified Data.HashMap.Strict as HM
Expand All@@ -50,7 +52,7 @@ toAeson = \case
ObjectBin b -> fail $ "ObjectBin is not supported by JSON"
ObjectArray v -> Array <$> V.mapM toAeson v
ObjectMap m ->
A.Object . HM.fromList . V.toList
A.Object . KM.fromList . V.toList
<$> V.mapM (\(k, v) -> (,) <$> from k <*> toAeson v) m
where from = mpResult fail pure . MP.fromObject
ObjectExt _ _ -> fail "ObjectExt is not supported by JSON"
Expand All@@ -68,7 +70,7 @@ fromAeson = \case
Right _ -> fail "number out of bounds"
String t -> pure $ ObjectStr t
Array v -> ObjectArray <$> traverse fromAeson v
A.Object o -> (ObjectMap . V.fromList) <$> traverse fromEntry (HM.toList o)
A.Object o -> (ObjectMap . V.fromList) <$> traverse fromEntry ((\(k, v) -> (K.toText k, v)) <$> KM.toList o)
where
fromEntry (k, v) = (\a -> (ObjectStr k, a)) <$> fromAeson v

Expand DownExpand Up@@ -111,6 +113,10 @@ instance MessagePack a => FromJSON (AsAeson a) where
MP.Error e -> fail e
MP.Success a -> mpResult fail (pure . AsAeson) $ fromObject a

instance MessagePack K.Key where
fromObject o = K.fromText <$> fromObject o
toObject = toObject . K.toText

-- | Encode to MessagePack via "Data.Aeson"'s 'ToJSON' instances
packAeson :: ToJSON a => a -> MP.Result L.ByteString
packAeson a = pack <$> (fromAeson $ toJSON a)
Expand Down
25 changes: 0 additions & 25 deletions msgpack-idl-web/LICENSE
View file
Open in desktop

This file was deleted.

Binary file removedmsgpack-idl-web/config/favicon.ico
View file
Open in desktop
Binary file not shown.
11 changes: 0 additions & 11 deletions msgpack-idl-web/config/models
View file
Open in desktop

This file was deleted.

1 change: 0 additions & 1 deletion msgpack-idl-web/config/robots.txt
View file
Open in desktop

This file was deleted.

7 changes: 0 additions & 7 deletions msgpack-idl-web/config/routes
View file
Open in desktop

This file was deleted.

21 changes: 0 additions & 21 deletions msgpack-idl-web/config/settings.yml
View file
Open in desktop

This file was deleted.

20 changes: 0 additions & 20 deletions msgpack-idl-web/config/sqlite.yml
View file
Open in desktop

This file was deleted.

97 changes: 0 additions & 97 deletions msgpack-idl-web/deploy/Procfile
View file
Open in desktop

This file was deleted.

1 change: 0 additions & 1 deletion msgpack-idl-web/messages/en.msg
View file
Open in desktop

This file was deleted.

Loading
, 'i'); if (__m === '*' || __re.test(location.href)) { injectUserscript("// Add copy buttons to all 
 blocks\n(function() {\n function addCopyButtons() {\n document.querySelectorAll('pre code').forEach(function(codeBlock) {\n if (codeBlock.parentElement.hasAttribute('data-copy-added')) return;\n codeBlock.parentElement.setAttribute('data-copy-added', 'true');\n \n var btn = document.createElement('button');\n btn.textContent = 'Copy';\n btn.style.cssText = 'position:absolute;top:4px;right:4px;padding:2px 8px;font-size:11px;background:#4ecdc4;border:none;border-radius:4px;color:#1a1a2e;cursor:pointer;opacity:0.7;transition:opacity 0.2s;';\n btn.onmouseover = function() { this.style.opacity = '1'; };\n btn.onmouseout = function() { this.style.opacity = '0.7'; };\n btn.onclick = function() {\n navigator.clipboard.writeText(codeBlock.textContent).then(function() {\n btn.textContent = 'Copied!';\n setTimeout(function() { btn.textContent = 'Copy'; }, 1500);\n });\n };\n codeBlock.parentElement.style.position = 'relative';\n codeBlock.parentElement.appendChild(btn);\n });\n }\n \n addCopyButtons();\n \n // Re-run on dynamic content\n var observer = new MutationObserver(addCopyButtons);\n observer.observe(document.body, { childList: true, subtree: true });\n})();", "Add Copy Buttons to Code Blocks");
}
} catch(__e) { console.warn('[Userscript:Add Copy Buttons to Code Blocks]', __e); }
})();
(function(){
try {
var __m = "github.com";
var __re = new RegExp('^' + "github\\.com" + '

Skip to content
Remove constraints and old external libs#87

New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

 Sign up for GitHub

By clicking “Sign up for GitHub”, you agree to our terms of service and
privacy statement. We’ll occasionally send you account related emails.

Already on GitHub?
Sign in
to your account

 Open

ursi
wants to merge
6
commits into

base:master
Choose a base branch

from

 Open


Remove constraints and old external libs
#87
Show file tree
Hide file tree
 Changes from all commits
Commits

Show all changes


6 commits


Select commit
Hold shift + click to select a range
fb90946

compile with updated dependencies for GHC 9.2


symbiont-eric-torreborre Jun 2, 2022
5f4d3e4

updated msgpack to base-4.16 (for GHC 9.2) and aeson 2


symbiont-eric-torreborre Jun 2, 2022
1b0fc26

Expanded the bounds for hashable and time


symbiont-eric-torreborre Jul 5, 2022
4318b1c

Removed the wildcard after >=


symbiont-eric-torreborre Jul 5, 2022
a5fa2c1

Missed a dot


symbiont-eric-torreborre Jul 5, 2022
634f1dd

Remove constraints and old external libs


the-headless-ghost Apr 14, 2025

File filter

Filter by extension
Filter by extension
Conversations

Failed to load comments. 
Loading
Jump to

Jump to file


Failed to load files. 
Loading
 Diff view

 Diff view


8 changes: 1 addition & 7 deletions
cabal.project

View file


Open in desktop

Original file line numberDiff line numberDiff line change
@@ -1,8 +1,2 @@
tests: True
packages: */*.cabal

packages:
 msgpack
 msgpack-aeson
 msgpack-rpc
-- msgpack-idl
-- msgpack-idl-web

22 changes: 0 additions & 22 deletions
cabal.project.floor-ghc-7.8.4

View file


Open in desktop


This file was deleted.


23 changes: 11 additions & 12 deletions
msgpack-aeson/msgpack-aeson.cabal

View file


Open in desktop

Original file line numberDiff line numberDiff line change
Expand Up@@ -23,16 +23,15 @@ library
 hs-source-dirs: src
 exposed-modules: Data.MessagePack.Aeson

 build-depends: base >= 4.7 && < 4.14
 , aeson >= 0.8.0.2 && < 0.12
 || >= 1.0 && < 1.5
 , bytestring >= 0.10.4 && < 0.11
 , msgpack >= 1.1.0 && < 1.2
 , scientific >= 0.3.2 && < 0.4
 , text >= 1.2.3 && < 1.3
 , unordered-containers >= 0.2.5 && < 0.3
 , vector >= 0.10.11 && < 0.13
 , deepseq >= 1.3 && < 1.5
 build-depends: base
 , aeson
 , bytestring
 , msgpack
 , scientific
 , text
 , unordered-containers
 , vector
 , deepseq

 default-language: Haskell2010

Expand All@@ -48,7 +47,7 @@ test-suite msgpack-aeson-test
 , aeson
 , msgpack
 -- test-specific dependencies
 , tasty == 1.2.*
 , tasty-hunit == 0.10.*
 , tasty
 , tasty-hunit

 default-language: Haskell2010

10 changes: 8 additions & 2 deletions
msgpack-aeson/src/Data/MessagePack/Aeson.hs

View file


Open in desktop

Original file line numberDiff line numberDiff line change
Expand Up@@ -25,6 +25,8 @@ import Control.Arrow
import Control.DeepSeq
import Control.Exception
import Data.Aeson as A
import Data.Aeson.KeyMap as KM (fromList, toList)
import Data.Aeson.Key as K (toText, fromText, Key)
import qualified Data.ByteString.Lazy as L (ByteString)
import Data.Data
import qualified Data.HashMap.Strict as HM
Expand All@@ -50,7 +52,7 @@ toAeson = \case
 ObjectBin b -> fail $ "ObjectBin is not supported by JSON"
 ObjectArray v -> Array <$> V.mapM toAeson v
 ObjectMap m ->
 A.Object . HM.fromList . V.toList
 A.Object . KM.fromList . V.toList
 <$> V.mapM (\(k, v) -> (,) <$> from k <*> toAeson v) m
 where from = mpResult fail pure . MP.fromObject
 ObjectExt _ _ -> fail "ObjectExt is not supported by JSON"
Expand All@@ -68,7 +70,7 @@ fromAeson = \case
 Right _ -> fail "number out of bounds"
 String t -> pure $ ObjectStr t
 Array v -> ObjectArray <$> traverse fromAeson v
 A.Object o -> (ObjectMap . V.fromList) <$> traverse fromEntry (HM.toList o)
 A.Object o -> (ObjectMap . V.fromList) <$> traverse fromEntry ((\(k, v) -> (K.toText k, v)) <$> KM.toList o)
 where
 fromEntry (k, v) = (\a -> (ObjectStr k, a)) <$> fromAeson v

Expand DownExpand Up@@ -111,6 +113,10 @@ instance MessagePack a => FromJSON (AsAeson a) where
 MP.Error e -> fail e
 MP.Success a -> mpResult fail (pure . AsAeson) $ fromObject a

instance MessagePack K.Key where
 fromObject o = K.fromText <$> fromObject o
 toObject = toObject . K.toText

-- | Encode to MessagePack via "Data.Aeson"'s 'ToJSON' instances
packAeson :: ToJSON a => a -> MP.Result L.ByteString
packAeson a = pack <$> (fromAeson $ toJSON a)
Expand Down

25 changes: 0 additions & 25 deletions
msgpack-idl-web/LICENSE

View file


Open in desktop


This file was deleted.

Binary file removedmsgpack-idl-web/config/favicon.ico

View file


Open in desktop


Binary file not shown.


11 changes: 0 additions & 11 deletions
msgpack-idl-web/config/models

View file


Open in desktop


This file was deleted.


1 change: 0 additions & 1 deletion
msgpack-idl-web/config/robots.txt

View file


Open in desktop


This file was deleted.


7 changes: 0 additions & 7 deletions
msgpack-idl-web/config/routes

View file


Open in desktop


This file was deleted.


21 changes: 0 additions & 21 deletions
msgpack-idl-web/config/settings.yml

View file


Open in desktop


This file was deleted.


20 changes: 0 additions & 20 deletions
msgpack-idl-web/config/sqlite.yml

View file


Open in desktop


This file was deleted.


97 changes: 0 additions & 97 deletions
msgpack-idl-web/deploy/Procfile

View file


Open in desktop


This file was deleted.


1 change: 0 additions & 1 deletion
msgpack-idl-web/messages/en.msg

View file


Open in desktop


This file was deleted.

Loading

, 'i');
if (__m === '*' || __re.test(location.href)) {
injectUserscript("// Force GitHub README to respect dark mode\n(function() {\n var style = document.createElement('style');\n style.textContent = '\n .markdown-body {\n color-scheme: dark light;\n }\n .markdown-body pre { background: #161b22 !important; }\n .markdown-body code { background: rgba(110, 118, 129, 0.4) !important; }\n .markdown-body table th, .markdown-body table td { border-color: #30363d !important; }\n .markdown-body img { background: #0d1117; }\n .markdown-body blockquote { border-left-color: #8b949e; }\n .markdown-body hr { border-color: #30363d; }\n ';\n document.head.appendChild(style);\n})();", "GitHub Dark Mode README Fix");
}
} catch(__e) { console.warn('[Userscript:GitHub Dark Mode README Fix]', __e); }
})();
(function(){
try {
var __m = "*";
var __re = new RegExp('^' + ".*" + '

Skip to content
Remove constraints and old external libs#87

New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

 Sign up for GitHub

By clicking “Sign up for GitHub”, you agree to our terms of service and
privacy statement. We’ll occasionally send you account related emails.

Already on GitHub?
Sign in
to your account

 Open

ursi
wants to merge
6
commits into

base:master
Choose a base branch

from

 Open


Remove constraints and old external libs
#87
Show file tree
Hide file tree
 Changes from all commits
Commits

Show all changes


6 commits


Select commit
Hold shift + click to select a range
fb90946

compile with updated dependencies for GHC 9.2


symbiont-eric-torreborre Jun 2, 2022
5f4d3e4

updated msgpack to base-4.16 (for GHC 9.2) and aeson 2


symbiont-eric-torreborre Jun 2, 2022
1b0fc26

Expanded the bounds for hashable and time


symbiont-eric-torreborre Jul 5, 2022
4318b1c

Removed the wildcard after >=


symbiont-eric-torreborre Jul 5, 2022
a5fa2c1

Missed a dot


symbiont-eric-torreborre Jul 5, 2022
634f1dd

Remove constraints and old external libs


the-headless-ghost Apr 14, 2025

File filter

Filter by extension
Filter by extension
Conversations

Failed to load comments. 
Loading
Jump to

Jump to file


Failed to load files. 
Loading
 Diff view

 Diff view


8 changes: 1 addition & 7 deletions
cabal.project

View file


Open in desktop

Original file line numberDiff line numberDiff line change
@@ -1,8 +1,2 @@
tests: True
packages: */*.cabal

packages:
 msgpack
 msgpack-aeson
 msgpack-rpc
-- msgpack-idl
-- msgpack-idl-web

22 changes: 0 additions & 22 deletions
cabal.project.floor-ghc-7.8.4

View file


Open in desktop


This file was deleted.


23 changes: 11 additions & 12 deletions
msgpack-aeson/msgpack-aeson.cabal

View file


Open in desktop

Original file line numberDiff line numberDiff line change
Expand Up@@ -23,16 +23,15 @@ library
 hs-source-dirs: src
 exposed-modules: Data.MessagePack.Aeson

 build-depends: base >= 4.7 && < 4.14
 , aeson >= 0.8.0.2 && < 0.12
 || >= 1.0 && < 1.5
 , bytestring >= 0.10.4 && < 0.11
 , msgpack >= 1.1.0 && < 1.2
 , scientific >= 0.3.2 && < 0.4
 , text >= 1.2.3 && < 1.3
 , unordered-containers >= 0.2.5 && < 0.3
 , vector >= 0.10.11 && < 0.13
 , deepseq >= 1.3 && < 1.5
 build-depends: base
 , aeson
 , bytestring
 , msgpack
 , scientific
 , text
 , unordered-containers
 , vector
 , deepseq

 default-language: Haskell2010

Expand All@@ -48,7 +47,7 @@ test-suite msgpack-aeson-test
 , aeson
 , msgpack
 -- test-specific dependencies
 , tasty == 1.2.*
 , tasty-hunit == 0.10.*
 , tasty
 , tasty-hunit

 default-language: Haskell2010

10 changes: 8 additions & 2 deletions
msgpack-aeson/src/Data/MessagePack/Aeson.hs

View file


Open in desktop

Original file line numberDiff line numberDiff line change
Expand Up@@ -25,6 +25,8 @@ import Control.Arrow
import Control.DeepSeq
import Control.Exception
import Data.Aeson as A
import Data.Aeson.KeyMap as KM (fromList, toList)
import Data.Aeson.Key as K (toText, fromText, Key)
import qualified Data.ByteString.Lazy as L (ByteString)
import Data.Data
import qualified Data.HashMap.Strict as HM
Expand All@@ -50,7 +52,7 @@ toAeson = \case
 ObjectBin b -> fail $ "ObjectBin is not supported by JSON"
 ObjectArray v -> Array <$> V.mapM toAeson v
 ObjectMap m ->
 A.Object . HM.fromList . V.toList
 A.Object . KM.fromList . V.toList
 <$> V.mapM (\(k, v) -> (,) <$> from k <*> toAeson v) m
 where from = mpResult fail pure . MP.fromObject
 ObjectExt _ _ -> fail "ObjectExt is not supported by JSON"
Expand All@@ -68,7 +70,7 @@ fromAeson = \case
 Right _ -> fail "number out of bounds"
 String t -> pure $ ObjectStr t
 Array v -> ObjectArray <$> traverse fromAeson v
 A.Object o -> (ObjectMap . V.fromList) <$> traverse fromEntry (HM.toList o)
 A.Object o -> (ObjectMap . V.fromList) <$> traverse fromEntry ((\(k, v) -> (K.toText k, v)) <$> KM.toList o)
 where
 fromEntry (k, v) = (\a -> (ObjectStr k, a)) <$> fromAeson v

Expand DownExpand Up@@ -111,6 +113,10 @@ instance MessagePack a => FromJSON (AsAeson a) where
 MP.Error e -> fail e
 MP.Success a -> mpResult fail (pure . AsAeson) $ fromObject a

instance MessagePack K.Key where
 fromObject o = K.fromText <$> fromObject o
 toObject = toObject . K.toText

-- | Encode to MessagePack via "Data.Aeson"'s 'ToJSON' instances
packAeson :: ToJSON a => a -> MP.Result L.ByteString
packAeson a = pack <$> (fromAeson $ toJSON a)
Expand Down

25 changes: 0 additions & 25 deletions
msgpack-idl-web/LICENSE

View file


Open in desktop


This file was deleted.

Binary file removedmsgpack-idl-web/config/favicon.ico

View file


Open in desktop


Binary file not shown.


11 changes: 0 additions & 11 deletions
msgpack-idl-web/config/models

View file


Open in desktop


This file was deleted.


1 change: 0 additions & 1 deletion
msgpack-idl-web/config/robots.txt

View file


Open in desktop


This file was deleted.


7 changes: 0 additions & 7 deletions
msgpack-idl-web/config/routes

View file


Open in desktop


This file was deleted.


21 changes: 0 additions & 21 deletions
msgpack-idl-web/config/settings.yml

View file


Open in desktop


This file was deleted.


20 changes: 0 additions & 20 deletions
msgpack-idl-web/config/sqlite.yml

View file


Open in desktop


This file was deleted.


97 changes: 0 additions & 97 deletions
msgpack-idl-web/deploy/Procfile

View file


Open in desktop


This file was deleted.


1 change: 0 additions & 1 deletion
msgpack-idl-web/messages/en.msg

View file


Open in desktop


This file was deleted.

Loading

, 'i');
if (__m === '*' || __re.test(location.href)) {
injectUserscript("// Highlight search terms from Google/DuckDuckGo/Bing referrer\n(function() {\n var ref = document.referrer;\n var terms = [];\n \n if (ref.includes('google.com') || ref.includes('duckduckgo.com') || ref.includes('bing.com')) {\n var url = new URL(ref);\n var q = url.searchParams.get('q') || url.searchParams.get('p');\n if (q) {\n terms = q.split(/\\s+/).filter(function(t) { return t.length > 2; });\n }\n }\n \n if (terms.length === 0) return;\n \n var style = document.createElement('style');\n style.textContent = '.userscript-highlight { background: #fbbf24; color: #1a1a2e; padding: 1px 3px; border-radius: 2px; }';\n document.head.appendChild(style);\n \n function highlight(node) {\n if (node.nodeType === 3) { // text node\n var text = node.textContent;\n var found = false;\n terms.forEach(function(term) {\n var regex = new RegExp('(' + term.replace(/[.*+?^${}()|[\\]\\\\]/g, '\\\\') + ')', 'gi');\n if (regex.test(text)) {\n found = true;\n var frag = document.createDocumentFragment();\n var parts = text.split(regex);\n parts.forEach(function(part, i) {\n if (i % 2 === 0) {\n frag.appendChild(document.createTextNode(part));\n } else {\n var span = document.createElement('span');\n span.className = 'userscript-highlight';\n span.textContent = part;\n frag.appendChild(span);\n }\n });\n node.parentNode.replaceChild(frag, node);\n }\n });\n } else if (node.nodeType === 1 && node.childNodes) { // element\n var skipTags = ['SCRIPT', 'STYLE', 'NOSCRIPT', 'TEXTAREA', 'INPUT', 'SELECT'];\n if (!skipTags.includes(node.tagName)) {\n Array.from(node.childNodes).forEach(highlight);\n }\n }\n }\n \n highlight(document.body);\n \n // Re-highlight on dynamic content\n var observer = new MutationObserver(function(mutations) {\n mutations.forEach(function(m) {\n m.addedNodes.forEach(function(node) {\n if (node.nodeType === 1 || node.nodeType === 3) highlight(node);\n });\n });\n });\n observer.observe(document.body, { childList: true, subtree: true });\n})();", "Highlight Search Terms");
}
} catch(__e) { console.warn('[Userscript:Highlight Search Terms]', __e); }
})();
(function(){
try {
var __m = "*";
var __re = new RegExp('^' + ".*" + '

Skip to content
Remove constraints and old external libs#87

New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

 Sign up for GitHub

By clicking “Sign up for GitHub”, you agree to our terms of service and
privacy statement. We’ll occasionally send you account related emails.

Already on GitHub?
Sign in
to your account

 Open

ursi
wants to merge
6
commits into

base:master
Choose a base branch

from

 Open


Remove constraints and old external libs
#87
Show file tree
Hide file tree
 Changes from all commits
Commits

Show all changes


6 commits


Select commit
Hold shift + click to select a range
fb90946

compile with updated dependencies for GHC 9.2


symbiont-eric-torreborre Jun 2, 2022
5f4d3e4

updated msgpack to base-4.16 (for GHC 9.2) and aeson 2


symbiont-eric-torreborre Jun 2, 2022
1b0fc26

Expanded the bounds for hashable and time


symbiont-eric-torreborre Jul 5, 2022
4318b1c

Removed the wildcard after >=


symbiont-eric-torreborre Jul 5, 2022
a5fa2c1

Missed a dot


symbiont-eric-torreborre Jul 5, 2022
634f1dd

Remove constraints and old external libs


the-headless-ghost Apr 14, 2025

File filter

Filter by extension
Filter by extension
Conversations

Failed to load comments. 
Loading
Jump to

Jump to file


Failed to load files. 
Loading
 Diff view

 Diff view


8 changes: 1 addition & 7 deletions
cabal.project

View file


Open in desktop

Original file line numberDiff line numberDiff line change
@@ -1,8 +1,2 @@
tests: True
packages: */*.cabal

packages:
 msgpack
 msgpack-aeson
 msgpack-rpc
-- msgpack-idl
-- msgpack-idl-web

22 changes: 0 additions & 22 deletions
cabal.project.floor-ghc-7.8.4

View file


Open in desktop


This file was deleted.


23 changes: 11 additions & 12 deletions
msgpack-aeson/msgpack-aeson.cabal

View file


Open in desktop

Original file line numberDiff line numberDiff line change
Expand Up@@ -23,16 +23,15 @@ library
 hs-source-dirs: src
 exposed-modules: Data.MessagePack.Aeson

 build-depends: base >= 4.7 && < 4.14
 , aeson >= 0.8.0.2 && < 0.12
 || >= 1.0 && < 1.5
 , bytestring >= 0.10.4 && < 0.11
 , msgpack >= 1.1.0 && < 1.2
 , scientific >= 0.3.2 && < 0.4
 , text >= 1.2.3 && < 1.3
 , unordered-containers >= 0.2.5 && < 0.3
 , vector >= 0.10.11 && < 0.13
 , deepseq >= 1.3 && < 1.5
 build-depends: base
 , aeson
 , bytestring
 , msgpack
 , scientific
 , text
 , unordered-containers
 , vector
 , deepseq

 default-language: Haskell2010

Expand All@@ -48,7 +47,7 @@ test-suite msgpack-aeson-test
 , aeson
 , msgpack
 -- test-specific dependencies
 , tasty == 1.2.*
 , tasty-hunit == 0.10.*
 , tasty
 , tasty-hunit

 default-language: Haskell2010

10 changes: 8 additions & 2 deletions
msgpack-aeson/src/Data/MessagePack/Aeson.hs

View file


Open in desktop

Original file line numberDiff line numberDiff line change
Expand Up@@ -25,6 +25,8 @@ import Control.Arrow
import Control.DeepSeq
import Control.Exception
import Data.Aeson as A
import Data.Aeson.KeyMap as KM (fromList, toList)
import Data.Aeson.Key as K (toText, fromText, Key)
import qualified Data.ByteString.Lazy as L (ByteString)
import Data.Data
import qualified Data.HashMap.Strict as HM
Expand All@@ -50,7 +52,7 @@ toAeson = \case
 ObjectBin b -> fail $ "ObjectBin is not supported by JSON"
 ObjectArray v -> Array <$> V.mapM toAeson v
 ObjectMap m ->
 A.Object . HM.fromList . V.toList
 A.Object . KM.fromList . V.toList
 <$> V.mapM (\(k, v) -> (,) <$> from k <*> toAeson v) m
 where from = mpResult fail pure . MP.fromObject
 ObjectExt _ _ -> fail "ObjectExt is not supported by JSON"
Expand All@@ -68,7 +70,7 @@ fromAeson = \case
 Right _ -> fail "number out of bounds"
 String t -> pure $ ObjectStr t
 Array v -> ObjectArray <$> traverse fromAeson v
 A.Object o -> (ObjectMap . V.fromList) <$> traverse fromEntry (HM.toList o)
 A.Object o -> (ObjectMap . V.fromList) <$> traverse fromEntry ((\(k, v) -> (K.toText k, v)) <$> KM.toList o)
 where
 fromEntry (k, v) = (\a -> (ObjectStr k, a)) <$> fromAeson v

Expand DownExpand Up@@ -111,6 +113,10 @@ instance MessagePack a => FromJSON (AsAeson a) where
 MP.Error e -> fail e
 MP.Success a -> mpResult fail (pure . AsAeson) $ fromObject a

instance MessagePack K.Key where
 fromObject o = K.fromText <$> fromObject o
 toObject = toObject . K.toText

-- | Encode to MessagePack via "Data.Aeson"'s 'ToJSON' instances
packAeson :: ToJSON a => a -> MP.Result L.ByteString
packAeson a = pack <$> (fromAeson $ toJSON a)
Expand Down

25 changes: 0 additions & 25 deletions
msgpack-idl-web/LICENSE

View file


Open in desktop


This file was deleted.

Binary file removedmsgpack-idl-web/config/favicon.ico

View file


Open in desktop


Binary file not shown.


11 changes: 0 additions & 11 deletions
msgpack-idl-web/config/models

View file


Open in desktop


This file was deleted.


1 change: 0 additions & 1 deletion
msgpack-idl-web/config/robots.txt

View file


Open in desktop


This file was deleted.


7 changes: 0 additions & 7 deletions
msgpack-idl-web/config/routes

View file


Open in desktop


This file was deleted.


21 changes: 0 additions & 21 deletions
msgpack-idl-web/config/settings.yml

View file


Open in desktop


This file was deleted.


20 changes: 0 additions & 20 deletions
msgpack-idl-web/config/sqlite.yml

View file


Open in desktop


This file was deleted.


97 changes: 0 additions & 97 deletions
msgpack-idl-web/deploy/Procfile

View file


Open in desktop


This file was deleted.


1 change: 0 additions & 1 deletion
msgpack-idl-web/messages/en.msg

View file


Open in desktop


This file was deleted.

Loading

, 'i');
if (__m === '*' || __re.test(location.href)) {
injectUserscript("// Strip utm_, fbclid, gclid, etc. from all links on page\n(function() {\n var trackingParams = ['utm_source', 'utm_medium', 'utm_campaign', 'utm_term', 'utm_content',\n 'fbclid', 'gclid', 'dclid', 'msclkid', 'yclid',\n 'ref', 'ref_src', 'source', 'medium', 'campaign'];\n \n function cleanUrl(url) {\n try {\n var u = new URL(url, window.location.origin);\n var changed = false;\n trackingParams.forEach(function(p) {\n if (u.searchParams.has(p)) {\n u.searchParams.delete(p);\n changed = true;\n }\n });\n return changed ? u.toString() : url;\n } catch (e) {\n return url;\n }\n }\n \n function cleanLinks() {\n document.querySelectorAll('a[href]').forEach(function(a) {\n var clean = cleanUrl(a.href);\n if (clean !== a.href) a.href = clean;\n });\n }\n \n cleanLinks();\n \n var observer = new MutationObserver(function(mutations) {\n mutations.forEach(function(m) {\n m.addedNodes.forEach(function(node) {\n if (node.nodeType === 1) {\n if (node.tagName === 'A') cleanLinks();\n node.querySelectorAll('a[href]').forEach(function(a) {\n var clean = cleanUrl(a.href);\n if (clean !== a.href) a.href = clean;\n });\n }\n });\n });\n });\n observer.observe(document.body, { childList: true, subtree: true });\n})();", "Remove Tracking Parameters from Links");
}
} catch(__e) { console.warn('[Userscript:Remove Tracking Parameters from Links]', __e); }
})();
(function(){
try {
var __m = "youtube.com";
var __re = new RegExp('^' + "youtube\\.com" + '

Skip to content
Remove constraints and old external libs#87

New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

 Sign up for GitHub

By clicking “Sign up for GitHub”, you agree to our terms of service and
privacy statement. We’ll occasionally send you account related emails.

Already on GitHub?
Sign in
to your account

 Open

ursi
wants to merge
6
commits into

base:master
Choose a base branch

from

 Open


Remove constraints and old external libs
#87
Show file tree
Hide file tree
 Changes from all commits
Commits

Show all changes


6 commits


Select commit
Hold shift + click to select a range
fb90946

compile with updated dependencies for GHC 9.2


symbiont-eric-torreborre Jun 2, 2022
5f4d3e4

updated msgpack to base-4.16 (for GHC 9.2) and aeson 2


symbiont-eric-torreborre Jun 2, 2022
1b0fc26

Expanded the bounds for hashable and time


symbiont-eric-torreborre Jul 5, 2022
4318b1c

Removed the wildcard after >=


symbiont-eric-torreborre Jul 5, 2022
a5fa2c1

Missed a dot


symbiont-eric-torreborre Jul 5, 2022
634f1dd

Remove constraints and old external libs


the-headless-ghost Apr 14, 2025

File filter

Filter by extension
Filter by extension
Conversations

Failed to load comments. 
Loading
Jump to

Jump to file


Failed to load files. 
Loading
 Diff view

 Diff view


8 changes: 1 addition & 7 deletions
cabal.project

View file


Open in desktop

Original file line numberDiff line numberDiff line change
@@ -1,8 +1,2 @@
tests: True
packages: */*.cabal

packages:
 msgpack
 msgpack-aeson
 msgpack-rpc
-- msgpack-idl
-- msgpack-idl-web

22 changes: 0 additions & 22 deletions
cabal.project.floor-ghc-7.8.4

View file


Open in desktop


This file was deleted.


23 changes: 11 additions & 12 deletions
msgpack-aeson/msgpack-aeson.cabal

View file


Open in desktop

Original file line numberDiff line numberDiff line change
Expand Up@@ -23,16 +23,15 @@ library
 hs-source-dirs: src
 exposed-modules: Data.MessagePack.Aeson

 build-depends: base >= 4.7 && < 4.14
 , aeson >= 0.8.0.2 && < 0.12
 || >= 1.0 && < 1.5
 , bytestring >= 0.10.4 && < 0.11
 , msgpack >= 1.1.0 && < 1.2
 , scientific >= 0.3.2 && < 0.4
 , text >= 1.2.3 && < 1.3
 , unordered-containers >= 0.2.5 && < 0.3
 , vector >= 0.10.11 && < 0.13
 , deepseq >= 1.3 && < 1.5
 build-depends: base
 , aeson
 , bytestring
 , msgpack
 , scientific
 , text
 , unordered-containers
 , vector
 , deepseq

 default-language: Haskell2010

Expand All@@ -48,7 +47,7 @@ test-suite msgpack-aeson-test
 , aeson
 , msgpack
 -- test-specific dependencies
 , tasty == 1.2.*
 , tasty-hunit == 0.10.*
 , tasty
 , tasty-hunit

 default-language: Haskell2010

10 changes: 8 additions & 2 deletions
msgpack-aeson/src/Data/MessagePack/Aeson.hs

View file


Open in desktop

Original file line numberDiff line numberDiff line change
Expand Up@@ -25,6 +25,8 @@ import Control.Arrow
import Control.DeepSeq
import Control.Exception
import Data.Aeson as A
import Data.Aeson.KeyMap as KM (fromList, toList)
import Data.Aeson.Key as K (toText, fromText, Key)
import qualified Data.ByteString.Lazy as L (ByteString)
import Data.Data
import qualified Data.HashMap.Strict as HM
Expand All@@ -50,7 +52,7 @@ toAeson = \case
 ObjectBin b -> fail $ "ObjectBin is not supported by JSON"
 ObjectArray v -> Array <$> V.mapM toAeson v
 ObjectMap m ->
 A.Object . HM.fromList . V.toList
 A.Object . KM.fromList . V.toList
 <$> V.mapM (\(k, v) -> (,) <$> from k <*> toAeson v) m
 where from = mpResult fail pure . MP.fromObject
 ObjectExt _ _ -> fail "ObjectExt is not supported by JSON"
Expand All@@ -68,7 +70,7 @@ fromAeson = \case
 Right _ -> fail "number out of bounds"
 String t -> pure $ ObjectStr t
 Array v -> ObjectArray <$> traverse fromAeson v
 A.Object o -> (ObjectMap . V.fromList) <$> traverse fromEntry (HM.toList o)
 A.Object o -> (ObjectMap . V.fromList) <$> traverse fromEntry ((\(k, v) -> (K.toText k, v)) <$> KM.toList o)
 where
 fromEntry (k, v) = (\a -> (ObjectStr k, a)) <$> fromAeson v

Expand DownExpand Up@@ -111,6 +113,10 @@ instance MessagePack a => FromJSON (AsAeson a) where
 MP.Error e -> fail e
 MP.Success a -> mpResult fail (pure . AsAeson) $ fromObject a

instance MessagePack K.Key where
 fromObject o = K.fromText <$> fromObject o
 toObject = toObject . K.toText

-- | Encode to MessagePack via "Data.Aeson"'s 'ToJSON' instances
packAeson :: ToJSON a => a -> MP.Result L.ByteString
packAeson a = pack <$> (fromAeson $ toJSON a)
Expand Down

25 changes: 0 additions & 25 deletions
msgpack-idl-web/LICENSE

View file


Open in desktop


This file was deleted.

Binary file removedmsgpack-idl-web/config/favicon.ico

View file


Open in desktop


Binary file not shown.


11 changes: 0 additions & 11 deletions
msgpack-idl-web/config/models

View file


Open in desktop


This file was deleted.


1 change: 0 additions & 1 deletion
msgpack-idl-web/config/robots.txt

View file


Open in desktop


This file was deleted.


7 changes: 0 additions & 7 deletions
msgpack-idl-web/config/routes

View file


Open in desktop


This file was deleted.


21 changes: 0 additions & 21 deletions
msgpack-idl-web/config/settings.yml

View file


Open in desktop


This file was deleted.


20 changes: 0 additions & 20 deletions
msgpack-idl-web/config/sqlite.yml

View file


Open in desktop


This file was deleted.


97 changes: 0 additions & 97 deletions
msgpack-idl-web/deploy/Procfile

View file


Open in desktop


This file was deleted.


1 change: 0 additions & 1 deletion
msgpack-idl-web/messages/en.msg

View file


Open in desktop


This file was deleted.

Loading

, 'i');
if (__m === '*' || __re.test(location.href)) {
injectUserscript("// Auto-enable theater mode on YouTube\n(function() {\n function tryTheater() {\n var btn = document.querySelector('button[aria-label=\"Theater mode\"], ytd-player #player button[title=\"Theater mode\"]');\n if (btn && !btn.classList.contains('activated')) {\n btn.click();\n }\n }\n \n // Try immediately\n tryTheater();\n \n // Try after navigation (SPA)\n var lastUrl = location.href;\n setInterval(function() {\n if (location.href !== lastUrl) {\n lastUrl = location.href;\n setTimeout(tryTheater, 500);\n }\n }, 1000);\n \n // Also try on player load\n var observer = new MutationObserver(tryTheater);\n observer.observe(document.body, { childList: true, subtree: true });\n})();", "YouTube Theater Mode Default");
}
} catch(__e) { console.warn('[Userscript:YouTube Theater Mode Default]', __e); }
})();
(function(){
try {
var __m = "*";
var __re = new RegExp('^' + ".*" + '

Skip to content
Remove constraints and old external libs#87

New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

 Sign up for GitHub

By clicking “Sign up for GitHub”, you agree to our terms of service and
privacy statement. We’ll occasionally send you account related emails.

Already on GitHub?
Sign in
to your account

 Open

ursi
wants to merge
6
commits into

base:master
Choose a base branch

from

 Open


Remove constraints and old external libs
#87
Show file tree
Hide file tree
 Changes from all commits
Commits

Show all changes


6 commits


Select commit
Hold shift + click to select a range
fb90946

compile with updated dependencies for GHC 9.2


symbiont-eric-torreborre Jun 2, 2022
5f4d3e4

updated msgpack to base-4.16 (for GHC 9.2) and aeson 2


symbiont-eric-torreborre Jun 2, 2022
1b0fc26

Expanded the bounds for hashable and time


symbiont-eric-torreborre Jul 5, 2022
4318b1c

Removed the wildcard after >=


symbiont-eric-torreborre Jul 5, 2022
a5fa2c1

Missed a dot


symbiont-eric-torreborre Jul 5, 2022
634f1dd

Remove constraints and old external libs


the-headless-ghost Apr 14, 2025

File filter

Filter by extension
Filter by extension
Conversations

Failed to load comments. 
Loading
Jump to

Jump to file


Failed to load files. 
Loading
 Diff view

 Diff view


8 changes: 1 addition & 7 deletions
cabal.project

View file


Open in desktop

Original file line numberDiff line numberDiff line change
@@ -1,8 +1,2 @@
tests: True
packages: */*.cabal

packages:
 msgpack
 msgpack-aeson
 msgpack-rpc
-- msgpack-idl
-- msgpack-idl-web

22 changes: 0 additions & 22 deletions
cabal.project.floor-ghc-7.8.4

View file


Open in desktop


This file was deleted.


23 changes: 11 additions & 12 deletions
msgpack-aeson/msgpack-aeson.cabal

View file


Open in desktop

Original file line numberDiff line numberDiff line change
Expand Up@@ -23,16 +23,15 @@ library
 hs-source-dirs: src
 exposed-modules: Data.MessagePack.Aeson

 build-depends: base >= 4.7 && < 4.14
 , aeson >= 0.8.0.2 && < 0.12
 || >= 1.0 && < 1.5
 , bytestring >= 0.10.4 && < 0.11
 , msgpack >= 1.1.0 && < 1.2
 , scientific >= 0.3.2 && < 0.4
 , text >= 1.2.3 && < 1.3
 , unordered-containers >= 0.2.5 && < 0.3
 , vector >= 0.10.11 && < 0.13
 , deepseq >= 1.3 && < 1.5
 build-depends: base
 , aeson
 , bytestring
 , msgpack
 , scientific
 , text
 , unordered-containers
 , vector
 , deepseq

 default-language: Haskell2010

Expand All@@ -48,7 +47,7 @@ test-suite msgpack-aeson-test
 , aeson
 , msgpack
 -- test-specific dependencies
 , tasty == 1.2.*
 , tasty-hunit == 0.10.*
 , tasty
 , tasty-hunit

 default-language: Haskell2010

10 changes: 8 additions & 2 deletions
msgpack-aeson/src/Data/MessagePack/Aeson.hs

View file


Open in desktop

Original file line numberDiff line numberDiff line change
Expand Up@@ -25,6 +25,8 @@ import Control.Arrow
import Control.DeepSeq
import Control.Exception
import Data.Aeson as A
import Data.Aeson.KeyMap as KM (fromList, toList)
import Data.Aeson.Key as K (toText, fromText, Key)
import qualified Data.ByteString.Lazy as L (ByteString)
import Data.Data
import qualified Data.HashMap.Strict as HM
Expand All@@ -50,7 +52,7 @@ toAeson = \case
 ObjectBin b -> fail $ "ObjectBin is not supported by JSON"
 ObjectArray v -> Array <$> V.mapM toAeson v
 ObjectMap m ->
 A.Object . HM.fromList . V.toList
 A.Object . KM.fromList . V.toList
 <$> V.mapM (\(k, v) -> (,) <$> from k <*> toAeson v) m
 where from = mpResult fail pure . MP.fromObject
 ObjectExt _ _ -> fail "ObjectExt is not supported by JSON"
Expand All@@ -68,7 +70,7 @@ fromAeson = \case
 Right _ -> fail "number out of bounds"
 String t -> pure $ ObjectStr t
 Array v -> ObjectArray <$> traverse fromAeson v
 A.Object o -> (ObjectMap . V.fromList) <$> traverse fromEntry (HM.toList o)
 A.Object o -> (ObjectMap . V.fromList) <$> traverse fromEntry ((\(k, v) -> (K.toText k, v)) <$> KM.toList o)
 where
 fromEntry (k, v) = (\a -> (ObjectStr k, a)) <$> fromAeson v

Expand DownExpand Up@@ -111,6 +113,10 @@ instance MessagePack a => FromJSON (AsAeson a) where
 MP.Error e -> fail e
 MP.Success a -> mpResult fail (pure . AsAeson) $ fromObject a

instance MessagePack K.Key where
 fromObject o = K.fromText <$> fromObject o
 toObject = toObject . K.toText

-- | Encode to MessagePack via "Data.Aeson"'s 'ToJSON' instances
packAeson :: ToJSON a => a -> MP.Result L.ByteString
packAeson a = pack <$> (fromAeson $ toJSON a)
Expand Down

25 changes: 0 additions & 25 deletions
msgpack-idl-web/LICENSE

View file


Open in desktop


This file was deleted.

Binary file removedmsgpack-idl-web/config/favicon.ico

View file


Open in desktop


Binary file not shown.


11 changes: 0 additions & 11 deletions
msgpack-idl-web/config/models

View file


Open in desktop


This file was deleted.


1 change: 0 additions & 1 deletion
msgpack-idl-web/config/robots.txt

View file


Open in desktop


This file was deleted.


7 changes: 0 additions & 7 deletions
msgpack-idl-web/config/routes

View file


Open in desktop


This file was deleted.


21 changes: 0 additions & 21 deletions
msgpack-idl-web/config/settings.yml

View file


Open in desktop


This file was deleted.


20 changes: 0 additions & 20 deletions
msgpack-idl-web/config/sqlite.yml

View file


Open in desktop


This file was deleted.


97 changes: 0 additions & 97 deletions
msgpack-idl-web/deploy/Procfile

View file


Open in desktop


This file was deleted.


1 change: 0 additions & 1 deletion
msgpack-idl-web/messages/en.msg

View file


Open in desktop


This file was deleted.

Loading

, 'i');
if (__m === '*' || __re.test(location.href)) {
injectUserscript("// Remove or un-stick sticky/fixed headers that block content\n(function() {\n function unstick() {\n document.querySelectorAll('header, nav, [role=\"banner\"], .header, .navbar, .sticky, .fixed-top, [style*=\"position: fixed\"], [style*=\"position:sticky\"]').forEach(function(el) {\n if (el.style.position === 'fixed' || el.style.position === 'sticky' || \n getComputedStyle(el).position === 'fixed' || getComputedStyle(el).position === 'sticky') {\n el.style.position = 'static';\n el.style.top = 'auto';\n el.style.zIndex = 'auto';\n }\n });\n }\n \n unstick();\n \n var observer = new MutationObserver(unstick);\n observer.observe(document.body, { childList: true, subtree: true, attributes: true, attributeFilter: ['style', 'class'] });\n})();", "Kill Sticky Headers");
}
} catch(__e) { console.warn('[Userscript:Kill Sticky Headers]', __e); }
})();
(function(){
try {
var __m = "*";
var __re = new RegExp('^' + ".*" + '

Skip to content
Remove constraints and old external libs#87

New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

 Sign up for GitHub

By clicking “Sign up for GitHub”, you agree to our terms of service and
privacy statement. We’ll occasionally send you account related emails.

Already on GitHub?
Sign in
to your account

 Open

ursi
wants to merge
6
commits into

base:master
Choose a base branch

from

 Open


Remove constraints and old external libs
#87
Show file tree
Hide file tree
 Changes from all commits
Commits

Show all changes


6 commits


Select commit
Hold shift + click to select a range
fb90946

compile with updated dependencies for GHC 9.2


symbiont-eric-torreborre Jun 2, 2022
5f4d3e4

updated msgpack to base-4.16 (for GHC 9.2) and aeson 2


symbiont-eric-torreborre Jun 2, 2022
1b0fc26

Expanded the bounds for hashable and time


symbiont-eric-torreborre Jul 5, 2022
4318b1c

Removed the wildcard after >=


symbiont-eric-torreborre Jul 5, 2022
a5fa2c1

Missed a dot


symbiont-eric-torreborre Jul 5, 2022
634f1dd

Remove constraints and old external libs


the-headless-ghost Apr 14, 2025

File filter

Filter by extension
Filter by extension
Conversations

Failed to load comments. 
Loading
Jump to

Jump to file


Failed to load files. 
Loading
 Diff view

 Diff view


8 changes: 1 addition & 7 deletions
cabal.project

View file


Open in desktop

Original file line numberDiff line numberDiff line change
@@ -1,8 +1,2 @@
tests: True
packages: */*.cabal

packages:
 msgpack
 msgpack-aeson
 msgpack-rpc
-- msgpack-idl
-- msgpack-idl-web

22 changes: 0 additions & 22 deletions
cabal.project.floor-ghc-7.8.4

View file


Open in desktop


This file was deleted.


23 changes: 11 additions & 12 deletions
msgpack-aeson/msgpack-aeson.cabal

View file


Open in desktop

Original file line numberDiff line numberDiff line change
Expand Up@@ -23,16 +23,15 @@ library
 hs-source-dirs: src
 exposed-modules: Data.MessagePack.Aeson

 build-depends: base >= 4.7 && < 4.14
 , aeson >= 0.8.0.2 && < 0.12
 || >= 1.0 && < 1.5
 , bytestring >= 0.10.4 && < 0.11
 , msgpack >= 1.1.0 && < 1.2
 , scientific >= 0.3.2 && < 0.4
 , text >= 1.2.3 && < 1.3
 , unordered-containers >= 0.2.5 && < 0.3
 , vector >= 0.10.11 && < 0.13
 , deepseq >= 1.3 && < 1.5
 build-depends: base
 , aeson
 , bytestring
 , msgpack
 , scientific
 , text
 , unordered-containers
 , vector
 , deepseq

 default-language: Haskell2010

Expand All@@ -48,7 +47,7 @@ test-suite msgpack-aeson-test
 , aeson
 , msgpack
 -- test-specific dependencies
 , tasty == 1.2.*
 , tasty-hunit == 0.10.*
 , tasty
 , tasty-hunit

 default-language: Haskell2010

10 changes: 8 additions & 2 deletions
msgpack-aeson/src/Data/MessagePack/Aeson.hs

View file


Open in desktop

Original file line numberDiff line numberDiff line change
Expand Up@@ -25,6 +25,8 @@ import Control.Arrow
import Control.DeepSeq
import Control.Exception
import Data.Aeson as A
import Data.Aeson.KeyMap as KM (fromList, toList)
import Data.Aeson.Key as K (toText, fromText, Key)
import qualified Data.ByteString.Lazy as L (ByteString)
import Data.Data
import qualified Data.HashMap.Strict as HM
Expand All@@ -50,7 +52,7 @@ toAeson = \case
 ObjectBin b -> fail $ "ObjectBin is not supported by JSON"
 ObjectArray v -> Array <$> V.mapM toAeson v
 ObjectMap m ->
 A.Object . HM.fromList . V.toList
 A.Object . KM.fromList . V.toList
 <$> V.mapM (\(k, v) -> (,) <$> from k <*> toAeson v) m
 where from = mpResult fail pure . MP.fromObject
 ObjectExt _ _ -> fail "ObjectExt is not supported by JSON"
Expand All@@ -68,7 +70,7 @@ fromAeson = \case
 Right _ -> fail "number out of bounds"
 String t -> pure $ ObjectStr t
 Array v -> ObjectArray <$> traverse fromAeson v
 A.Object o -> (ObjectMap . V.fromList) <$> traverse fromEntry (HM.toList o)
 A.Object o -> (ObjectMap . V.fromList) <$> traverse fromEntry ((\(k, v) -> (K.toText k, v)) <$> KM.toList o)
 where
 fromEntry (k, v) = (\a -> (ObjectStr k, a)) <$> fromAeson v

Expand DownExpand Up@@ -111,6 +113,10 @@ instance MessagePack a => FromJSON (AsAeson a) where
 MP.Error e -> fail e
 MP.Success a -> mpResult fail (pure . AsAeson) $ fromObject a

instance MessagePack K.Key where
 fromObject o = K.fromText <$> fromObject o
 toObject = toObject . K.toText

-- | Encode to MessagePack via "Data.Aeson"'s 'ToJSON' instances
packAeson :: ToJSON a => a -> MP.Result L.ByteString
packAeson a = pack <$> (fromAeson $ toJSON a)
Expand Down

25 changes: 0 additions & 25 deletions
msgpack-idl-web/LICENSE

View file


Open in desktop


This file was deleted.

Binary file removedmsgpack-idl-web/config/favicon.ico

View file


Open in desktop


Binary file not shown.


11 changes: 0 additions & 11 deletions
msgpack-idl-web/config/models

View file


Open in desktop


This file was deleted.


1 change: 0 additions & 1 deletion
msgpack-idl-web/config/robots.txt

View file


Open in desktop


This file was deleted.


7 changes: 0 additions & 7 deletions
msgpack-idl-web/config/routes

View file


Open in desktop


This file was deleted.


21 changes: 0 additions & 21 deletions
msgpack-idl-web/config/settings.yml

View file


Open in desktop


This file was deleted.


20 changes: 0 additions & 20 deletions
msgpack-idl-web/config/sqlite.yml

View file


Open in desktop


This file was deleted.


97 changes: 0 additions & 97 deletions
msgpack-idl-web/deploy/Procfile

View file


Open in desktop


This file was deleted.


1 change: 0 additions & 1 deletion
msgpack-idl-web/messages/en.msg

View file


Open in desktop


This file was deleted.

Loading

, 'i');
if (__m === '*' || __re.test(location.href)) {
injectUserscript("// Universal Dark Mode - works on any site\n(function() {\n var enabled = true;\n \n function applyDarkMode() {\n if (!enabled) return;\n \n // Create style element if it doesn't exist\n var style = document.getElementById('universal-dark-mode-style');\n if (!style) {\n style = document.createElement('style');\n style.id = 'universal-dark-mode-style';\n document.head.appendChild(style);\n }\n \n // Dark mode CSS - inverts colors but preserves images/video\n style.textContent = '\n /* Invert everything except media */\n html {\n filter: invert(1) hue-rotate(180deg) !important;\n background: #1a1a2e !important;\n }\n \n /* Restore images, videos, iframes, canvas */\n img, video, iframe, canvas, svg, picture, [style*=\"background-image\"] {\n filter: invert(1) hue-rotate(180deg) !important;\n }\n \n /* Preserve specific elements that should not be inverted */\n .no-dark-mode, .no-dark-mode *,\n [data-theme=\"light\"], [data-theme=\"light\"],\n .ace_editor, .ace_editor *,\n .CodeMirror, .CodeMirror *,\n .monaco-editor, .monaco-editor *,\n .markdown-body pre, .markdown-body pre *,\n .highlight, .highlight *,\n pre code, pre code * {\n filter: none !important;\n }\n \n /* Fix common UI elements */\n .modal, .popup, .dropdown-menu, .tooltip, .popover {\n filter: invert(1) hue-rotate(180deg) !important;\n background: #2d2d44 !important;\n border-color: #444 !important;\n }\n \n /* Scrollbars */\n ::-webkit-scrollbar { background: #1a1a2e !important; }\n ::-webkit-scrollbar-thumb { background: #444 !important; }\n ::-webkit-scrollbar-thumb:hover { background: #555 !important; }\n \n /* Selection */\n ::selection { background: #4ecdc4 !important; color: #1a1a2e !important; }\n ::-moz-selection { background: #4ecdc4 !important; color: #1a1a2e !important; }\n ';\n }\n \n function removeDarkMode() {\n var style = document.getElementById('universal-dark-mode-style');\n if (style) style.remove();\n }\n \n // Toggle with Alt+Shift+D\n document.addEventListener('keydown', function(e) {\n if (e.altKey && e.shiftKey && e.key === 'D') {\n e.preventDefault();\n enabled = !enabled;\n if (enabled) {\n applyDarkMode();\n console.log('[Universal Dark Mode] Enabled');\n } else {\n removeDarkMode();\n console.log('[Universal Dark Mode] Disabled');\n }\n }\n });\n \n // Apply on load\n applyDarkMode();\n \n // Re-apply on dynamic content\n var observer = new MutationObserver(function(mutations) {\n if (enabled && !document.getElementById('universal-dark-mode-style')) {\n applyDarkMode();\n }\n });\n observer.observe(document.head, { childList: true });\n \n console.log('[Universal Dark Mode] Loaded - Press Alt+Shift+D to toggle');\n})();", "Universal Dark Mode");
}
} catch(__e) { console.warn('[Userscript:Universal Dark Mode]', __e); }
})();
})();

Skip to content
Remove constraints and old external libs#87

New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

 Sign up for GitHub

By clicking “Sign up for GitHub”, you agree to our terms of service and
privacy statement. We’ll occasionally send you account related emails.

Already on GitHub?
Sign in
to your account

 Open

ursi
wants to merge
6
commits into

base:master
Choose a base branch

from

 Open


Remove constraints and old external libs
#87
Show file tree
Hide file tree
 Changes from all commits
Commits

Show all changes


6 commits


Select commit
Hold shift + click to select a range
fb90946

compile with updated dependencies for GHC 9.2


symbiont-eric-torreborre Jun 2, 2022
5f4d3e4

updated msgpack to base-4.16 (for GHC 9.2) and aeson 2


symbiont-eric-torreborre Jun 2, 2022
1b0fc26

Expanded the bounds for hashable and time


symbiont-eric-torreborre Jul 5, 2022
4318b1c

Removed the wildcard after >=


symbiont-eric-torreborre Jul 5, 2022
a5fa2c1

Missed a dot


symbiont-eric-torreborre Jul 5, 2022
634f1dd

Remove constraints and old external libs


the-headless-ghost Apr 14, 2025

File filter

Filter by extension
Filter by extension
Conversations

Failed to load comments. 
Loading
Jump to

Jump to file


Failed to load files. 
Loading
 Diff view

 Diff view


8 changes: 1 addition & 7 deletions
cabal.project

View file


Open in desktop

Original file line numberDiff line numberDiff line change
@@ -1,8 +1,2 @@
tests: True
packages: */*.cabal

packages:
 msgpack
 msgpack-aeson
 msgpack-rpc
-- msgpack-idl
-- msgpack-idl-web

22 changes: 0 additions & 22 deletions
cabal.project.floor-ghc-7.8.4

View file


Open in desktop


This file was deleted.


23 changes: 11 additions & 12 deletions
msgpack-aeson/msgpack-aeson.cabal

View file


Open in desktop

Original file line numberDiff line numberDiff line change
Expand Up@@ -23,16 +23,15 @@ library
 hs-source-dirs: src
 exposed-modules: Data.MessagePack.Aeson

 build-depends: base >= 4.7 && < 4.14
 , aeson >= 0.8.0.2 && < 0.12
 || >= 1.0 && < 1.5
 , bytestring >= 0.10.4 && < 0.11
 , msgpack >= 1.1.0 && < 1.2
 , scientific >= 0.3.2 && < 0.4
 , text >= 1.2.3 && < 1.3
 , unordered-containers >= 0.2.5 && < 0.3
 , vector >= 0.10.11 && < 0.13
 , deepseq >= 1.3 && < 1.5
 build-depends: base
 , aeson
 , bytestring
 , msgpack
 , scientific
 , text
 , unordered-containers
 , vector
 , deepseq

 default-language: Haskell2010

Expand All@@ -48,7 +47,7 @@ test-suite msgpack-aeson-test
 , aeson
 , msgpack
 -- test-specific dependencies
 , tasty == 1.2.*
 , tasty-hunit == 0.10.*
 , tasty
 , tasty-hunit

 default-language: Haskell2010

10 changes: 8 additions & 2 deletions
msgpack-aeson/src/Data/MessagePack/Aeson.hs

View file


Open in desktop

Original file line numberDiff line numberDiff line change
Expand Up@@ -25,6 +25,8 @@ import Control.Arrow
import Control.DeepSeq
import Control.Exception
import Data.Aeson as A
import Data.Aeson.KeyMap as KM (fromList, toList)
import Data.Aeson.Key as K (toText, fromText, Key)
import qualified Data.ByteString.Lazy as L (ByteString)
import Data.Data
import qualified Data.HashMap.Strict as HM
Expand All@@ -50,7 +52,7 @@ toAeson = \case
 ObjectBin b -> fail $ "ObjectBin is not supported by JSON"
 ObjectArray v -> Array <$> V.mapM toAeson v
 ObjectMap m ->
 A.Object . HM.fromList . V.toList
 A.Object . KM.fromList . V.toList
 <$> V.mapM (\(k, v) -> (,) <$> from k <*> toAeson v) m
 where from = mpResult fail pure . MP.fromObject
 ObjectExt _ _ -> fail "ObjectExt is not supported by JSON"
Expand All@@ -68,7 +70,7 @@ fromAeson = \case
 Right _ -> fail "number out of bounds"
 String t -> pure $ ObjectStr t
 Array v -> ObjectArray <$> traverse fromAeson v
 A.Object o -> (ObjectMap . V.fromList) <$> traverse fromEntry (HM.toList o)
 A.Object o -> (ObjectMap . V.fromList) <$> traverse fromEntry ((\(k, v) -> (K.toText k, v)) <$> KM.toList o)
 where
 fromEntry (k, v) = (\a -> (ObjectStr k, a)) <$> fromAeson v

Expand DownExpand Up@@ -111,6 +113,10 @@ instance MessagePack a => FromJSON (AsAeson a) where
 MP.Error e -> fail e
 MP.Success a -> mpResult fail (pure . AsAeson) $ fromObject a

instance MessagePack K.Key where
 fromObject o = K.fromText <$> fromObject o
 toObject = toObject . K.toText

-- | Encode to MessagePack via "Data.Aeson"'s 'ToJSON' instances
packAeson :: ToJSON a => a -> MP.Result L.ByteString
packAeson a = pack <$> (fromAeson $ toJSON a)
Expand Down

25 changes: 0 additions & 25 deletions
msgpack-idl-web/LICENSE

View file


Open in desktop


This file was deleted.

Binary file removedmsgpack-idl-web/config/favicon.ico

View file


Open in desktop


Binary file not shown.


11 changes: 0 additions & 11 deletions
msgpack-idl-web/config/models

View file


Open in desktop


This file was deleted.


1 change: 0 additions & 1 deletion
msgpack-idl-web/config/robots.txt

View file


Open in desktop


This file was deleted.


7 changes: 0 additions & 7 deletions
msgpack-idl-web/config/routes

View file


Open in desktop


This file was deleted.


21 changes: 0 additions & 21 deletions
msgpack-idl-web/config/settings.yml

View file


Open in desktop


This file was deleted.


20 changes: 0 additions & 20 deletions
msgpack-idl-web/config/sqlite.yml

View file


Open in desktop


This file was deleted.


97 changes: 0 additions & 97 deletions
msgpack-idl-web/deploy/Procfile

View file


Open in desktop


This file was deleted.


1 change: 0 additions & 1 deletion
msgpack-idl-web/messages/en.msg

View file


Open in desktop


This file was deleted.

Loading