kgadek’s gists

kgadek / gist:dc73273d67cec199f706

Created July 29, 2014 00:39

	Building flowbox-graphics-0.14.0.0...
	Failed to install flowbox-graphics-0.14.0.0
	Last 10 lines of the build log ( /Users/konrad/.cabal/logs/flowbox-graphics-0.14.0.0.log ):
	(and originally defined in `Control.Monad.Trans.Class')

	src/Flowbox/Graphics/Color/CMY/Accelerate.hs:48:89:
	Ambiguous occurrence `lift'
	It could refer to either `Data.Array.Accelerate.lift',
	imported from `Data.Array.Accelerate' at src/Flowbox/Graphics/Color/CMY/Accelerate.hs:15:1-34
	(and originally defined in `accelerate-0.14.0.0:Data.Array.Accelerate.Prelude')

kgadek / gist:8e768773f54a8de68bdb

Created July 29, 2014 14:43

	[root@cbeff4f8926d flowbox-env]# ./bootstrap.py ../flowbox
	Working in /data/slave/flowbox_builder__GHC_7_8_3_/flowbox-env/dist/tmp
	Downloading ghc (http://www.haskell.org/ghc/dist/7.6.3/ghc-7.6.3-x86_64-unknown-linux.tar.bz2)
	File /data/slave/flowbox_builder__GHC_7_8_3_/flowbox-env/dist/tmp/ghc-7.6.3-x86_64-unknown-linux.tar.bz2 already exists. Skipping download.
	Extracting ghc
	File /data/slave/flowbox_builder__GHC_7_8_3_/flowbox-env/dist/tmp/ghc-7.6.3/LICENSE already exists. Skipping extraction.
	Target ghc seems to be installed in /data/slave/flowbox_builder__GHC_7_8_3_/flowbox-env/dist/linux-x86_64/base. Skipping installation process.
	Recaching local package db at '/root/.flowbox/pkgDb'
	Recaching global package db at '/data/slave/flowbox_builder__GHC_7_8_3_/flowbox-env/dist/linux-x86_64/global/pkgDb'
	Compiling all flowbox packages

kgadek / gist:c2393a0b1c6505b65dfb

Created July 29, 2014 15:10

	[root@cbeff4f8926d bla]# cabal sandbox init
	Writing a default package environment file to /root/bla/cabal.sandbox.config
	Creating a new sandbox at /root/bla/.cabal-sandbox
	[root@cbeff4f8926d bla]# cabal install protocol-buffers==2.0.14
	Resolving dependencies...
	Notice: installing into a sandbox located at /root/bla/.cabal-sandbox
	Configuring syb-0.4.2...
	Configuring utf8-string-0.3.8...
	Building utf8-string-0.3.8...
	Building syb-0.4.2...

kgadek / prisms.hs

Created July 30, 2014 11:26

question on lenses/prisms

	{-# LANGUAGE TemplateHaskell #-}

	import Control.Lens
	import Test.Hspec
	import Control.Monad

	data Gene = X {_ident::Int, _xx::String} \| Y {_ident::Int, _yy::Char}

	makeLenses ''Gene
	makePrisms ''Gene

kgadek / gist:2ebf2a4a0c6f91af76e0

Created August 12, 2014 14:00

	❯ pwd
	~/tmp/hprotoc-2.0.15

	❯ cabal install
	Resolving dependencies...
	Configuring protocol-buffers-descriptor-2.0.14...
	Building protocol-buffers-descriptor-2.0.14...
	Installed protocol-buffers-descriptor-2.0.14
	Configuring hprotoc-2.0.15...
	Building hprotoc-2.0.15...

kgadek / gist:205f217edec07a70a4c3

Created August 21, 2014 10:45


	def remove_all_of_haskell(noninteractive=False):
	with _section("Finding all haskell artifacts..."):
	remove = [
	"~/.flowbox"
	]
	remove.extend(
	local("find /usr/bin /usr/local/bin -type l \| xargs -If sh -c '/bin/echo -n f /; readlink f' \| egrep '//Library/(Haskell\|Frameworks/(GHC\|HaskellPlatform).framework)' \| awk '{print $1}'",
	capture=True)
	.split("\n")

kgadek / nix.rb

Last active August 29, 2015 14:07

	require "formula"

	# Documentation: https://github.com/Homebrew/homebrew/wiki/Formula-Cookbook
	# /usr/local/Library/Contributions/example-formula.rb
	# PLEASE REMOVE ALL GENERATED COMMENTS BEFORE SUBMITTING YOUR PULL REQUEST!

	class Nix < Formula
	homepage "http://nixos.org/nix"
	url "http://nixos.org/releases/nix/nix-1.7/nix-1.7.tar.xz"
	version "1.7"

kgadek / nix.rb

Created October 14, 2014 01:01

Works for me :)

	require "formula"

	# Documentation: https://github.com/Homebrew/homebrew/wiki/Formula-Cookbook
	# /usr/local/Library/Contributions/example-formula.rb
	# PLEASE REMOVE ALL GENERATED COMMENTS BEFORE SUBMITTING YOUR PULL REQUEST!

	class Nix < Formula
	homepage "http://nixos.org/nix"
	url "http://nixos.org/releases/nix/nix-1.7/nix-1.7.tar.xz"
	version "1.7"

kgadek / gist:e402a3edb18bd0e0682d

Created October 28, 2014 23:05

Powershell parallel

	cls
	"foo.txt", "bar.txt" \| %{

	$ScriptBlock = {
	param($name)
	Write-Host "[processing '$name' inside the job]"
	Get-Content "$name" \| %{
	Write-Host "Content: $_"
	}
	Start-Sleep 1

kgadek / poly.hs

Last active August 29, 2015 14:13

Cool polymorphism

	{-# LANGUAGE MultiParamTypeClasses, FunctionalDependencies, GADTs, RankNTypes #-}

	class HasX a b \| a -> b where getX :: a -> b

	data Point2 where
	Point2 :: Int -> Int -> Point2
	data Point3 where
	Point3 :: Float -> Float -> Float -> Point3

	instance HasX Point2 Int where getX (Point2 x _) = x

Konrad Gądek kgadek