Skip to content

Instantly share code, notes, and snippets.

module James
open System
let strToInt str =
try
Some (Int32.Parse(str))
with
| _ -> None
module james
let rec fib = function
| 0 -> 0
| 1 -> 1
| n -> fib(n - 1) + fib(n - 2)
type Thing =
| Something = 1

Keybase proof

I hereby claim:

  • I am jbrechtel on github.
  • I am eightball (https://keybase.io/eightball) on keybase.
  • I have a public key whose fingerprint is 1535 B447 793A DC4B EE01 66D2 803B CB2D EF34 8B88

To claim this, I am signing this object:

Bringing machine 'default' up with 'virtualbox' provider...
[default] Setting the name of the VM...
[default] Clearing any previously set forwarded ports...
[default] Creating shared folders metadata...
[default] Clearing any previously set network interfaces...
[default] Preparing network interfaces based on configuration...
[default] Forwarding ports...
[default] -- 22 => 2222 (adapter 1)
[default] Booting VM...
[default] Waiting for VM to boot. This can take a few minutes.
@jbrechtel
jbrechtel / README.md
Created November 23, 2013 21:23
Generate and search for available twitter usernames

What?

This helps you search for available twitter usernames.

Why?

I really want a twitter username that matches my nickname instead of my realname. Most of the good formulations of my nickname are taken so I wanted to find something with an _ or 1 placed in a non-annoying spot. There are a lot of permutations so I decided to generate them and then search automatically.

Using

@jbrechtel
jbrechtel / run_me_before_compiling_ruby.txt
Created September 6, 2013 15:01
Before building Ruby....don't forget about readline zlib and ssl!
apt-get -y install build-essential libssl-dev libreadline-dev zlib1g-dev
@jbrechtel
jbrechtel / hack.sh
Last active December 20, 2015 14:39 — forked from erikh/hack.sh
#!/usr/bin/env sh
##
# This is script with usefull tips taken from:
# https://github.com/mathiasbynens/dotfiles/blob/master/.osx
#
# install it:
# curl -sL https://raw.github.com/gist/6148219/hack.sh | sh
#
(ns middler-clojure.core
(:use org.httpkit.server)
(:use clojure.walk)
(:require [org.httpkit.client :as http])
(:gen-class))
(defn app [req]
(println req)
(let [uri (:uri req)]
(println (class uri))
require 'rubygems'
require 'csv'
require 'json'
require 'pp'
data = CSV.parse(File.read(ARGV[0]))
cols = data.shift
hashes = data.map { |v| cols.zip(v) }.map { |a| Hash[*a.flatten] }
puts 'var e = '+hashes.to_json
import org.specs2._
import execute.AsResult
import mutable.Around
/* this scope is incidentally lazy since the singleton never gets constructed if code that uses it isn't executed */
object databaseScope extends Around {
def setupDB { println("#####################\nBUILDING DATABASE\n#####################") }
setupDB
def around[T: AsResult](t: => T) = AsResult(t)