| -- Big respect to author of the article Apple Push Notifications with Haskell | |
| -- http://bravenewmethod.com/2012/11/08/apple-push-notifications-with-haskell/ | |
| -- It is actually the same code, simplified for my needs | |
| module APN where | |
| import qualified Data.ByteString as B | |
| import qualified Data.ByteString.Char8 as BC | |
| import qualified Data.ByteString.Lazy as BL | |
| import qualified Data.ByteString.UTF8 as BU |
Copy and paste the swift code below into a playground to experiment.
This is a very close emulation of Functor and Monad typeclasses in swift. However, it is very fragile (i.e. easy to crash the compiler).
For example, instance methods of fmap will run fine, but attempting to use a globally defined fmap that acts on Functor types will cause a crash. Similarly for bind. Unfortunately this means we cannot define the nice infix operator versions of these functions.
| interface Functor { | |
| fmap: (any) => any; | |
| } | |
| interface Monad extends Functor { | |
| bind: (any) => Monad; | |
| } | |
| interface Maybe extends Monad { | |
| } |
| # unregister broken GHC packages. Run this a few times to resolve dependency rot in installed packages. | |
| # ghc-pkg-clean -f cabal/dev/packages*.conf also works. | |
| function ghc-pkg-clean() { | |
| for p in `ghc-pkg check $* 2>&1 | grep problems | awk '{print $6}' | sed -e 's/:$//'` | |
| do | |
| echo unregistering $p; ghc-pkg $* unregister $p | |
| done | |
| } | |
| # remove all installed GHC/cabal packages, leaving ~/.cabal binaries and docs in place. |
