Navigation Menu

Skip to content

Instantly share code, notes, and snippets.

@wvl
wvl / ramda.js
Last active August 29, 2015 14:03
Sample of ramda as built by bldr
(function(root,factory) { if (typeof define === "function" && define.amd) { define([], factory); } else { root.ramda = factory(); }})(this, function() {
// src/mkArgStr.js
var ramda = {};
var mkArgStr = ramda.mkArgStr = function(n) {
var arr = [], idx = -1;
while(++idx < n) {
arr[idx] = "arg" + idx;
}
return arr.join(", ");
var fa = require('fa');
function clear_db(client) {
console.log("In clear_db");
client.hkeys("tug", function(err, replies) {
if (err) {
return console.error("error response - " + err);
}
@wvl
wvl / settable-bounding-box.diff
Created November 5, 2012 19:01
Settable bounding box for DragDrop
diff --git a/vendor/js/drag-drop.js b/vendor/js/drag-drop.js
index d0e14de..cb43c11 100644
--- a/vendor/js/drag-drop.js
+++ b/vendor/js/drag-drop.js
@@ -162,8 +162,8 @@
var posX = startX + offsetX;
var posY = startY + offsetY;
// Enforce any bounding box
- if (options.boundingBox) {
- var box = options.boundingBox;
@wvl
wvl / gist:908957
Created April 7, 2011 22:51
synchronous, so make it so -- node primes
var isPrime2 = function(n) {
var root = Math.sqrt(n);
for (var i=3; i<=root; i += 2) {
if (n%i == 0) {
return false;
}
}
return true;
}
@wvl
wvl / source_for.coffee
Created February 10, 2011 00:11
Get a repeatable, readable version of the source of an object
{inspect} = require 'util'
source_for = (obj, level=[]) ->
source = ""
Object.keys(obj).sort().forEach (k) ->
indent = level.join('')
if typeof obj[k] == 'function'
source += indent + k + ": " +Object.getOwnPropertyDescriptor(obj, k).value.toString() + "\n"
else if typeof obj[k] == 'object'
source += indent + k + ":\n" + source_for(obj[k], level.concat(' '))
@wvl
wvl / all.do
Created January 10, 2011 13:05
map reduce with redo: Prakhar
exec >&2
echo -n > diff
redo-ifchange $(find sources -name '*.dat')
for i in $(find sources -name '*.txt');do redo-ifchange ${i}.dat;done
cat diff
grep 'd .*' diff | cut -d ' ' -f 2 | sed -e 's/^/sources\//' | xargs rm
# sh do-reduce <diff
redo-always
@wvl
wvl / default.stamp.do
Created January 10, 2011 12:38
map reduce with redo: apenwarr #2
redo-ifchange $1.data
echo $1.data >>needs-reduce
@wvl
wvl / default.stamp.do
Created January 10, 2011 12:32
map reduce with redo: apenwarr #1
[ -n "$OK_TO_STAMP" ] || exit 99
redo-ifchange $1.data
date # make sure the file is nonempty so redo-targets remembers it
#!/usr/bin/env ruby
def green(message); "\e[32m" + message + "\e[0m"; end
def red(message); "\e[31m" + message + "\e[0m"; end
def yellow(message); "\e[33m" + message + "\e[0m"; end
ARGF.each do |line|
if line =~ /^- /
if line =~ /FAILED/
puts red(line.chop!)