erantapaa

-- A receipe for using StateT with haskeline's InputT transformer.
-- Derived from this /r/haskell post: http://www.reddit.com/r/haskell/comments/1os0yq/haskeline_woes/
--
-- The key is using Control.Monad.State.Strict - using .Lazy doesn't work.

import Control.Monad.State.Strict
import Control.Monad.Trans (lift)
import System.Console.Haskeline

erantapaa

import System.TimeIt
import System.Environment
import Text.Printf

subsequencesOfSize1 :: Int -> [a] -> [[a]]
subsequencesOfSize1 n xs = let l = length xs
                          in if n>l then [] else subsequencesBySize xs !! (l-n)
 where
   subsequencesBySize [] = [[[]]]
   subsequencesBySize (x:xs) = let next = subsequencesBySize xs

erantapaa

Check list for installing gtk 2.x for Haskell on OSX:

1. Install XQuartz (link) - this is needed for the xcb-shm package config file.
2. brew install gtk+
3. export PKG_CONFIG_PATH=/usr/local/Cellar/cairo/(...whatever...)/lib/pkgconfig:/opt/X11/lib/pkgconfig/:
4. Make sure alex and happy are installed - they are needed by gtk2hs-buildtools
5. cabal install gtk2hs-buildtools
6. cabal install gtk

erantapaa

import System.Environment
import qualified Data.Array as A
import Data.Array.IO
import qualified Data.Array.MArray as M
import Data.Array.Base  ( UArray, unsafeFreezeSTUArray )
import Data.Array.Unboxed
import qualified Data.Array.Unboxed as U
import Control.Monad
import Debug.Trace
import Pipes

erantapaa

{-# LANGUAGE BangPatterns #-}

import Data.Array.IO
import Data.Array.Unboxed
import Control.Monad

collatz x
  | even x    = div x 2
  | otherwise = 3*x+1

erantapaa

-- Solution to "Let it snow" 1had - http://lpaste.net/118571

import qualified Data.Map.Strict as M
import Data.List
import Control.Monad
import Data.Maybe

data SnowFlake = Six | Star | Eight | Flower | Unit
   deriving (Eq, Ord, Show)

erantapaa

{
module Nested where

import Control.Monad
}

%wrapper "monadUserState"

$whitespace = [\ \t\b]
$digit      = 0-9                                            -- digits

erantapaa

{-# LANGUAGE OverloadedStrings #-}
import Text.Blaze.Svg11 ((!), mkPath, rotate, l, m)
import qualified Text.Blaze.Svg11 as S
import qualified Text.Blaze.Svg11.Attributes as A
import Text.Blaze.Svg.Renderer.String (renderSvg)
import qualified Text.Blaze.Html5 as H
import Text.Blaze.Html.Renderer.Text
import qualified Data.Text.Lazy.IO as TL

main :: IO ()

erantapaa

-- Hackage versions as of 2012-05-23 00:00:00 UTC
constraints:
  4Blocks <= 0.2,
  AC-Angle <= 1.0,
  AC-Boolean <= 1.1.0,
  AC-BuildPlatform <= 1.1.0,
  AC-Colour <= 1.1.4,
  AC-EasyRaster-GTK <= 1.1.3,
  AC-HalfInteger <= 1.2.1,
  AC-MiniTest <= 1.1.1,

erantapaa

#!/bin/sh
#
# Recipe for reproducing a linkage error with GHC 7.8.3 under OSX.
#
# GHC was installed using https://ghcformacosx.github.io/
#
# Specific 7.8.3 version: https://github.com/ghcformacosx/ghc-dot-app/releases/download/v7.8.3-r1/ghc-7.8.3-r1.zip
#
# Output of the find command at the end will include a reference to 'findExecutable3_info',
# but nowhere does the tar package reference the function 'findExecutable'.