joelmccracken

    "requirejs":             "~2.1.8",
    "jquery":                "~1.10.2",
    "backbone":              "~1.1.0",
    "underscore":            "~1.5.2",
    "marionette":            "~1.4.0",
    "handlebars.js":         "~1.0.0",
    "bugsnag":               "~1.0.10",
    "mediaelement":          "~2.13.1",
    "fastclick":             "~0.6.10",
    "cookie.js":             "git://github.com/thinkthroughmath/cookie.js",

joelmccracken

#!/bin/bash
# Script for placing sudoers.d files with syntax-checking

# Making a temporary file to contain the sudoers-changes to be pre-checked
TMP=$(mktemp -t vagrant_sudoers)
cat /etc/sudoers > $TMP
cat >> $TMP <<EOF

# Allow passwordless startup of Vagrant when using NFS.
Cmnd_Alias VAGRANT_EXPORTS_ADD = /usr/bin/su root -c echo '*' >> /etc/exports

joelmccracken

essing a template (An error occurred while processing a template (An error occurred while processing
 a template (An error occurred while processing a template (Maximum call stack size exceeded).).).).
).).).).).).).).).).).).).).).).).).).).).).).).).).).).).).).).).).).).).).).).).).).).).).).).).).
).).).).).).).).).).).).).).).).).).).).).).).).).).).).).).).).).).).).).).).).).).).).).).).).). 
Warning: An error occurred while processing a template (An error occurred while processing a templat
e (An error occurred while processing a template (An error occurred while processing a template (An 
error occurred while processing a template (An error occurred while processing a template (An error 
occurred while processing a template (An error occurred while processing a template (An error occurr
ed while processing a template (An error occurred while processing a template (An error occurred whi
le processing a template (An error occurred while processing a template (An error occurred while pro

joelmccracken

add(0, Y, Y).
add(succ(X), Y, succ(Z)) :- add(X,Y,Z).



mult(0,_,0).
mult(succ(0), Z, Z).
mult(succ(X),Y,Z) :- add(ZZ, Y, Z), mult(X, Y, ZZ).

joelmccracken

git-on-branch () {
    git stash
    ORIGINAL_BRANCH=`git branch | grep \* | sed 's/\*[[:space:]]//'`
    git checkout $1
    $2
    git checkout $ORIGINAL_BRANCH
    git stash pop
}

joelmccracken

:- dynamic foo/1.
['simple-data.prolog'].

save :- tell('simple-data.prolog'), listing, told.

joelmccracken

(defun jnm/single-command-outside-of-term-mode ()
  (interactive)
  (cl-flet ((do-cmd ()
                    (call-interactively (key-binding (read-key-sequence "key sequence: ")))))
    (if (term-in-line-mode)
        (do-cmd)        
      (term-line-mode)
      (do-cmd)
      (term-char-mode))))

joelmccracken

team([]).
team([Pokemon|Team]) :- pokemon(Pokemon), \+ member(Pokemon, Team), team(Team).

joelmccracken

(defun kernel--zip (a b)
  (if (or a b)
      (cons (cons (car a)
                  (car b))
            (kernel--zip (cdr a)
                         (cdr b)))
    nil))

(kernel--zip '(1 2 3) '(4))

joelmccracken

;; -*- lexical-binding: true; -*-

(defun kernel--make-vau (params env body-exprs)
  (list '%Vau params env body-exprs))

(defun kernel--vau-params (vau) (nth 1 vau))
(defun kernel--vau-env (vau) (nth 2 vau))
(defun kernel--vau-body (vau) (nth 3 vau))

(defun kernel--type (thing)