thumphries

build/
node_modules/

thumphries

{-# LANGUAGE TemplateHaskell #-}
module Lens where

import Control.Lens
import Data.Monoid (First, (<>))

data FooBar =
     Foo (Either Int Bool)
   | Bar (Maybe Bool)

thumphries

import           Data.ByteString (ByteString)
import qualified Data.ByteString.Char8 as B8

import           Criterion.Main
import           Criterion.Types (Config (..))

import qualified Mystery

thumphries

{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE PatternSynonyms #-}

import           Control.Applicative
import           Control.Lens
import           Control.Monad

import           Data.ByteString (ByteString)
import qualified Data.ByteString.Lazy as BSL
import qualified Data.IORef as IORef

thumphries

FROM alpine:latest

COPY build.mk /tmp/

RUN apk add --update curl xz alpine-sdk perl gmp-dev file gmp openssh openssl zlib-dev strace vim less jq ncurses-dev bash autoconf

RUN cd /tmp && \
    wget http://ghc-musl-dist-apse2.s3-website-ap-southeast-2.amazonaws.com/ghc-7.8.4/ghc-7.8.4-x86_64-unknown-linux.tar.bz2 && \
    tar xvf ghc*.tar.bz2 && \
    cd ghc-7.8.4 && \

thumphries

Notes on cross-compiling GHC for a Darwin target.

TL;DR I managed to get most of a stage1 to build. I got a linker failure during ghc-prim, but most of the libraries had already built successfully, including some C FFI-heavy packages like bytestring. I suspect my toolchain was just in the wrong spot, and/or libraries misconfigured.

• We need a normal host GCC toolchain (build-essential), autoconf, happy, alex, and a platform copy of GHC (the Stage0).
• As per the GHC CrossCompiling page on Trac, we need a GCC crosschain. I used osxcross.

thumphries

Mafia Quick Start

Mafia is a wrapper for cabal-install that eliminates most of the pain points, without the need for a blessed set of packages.

Install, use, upgrade

Put the wrapper script somewhere on your path:

cd $HOME/bin && wget https://raw.githubusercontent.com/ambiata/mafia/master/script/mafia

thumphries

name     = "Client"
kernel   = "Client"
memory   = 16
seclabel ='system_u:system_r:domU_t'

thumphries

name     = "Client"
kernel   = "Client"
memory   = 16
seclabel ='system_u:system_r:domU_t'

thumphries

{-# LANGUAGE OverloadedStrings #-}

import Data.QRCode
import Data.Text (Text, pack, unpack)
import qualified Data.Text as T
import qualified Data.Text.IO as T
import Data.Word8
import System.Environment
import System.IO