Stanton Teters stantont
stantont
/ Evolution of a Python programmer.py
Created
February 3, 2010 21:49
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| #Newbie programmer | |
| def factorial(x): | |
| if x == 0: | |
| return 1 | |
| else: | |
| return x * factorial(x - 1) | |
| print factorial(6) | |
| #First year programmer, studied Pascal |
stantont
/ lein-completion.bash
Created
April 17, 2010 03:35
— forked from timcharper/lein-completion.bash
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| _lein_test() | |
| { | |
| local curw | |
| COMPREPLY=() | |
| curw=${COMP_WORDS[COMP_CWORD]} | |
| if [ -d test ]; then | |
| COMPREPLY=($(compgen -W '$(cd test; find * -name \*.clj | sed "s/.clj\$//" | sed "s/_/-/g" | sed "s|/|.|g")' -- $curw)); | |
| return 0 | |
| fi | |
| } |
stantont
/ lein-completion.bash
Created
April 23, 2010 11:11
— forked from timcharper/lein-completion.bash
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| _lein_test() | |
| { | |
| local curw | |
| COMPREPLY=() | |
| curw=${COMP_WORDS[COMP_CWORD]} | |
| if [ -d test ]; then | |
| COMPREPLY=($(compgen -W '$(cd test; find * -name \*.clj | sed "s/.clj\$//" | sed "s/_/-/g" | sed "s|/|.|g")' -- $curw)); | |
| return 0 | |
| fi | |
| } |
stantont
/ appengine setup for clojure.clj
Created
April 27, 2010 01:42
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| (ns com.freiheit.clojure.appengine.appengine-local | |
| (:use | |
| [compojure.http routes servlet helpers] | |
| clojure.contrib.test-is | |
| compojure.server.jetty | |
| [clojure.contrib def str-utils duck-streams]) | |
| (:require | |
| [clojure.contrib.logging :as log]) | |
| (:import | |
| [com.google.appengine.api.labs.taskqueue.dev LocalTaskQueue] |
stantont
/ appengine setup for clojure
Created
May 5, 2010 02:17
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| (ns com.freiheit.clojure.appengine.appengine-local | |
| (:use | |
| [compojure.http routes servlet helpers] | |
| clojure.contrib.test-is | |
| compojure.server.jetty | |
| [clojure.contrib def str-utils duck-streams]) | |
| (:require | |
| [clojure.contrib.logging :as log]) | |
| (:import | |
| [com.google.appengine.api.labs.taskqueue.dev LocalTaskQueue] |
stantont
/ pless.sh
Created
May 5, 2010 02:51
— forked from defunkt/pless.sh
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| # my new favorite bashrc function | |
| # quickly inspect source files in style | |
| function pless { | |
| pygmentize $1 | less -r | |
| } | |
stantont
/ pless.sh
Created
May 9, 2010 14:25
— forked from defunkt/pless.sh
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| # my new favorite bashrc function | |
| # quickly inspect source files in style | |
| function pless { | |
| pygmentize $1 | less -r | |
| } | |
stantont
/ comma-first-var.js
Created
May 20, 2010 18:29
— forked from isaacs/comma-first-var.js
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| // See comments below. | |
| // This code sample and justification brought to you by | |
| // Isaac Z. Schlueter, aka isaacs | |
| // standard style | |
| var a = "ape", | |
| b = "bat", | |
| c = "cat", | |
| d = "dog", |
stantont
/ gist:414359
Created
May 26, 2010 11:20
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| ; Copyright (c) Jonas Enlund. All rights reserved. | |
| ; The use and distribution terms for this software are covered by the | |
| ; Eclipse Public License 1.0 (http://opensource.org/licenses/eclipse-1.0.php) | |
| ; which can be found in the file epl-v10.html at the root of this distribution. | |
| ; By using this software in any fashion, you are agreeing to be bound by | |
| ; the terms of this license. | |
| ; You must not remove this notice, or any other, from this software. | |
| (set! *warn-on-reflection* true) |
stantont
/ gen_class_javadoc.clj
Created
May 27, 2010 01:41
— forked from na-ka-na/gen_class_javadoc.clj
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| (ns a) | |
| (use '[clojure.contrib.io :only (make-parents spit delete-file)]) | |
| (use '[clojure.contrib.shell :only (sh)]) | |
| (use '[clojure.contrib.str-utils :only (re-split str-join)]) | |
| (defn- convert-fn-meta-into-javadoc | |
| [impl-ns prefix mname pclasses rclass is-static?] | |
| (let [m (meta (resolve (symbol (str (str impl-ns) "/" prefix (str mname))))) | |
| {:keys [file line doc]} m |
OlderNewer