gnarmis

#ruby1.9.3

def defn name, &b
  Object.send :define_method, name, &b
end

# this also works (surprisingly), albeit with a warning
# def defn name
#   Object.send(:define_method, name)
# end

paulmillr

# Algorithm W (Damas-Hindley-Milner) in LiveScript.
# By Paul Miller (paulmillr.com), Public domain.
#
# Based on Robert Smallshire's [Python code](http://bit.ly/bbVmmX).
# Which is based on Andrew's [Scala code](http://bit.ly/aztXwD).
# Which is based on Nikita Borisov's [Perl code](http://bit.ly/myq3uA).
# Which is based on Luca Cardelli's [Modula-2 code](http://bit.ly/Hjpvb).
# Something like that.

prelude = require './prelude'

hermansc

set softtabstop=2
set shiftwidth=2
set tabstop=2
set expandtab "expandtab (whitespace)
set number "line numbers
set ai "autoindent
set si "smartindent
set tw=79 "wrap on 79
set sta "smarttab
set history=100 "remember more than 20 cmd-history

sethvincent

source :rubygems

gem 'foreman'
gem 'oa-oauth'
gem 'dm-core'
gem 'dm-sqlite-adapter'
gem 'dm-migrations'
gem 'rack', "~> 1.3.6"
gem 'sinatra'
gem 'thin'

elidickinson

from ctypes import *
from ctypeslib.contrib.pythonhdr import *

def quick_summary(data,words=150):
    ots = OTS()
    ots.parse_string(data)
    return ots.summarize_by_words(words)

class OTS:
    libots = None

ctataryn

(ns my.ns
      (:use [korma.db])
      (:use [korma.core])
      (:require [clojure.java.jdbc :as sql]))

(def dbspec  {:classname   "org.h2.Driver" 
             :subprotocol "h2" 
             :subname "~/db/myapp"
             :user     "sa"
             :password ""})

evnm

# Legitimately-useful utilities missing from OS X.
brew install wget watch gnu-sed coreutils

# Up-to-date versions of included tools.
brew install git emacs

# Just for fun.
brew install fortune cowsay

ibdknox

(require '[noir.server :as server])
(use 'noir.core 'aleph.http 'lamina.core)

(defn async-response [response-channel request]
  (enqueue response-channel
    {:status 200
     :headers {"content-type" "text/plain"}
     :body "async response"}))

(defpage "/" [] "hey from Noir!")

lucasfais

Sublime Text 2 – Useful Shortcuts (Mac OS X)

General

⌘T	go to file
⌘⌃P	go to project
⌘R	go to methods
⌃G	go to line
⌘KB	toggle side bar
⌘⇧P	command prompt

swannodette

/*
(ns play.a
  (:require-macros [match.core :as m]))

(defn balanced? [x]
  (m/match [x]
    [([:black [:red [:red _ _ _] _ _] _ _] |
      [:black [:red _ _ [:red _ _ _]] _ _] |
      [:black _ _ [:red [:red _ _ _] _ _]])] true
    :else false))