Skip to content

Instantly share code, notes, and snippets.

View flazz's full-sized avatar

Franco Lazzarino flazz

View GitHub Profile
@flazz
flazz / -
Created October 28, 2014 16:46
{
packageOverrides = pkgs: rec {
mercurial = mercurial.override {
stdenv = pkgs.clangStdenv;
};
};
}
package spike.tracing
import com.twitter.finagle.builder._
import com.twitter.finagle.http._
import com.twitter.finagle.{SimpleFilter,Service}
import com.twitter.finagle.stats._
import com.twitter.finagle.tracing._
import com.twitter.finagle.zipkin.thrift._
import com.twitter.util.Future
import java.net.InetSocketAddress
@flazz
flazz / report.awk
Created October 8, 2014 12:29
avg min max awk
BEGIN { min = 10000000000000; max = 0 }
{
sum += $1;
if ($1 < min) { min = $1 };
if ($1 > max) { max = $1 };
}
END {
print min, "\t", sum / NR, "\t", max;
@flazz
flazz / red-black.scala
Created October 8, 2014 12:20
red black tree scala
object Color extends Enumeration {
type Color = Value
val Red, Black = Value
}
sealed trait Tree[A] { def color: Color.Color }
case class Empty[A]() extends Tree[A] { def color = Color.Black }
case class Full[A](color: Color.Color, a: A, l: Tree[A], r: Tree[A]) extends Tree[A]
object Tree {
{stdenv, fetchurl, bash, coreutils}:
let version = "2.07";
in stdenv.mkDerivation rec {
name = "perp-${version}";
src = fetchurl {
url = "http://b0llix.net/perp/distfiles/${name}.tar.gz";
sha256 = "1222fe31c16014d8b2a78416f93ba9f8c31eddbc381adc9021fa5d9764475815";
};
% cat default.nix
{stdenv, fetchurl}:
let version = "2.0.7";
in stdenv.mkDerivation rec {
name = "perp-${version}";
src = fetchurl {
url = "http://b0llix.net/perp/distfiles/${name}-${version}.tar.gz";
sha256 = "1222fe31c16014d8b2a78416f93ba9f8c31eddbc381adc9021fa5d9764475815";
@flazz
flazz / point.js
Last active December 27, 2015 02:58
var p = point(2,2);
p.x(); // => 2
p.y(); // => 2
var p2 = p.scale(1, 2);
p2.x(); // => 2
p2.y(); // => 4
// can it satisfy?
@flazz
flazz / codata.js
Created October 31, 2013 19:43
codata in js
var hof = function (z, f) {
var x = f(z);
return {
h: function() { return x; },
t: function() { return hof(x, f); }
};
}
@flazz
flazz / nginx.rb
Last active December 22, 2015 11:28
location /lua {
default_type 'text/plain';
content_by_lua 'ngx.print("lua!!!")';
}
@flazz
flazz / gist:6354572
Created August 27, 2013 14:50
free monad list, uses product type
import Control.Monad.Free
import Test.QuickCheck
-- tuple based free list
type Nil = ()
nilWitness = ()
data Pair a b = Pair a b
type Ftor = Pair
--type Ftor a = (,) a