Skip to content

Instantly share code, notes, and snippets.

warming up
estimating clock resolution...
mean is 941.9046 ns (640001 iterations)
found 1045200 outliers among 639999 samples (163.3%)
501011 (78.3%) low severe
544189 (85.0%) high severe
estimating cost of a clock call...
mean is 52.69083 ns (7 iterations)
benchmarking positional/decode/presidents/without conversion
-- $ ghc -ddump-simpl -dsuppress-all Fib.hs -fforce-recomp -O2
[1 of 1] Compiling Fib ( Fib.hs, Fib.o )
==================== Tidy Core ====================
Result size of Tidy Core = {terms: 52, types: 59, coercions: 0}
fibs3
fibs3 = __integer 1
fibs4
(add-hook 'haskell-mode-hook
(lambda () (add-hook 'before-save-hook 'kill-warnings-buffer nil 'make-it-local)))
(defun kill-warnings-buffer ()
(when (get-buffer "*Warnings*")
(kill-buffer "*Warnings*")))
;; Projectile
(progn
(require 'projectile)
(projectile-global-mode)
(setq projectile-indexing-method 'alien)
(setq projectile-enable-caching t))
;; Relax the GC
(setq gc-cons-threshold 20000000)
data Static = X | Y
resource :: Resource WithA WithB Ident Void Static
resource = mkResourceReader
{ R.name = "foo"
, R.schema = noListing $ named
[ ("id" , singleRead ById )
, ( "x" , static X )
, ( "y" , static Y )
]
@bergmark
bergmark / gist:76cafefb300546e9b90e
Last active November 9, 2015 17:04 — forked from dcoutts/gist:9a909e908f5294c08118
Draft Hackage trustee policy and procedures

Draft Hackage trustee policy and procedures

The Hackage trustees are a group of volunteers who are interested in the health of the package collection as a whole. This is different to the role of maintainers of individual packages.

The trustees role is in many ways similar to that of the individuals who maintain the Haskell packages for the various Linux distributions. In Linux distributions the distribution maintainers seek to have their

// x :: Either (Either a b) c -> Either a (Either b c)
// x = either (either Left (Right . Left)) (Right . Right)
interface Either<A,B> {
left? : A;
right? : B;
}
class Fns
{
#!/bin/bash
cabal configure && cabal build && cabal haddock --hyperlink-source --html-location='http://localhost:8080/package/$pkg/docs' --contents-location='http://localhost:8080/package/$pkg'
S=$?
if [ "${S}" -eq "0" ]; then
cd "dist/doc/html"
DDIR="${1}-${2}-docs"
cp -r "${1}" "${DDIR}" && tar -c -v -z --format=ustar -f "${DDIR}.tar.gz" "${DDIR}"
CS=$?
if [ "${CS}" -eq "0" ]; then
echo "Uploading to Hackage…"
example/Example.hs:1:1: Splicing declarations
mkId ''Id
======>
example/Example.hs:25:1-9
unsafeId :: UUID -> Id
unsafeId = Id
unsafeId' :: UUID -> Maybe Id
unsafeId' = (.) Just Id
instance FromField Id where
fromField = fromFieldAux unsafeId'
HUnit-1.3.0.0 depended on by:
- deepseq-1.4.1.2 (==1.2.*). No maintainer. @haskell
QuickCheck-2.8.1 depended on by:
- bytestring-0.10.6.0 (>=2.4 && < 2.7). No maintainer. @haskell
binary-0.8.0.0 depended on by:
- Agda-2.4.2.5 (>=0.7.2.1 && < 0.8). Andrés Sicard-Ramírez <asr@eafit.edu.co> @asr. @agda
- Cabal-ide-backend-1.23.0.0 (==0.7.*). No maintainer. @haskell
- JuicyPixels-3.2.6.4 (>=0.5 && < 0.8). Vincent Berthoux <vincent.berthoux@gmail.com>. @Twinside