songpp

-- @Author: spp
-- @Date:   2014-09-26 17:16:53
-- @Last Modified by:   spp
-- @Last Modified time: 2014-09-26 17:21:58

{-# LANGUAGE DataKinds, ScopedTypeVariables, DeriveDataTypeable, Rank2Types, ExistentialQuantification #-}
module Params(
    Params,
    Param,
    mkParam,

songpp

#! /bin/sh


VERS="1.6 1.7 1.8"

for i in $VERS; do
    echo "$i => $(/usr/libexec/java_home -v $i)";
done

songpp

import Control.Monad
import System.Exit
import Control.Concurrent
import Control.Concurrent.MVar


data Person = John | Jeff | Emma | Steve | Julie deriving (Show, Enum)

next Julie = John
next p = succ p

songpp

{-# LANGUAGE TupleSections #-}
module Huffman where

import qualified Data.ByteString (ByteString)
import Data.Map (Map)
import qualified Data.Map as Map


data Tree a = Node Int (Tree a) (Tree a) | Leaf a Int deriving Show
data Bit = L | R deriving Show

songpp

{-# LANGUAGE OverloadedStrings #-}

import           Data.CaseInsensitive  ( CI )
import qualified Data.CaseInsensitive as CI
import Control.Monad
import Control.Monad.IO.Class
import Data.Maybe (fromJust)
import           Data.ByteString      (ByteString)
import           Data.ByteString      as B
import qualified Data.ByteString.Lazy as L

songpp

{
	// Sets the colors used within the text area
	"color_scheme": "Packages/Color Scheme - Default/Monokai.tmTheme",

	// Note that the font_face and font_size are overriden in the platform
	// specific settings file, for example, "Base File (Linux).sublime-settings".
	// Because of this, setting them here will have no effect: you must set them
	// in your User File Preferences.
	"font_face": "Monaco",
	"font_size": 12,

songpp

(setenv "PATH" (concat (getenv "PATH") ":/opt/X11/bin:/usr/local/bin:~/.cabal/bin"))
(setq exec-path (append exec-path '("/usr/local/bin" "/opt/X11/bin" "~/.cabal/bin")))

(setq x-select-enable-clipboard t)

(setq locale-coding-system 'utf-8)
(set-terminal-coding-system 'utf-8-unix)
(set-keyboard-coding-system 'utf-8)
(set-selection-coding-system 'utf-8)
(prefer-coding-system 'utf-8)

songpp

import System.Environment
import System.Process
import Data.List (isInfixOf)

-- | This script wraps clang to pass it essential arguments that keep it from dying when
-- GHC uses it as a C pre-processor during the build process.
-- To use it, choose the version of clang you'd like to use, 
-- (GHC-iOS needs to use Xcode5's clang, which is already set here)
-- then compile it (ghc clang-xcode5-wrapper.hs).
-- Then, find your GHC settings file (usually something like /usr/local/lib/ghc-7.6.3/settings)

songpp

package test;

import scala.concurrent.util.Unsafe;

import java.util.concurrent.atomic.AtomicReferenceFieldUpdater;



/**
 * User: sunflower

songpp

package sheets

import language.existentials
import java.util.ArrayList
import java.util.LinkedList
import scala.collection.mutable.LinkedHashSet

object types {

  type T[X] = X => X