ptitfred

require "active_support/time"

# in 3 days
Time.fluent("+3d")

# Tomorrow at 10 am
Time.fluent("+1d @10h")

class Time
  def self.fluent(at)

ptitfred

package web

import com.sun.net.httpserver._
import java.net.InetSocketAddress
import java.net.Inet4Address

case class Answer(code: Int, body: String)

class MyServer(port: Int) {
  type Handler = String => Answer

ptitfred

# http://stackoverflow.com/questions/15393441/obfuscated-c-code-contest-2006-please-explain-sykes2-c

cd $(mktemp -d /tmp/clock.XXXX)

cat > clock.c <<C
main(_){_^448&&main(-~_);putchar(--_%64?32|-~7[__TIME__-_/8%8][">'txiZ^(~z?"-48]>>";;;====~$::199"[_*2&8|_/64]/(_&2?1:8)%8&1:10);}
C

gcc -o clock clock.c

ptitfred

#!/bin/bash

i=0

IFS=$'\n'
for f in $(find . -iname "*.png" | sort -k2 --field-separator=_)
do
  let "i += 1"
  number=$(printf "%03d" $i)
  convert "${f}" slide_${number}.pdf

ptitfred

Keybase proof

I hereby claim:

• I am ptitfred on github.
• I am ptitfred (https://keybase.io/ptitfred) on keybase.
• I have a public key ASBaeSUUdQZUcqJhNE2refT-wv0w2_eDU2zAtdeJUpoylwo

To claim this, I am signing this object:

ptitfred

-- msgpack-aeson for msgpack instance derived from aeson instances
{-# LANGUAGE FlexibleInstances     #-}
{-# LANGUAGE MultiParamTypeClasses #-}
{-# LANGUAGE OverloadedStrings     #-}

module Servant.MessagePack
  ( MessagePack
  ) where

import           Data.Aeson               (FromJSON, ToJSON)

ptitfred

What's that

This is an attempt to install clever-tools in a Nix environment.

How to use it

nix-env -i -f default.nix

ptitfred

# nix-env -i -f ./stack2nix.nix
let
  inherit (import <nixpkgs> {}) fetchFromGitHub;
  nixpkgs = fetchFromGitHub {
    owner  = "NixOS";
    repo   = "nixpkgs-channels";
    # Last revision of haskell-packages before bump of cabal2nix to 2.11
    # and satisfying hpack >=0.29.6
    rev    = "78e2045f6d747655062ed2ceee595b878e488488";
    sha256 = "0v9i8x5kh6x09ngzbzizn9cbf939vbsbw3wsa81ba57y3c1z3zj7";

ptitfred

#!/bin/bash

function help {
	echo "Usage: wait-for port [timeout]"
	echo "       port is a TCP port number, or the service name (for instance http, ssh)"
	echo "       timeout is expressed in seconds"
	echo "             optional (defaulted to 30)"
	echo "             if <= 0, no timeout"
	exit 1
}

ptitfred

.PHONY: build
build:
        nix build -f ci.nix hmacaroons.components.library

.PHONY: test
test:
        nix build -f ci.nix --out-link result-tests hmacaroons.components.tests
        result-tests/bin/test

.PHONY: doc