| """ Usage: python diff.py FILE1 FILE2 | |
| A primitive `diff` in 50 lines of Python. | |
| Explained here: http://pynash.org/2013/02/26/diff-in-50-lines.html | |
| """ | |
| def longest_matching_slice(a, a0, a1, b, b0, b1): | |
| sa, sb, n = a0, b0, 0 | |
| runs = {} |
| ;; let's create a simple protocol that just returns a number | |
| user> (defprotocol NumberP (number [_])) | |
| NumberP | |
| ;; now we'll create an implementation that always returns '1' | |
| user> (deftype One [] NumberP (number [_] 1)) | |
| user.One | |
| ;; unsurprisingly, this type only has a single static value, which wraps the '1' | |
| > (-> One .getDeclaredFields seq) |
| (ns my.server | |
| (:use org.httpkit.server | |
| [clojure.string :only [split trim lower-case]]) | |
| (:import [org.httpkit.server AsyncChannel])) | |
| (defn origin-match? [origin-re req] | |
| (if-let [req-origin (get-in req [:headers "origin"])] | |
| (re-matches origin-re req-origin))) |
| /* | |
| * A simple libpng example program | |
| * http://zarb.org/~gc/html/libpng.html | |
| * | |
| * Modified by Yoshimasa Niwa to make it much simpler | |
| * and support all defined color_type. | |
| * | |
| * To build, use the next instruction on OS X. | |
| * $ brew install libpng | |
| * $ clang -lz -lpng16 libpng_test.c |
| # Installation | |
| brew install ffmpeg --with-vpx --with-vorbis --with-libvorbis --with-vpx --with-vorbis --with-theora --with-libogg --with-libvorbis --with-gpl --with-version3 --with-nonfree --with-postproc --with-libaacplus --with-libass --with-libcelt --with-libfaac --with-libfdk-aac --with-libfreetype --with-libmp3lame --with-libopencore-amrnb --with-libopencore-amrwb --with-libopenjpeg --with-openssl --with-libopus --with-libschroedinger --with-libspeex --with-libtheora --with-libvo-aacenc --with-libvorbis --with-libvpx --with-libx264 --with-libxvid | |
| # Easy Peasy | |
| ffmpeg -i video.mp4 video.webm |
| # cms - simple CMS | |
| # | |
| # The simple-cms server is a Compojure application serving content for cms.1729.org.uk | |
| description "CMS server" | |
| start on filesystem or runlevel [2345] | |
| stop on runlevel [!2345] | |
| respawn |
A good friend asked me how functions work under the covers, so I wrote up this quick explanation. Corners are cut for brevity, but I hope it will convey the general idea.
The three assembly language programs below implement the following (super simple) recursive function:
Howto build a rust compiler for the Raspberry Pi on Debian 7.1 (wheezy)
sudo apt-get install git build-essential
test `uname -m` = x86_64 && sudo apt-get install ia32-libs
git clone https://github.com/raspberrypi/tools.git
export PATH=$PWD/tools/arm-bcm2708/gcc-linaro-arm-linux-gnueabihf-raspbian/bin:$PATH
git clone http://github.com/mozilla/rust.git
cd rust
./configure --target-triples=arm-unknown-linux-gnueabihf
make
| abstract class Dual(val rank: Int) { | |
| self => | |
| // Cell value accessor | |
| protected def get(r: Int, c: Int): Double | |
| // Memoizing cell value accessor | |
| def apply(r: Int, c: Int): Double = memo.getOrElseUpdate(r - c, self.get(r, c)) | |
| // The memo table |
| (ns saolsen.draw-2d) | |
| ;; Draw stuff (and never care about ie ever) | |
| ;; There's obviously a ton this lib doesn't do, just adding what | |
| ;; I need when I need it. | |
| (def request-animation-frame | |
| (or js/requestAnimationFrame | |
| js/webkitRequestAnimationFrame)) | |
| (defn get-canvas-context-from-id |