Skip to content

Instantly share code, notes, and snippets.

@abedra
abedra / gist:9508770
Created March 12, 2014 15:04
keybase.md
### Keybase proof
I hereby claim:
* I am abedra on github.
* I am abedra (https://keybase.io/abedra) on keybase.
* I have a public key whose fingerprint is ED89 9FFC 5FB7 2531 BB30 8D71 0182 350E B06F 006B
To claim this, I am signing this object:
@abedra
abedra / gist:2f676e2b39bc36c61fc1
Last active August 29, 2015 14:09
La mole del Diablo (Chocolate ancho chili porter)
Base:
1.00 lb Light Dry Extract (8.0 SRM) Dry Extract 11.76 %
4.00 lb Dark Liquid Extract [Boil for 15 min] Extract 47.06 %
2.50 lb Pale Malt, Maris Otter (3.0 SRM) Grain 29.41 %
0.50 lb Caramel/Crystal Malt - 60L (60.0 SRM) Grain 5.88 %
0.50 lb Chocolate Malt (350.0 SRM) Grain 5.88 %
Wyeast 1098: British Ale
@abedra
abedra / after_fixes
Last active August 29, 2015 14:15
hiredis blocking scenario
perf stat ./client
Error: Read timed out
Performance counter stats for './client':
0.963859 task-clock (msec) # 0.081 CPUs utilized
3 context-switches # 0.003 M/sec
0 cpu-migrations # 0.000 K/sec
236 page-faults # 0.245 M/sec
<not supported> cycles
This is an incompatibility with the new ruby 1.9 C api. If you take a look at http://github.com/spicycode/rcov you will find a ruby19_compatibility branch that I am starting to address these issues in. It's not complete yet and probably won't be for a few more weeks. There are a lot of changes that need to be made to this in order for it to work properly with ruby 1.9
(defn filenames-in-dir
"Returns pathnames relative to the dir."
[dir]
(map #(.. % getPath (replace dir ""))
(file-seq (java.io.File. dir))))
(defn available-books
(filter #(re-find #"pdf$" %) (filenames-in-dir "public/books")))
(use 'clojure.contrib.find-namespaces
'clojure.test)
(def exit-code (atom 0))
(defn find-tests []
(filter
#(re-find #"-test" (str %)) (find-namespaces-in-dir (java.io.File. "test"))))
(defn require-tests []
From 9f9636c75eb9b53b0bd30bb82b787da4cc753070 Mon Sep 17 00:00:00 2001
From: Aaron Bedra and Jon Distad <pair@thinkrelevance.com>
Date: Thu, 29 Apr 2010 14:56:23 -0400
Subject: [PATCH] exits with 1 when tests have failures or errors
---
src/leiningen/compile.clj | 2 +-
src/leiningen/test.clj | 7 +++++--
2 files changed, 6 insertions(+), 3 deletions(-)
<script type="text/javascript">
// Framebusting
if (top != self ) { top.location.replace(document.location); }
</script>
(defproject zookeeper-test "1.0.0-SNAPSHOT"
:description "FIXME: write"
:dependencies [[org.clojure/clojure "1.2.0"]
[org.apache.hadoop/zookeeper "3.3.1"]]
:dev-dependencies [swank-clojure "1.3.0-SNAPSHOT"])
@abedra
abedra / bowling.clj
Created December 14, 2010 18:38
A quick whack at the bowling kata
(ns bowling.core
(:use clojure.test))
(defn strike? [rolls]
(= 10 (first rolls)))
(defn spare? [rolls]
(= 10 (reduce + (take 2 rolls))))
(defn rolls-to-advance [rolls frame]