Skip to content

Instantly share code, notes, and snippets.

View noprompt's full-sized avatar
💭
The choice to have discipline is a programmer's worst enemy.

Joel Holdbrooks noprompt

💭
The choice to have discipline is a programmer's worst enemy.
View GitHub Profile
@MicahElliott
MicahElliott / colortrans.py
Created November 29, 2010 07:57
Convert values between RGB hex codes and xterm-256 color codes.
#! /usr/bin/env python
""" Convert values between RGB hex codes and xterm-256 color codes.
Nice long listing of all 256 colors and their codes. Useful for
developing console color themes, or even script output schemes.
Resources:
* http://en.wikipedia.org/wiki/8-bit_color
* http://en.wikipedia.org/wiki/ANSI_escape_code
@revolunet
revolunet / lzw_encoder.js
Created February 25, 2011 14:55
LZW javascript compress/decompress
// LZW-compress a string
function lzw_encode(s) {
var dict = {};
var data = (s + "").split("");
var out = [];
var currChar;
var phrase = data[0];
var code = 256;
for (var i=1; i<data.length; i++) {
currChar=data[i];
@lynaghk
lynaghk / 0-update.md
Last active July 5, 2022 13:33
Angular.js from ClojureScript
@noprompt
noprompt / closure_docset.rb
Created October 2, 2013 23:18
Google Closure docset for Dash (Ruby script).
DOC_PATH = "./Closure.docset/Contents/Resources/Documents"
DB_PATH = "./Closure.docset/Contents/Resources/docSet.dsidx"
CLOSURE_GIT_URL = "https://code.google.com/p/closure-library.docs/"
ICON_URL = "http://docs.closure-library.googlecode.com/git/static/images/16px.png"
# Setup
puts "Setting up..."
system("mkdir -p #{DOC_PATH}")
puts "Downloading documentation..."
(ns react-cljs.core
(:require React))
(declare render)
(defn handle-change [e]
(render {:text (.. e -target -value)}))
(defn render [{:keys [text]}]
(React/renderComponent
def get_request():
"""
blindly walks up the stack looking for
request.user
"""
for i in itertools.count():
try:
frame = sys._getframe(i)
except ValueError:
frame = None
@bitemyapp
bitemyapp / gist:8739525
Last active May 7, 2021 23:22
Learning Haskell
(defun g-blame ()
"Which commits last affected this line?"
(interactive)
(shell-command
(format "git show $(git blame '%s' -L %s,%s | awk '{print $1}')"
(buffer-file-name)
(line-number-at-pos)
(line-number-at-pos))))
(defun g-churn ()
@jozefg
jozefg / closconv.lhs
Last active May 5, 2024 19:23
Tutorial on Closure Conversion and Lambda Lifting
This is my short-ish tutorial on how to implement closures in
a simple functional language: Foo.
First, some boilerplate.
> {-# LANGUAGE DeriveFunctor, TypeFamilies #-}
> import Control.Applicative
> import Control.Monad.Gen
> import Control.Monad.Writer
> import Data.Functor.Foldable