bodil

# To install dependencies:
# $ npm install express mongoose connect-mongoose

fs = require "fs"
express = require 'express'
mongoose = require 'mongoose'
sessionStore = require("connect-mongoose")(express)
Schema = mongoose.Schema

mongo_uri = "mongodb://localhost/bodilpwnz"

bodil

(ns lol
  (:use clojure.test))

(def board [nil   :bomb nil   nil
            :bomb nil   nil   nil
            nil   nil   :bomb nil
            :bomb nil   nil   :bomb])

(with-test
    (defn bomb?

bodil

(ns lol
  (:use clojure.test))

(def board [[nil   :mine nil   nil  ]
            [:mine nil   nil   nil  ]
            [nil   nil   :mine nil  ]
            [:mine nil   nil   :mine]])

(defn y [c] (c 0))
(defn x [c] (c 1))

bodil

(ns ohai
  (:use clojure.test))

(def words
  '("foo"
    "rab"
    "rba"))

(with-test
  (defn anagram? [a b]

bodil

(ns addagram.core
  (:use [clojure.test]
        [clojure.java.io :only [reader]]))

(with-test
    (defn sort-largest [l]
      (sort-by #(- (count %)) l))
  (is (= ["blerk" "quux" "foo" "bar"]
         (sort-largest ["foo" "quux" "bar" "blerk"]))))

bodil

;;; Clojure port of http://dysphoria.net/code/hindley-milner/HindleyMilner.scala

(ns hindley-milner
  (:require [clojure.string :as str]))

(declare occurs-in? occurs-in-type?)

(defn map-state
  "Evaluate a list of state monad values in sequence, producing
   a list of the results of each evaluation."

bodil

core.async example thing

To run:

• checkout https://github.com/clojure/core.async and install it using lein install
• make a project directory for this code
• put omgcoreasync.cljs in a src subdirectory, project.clj and index.html in the root
• go lein cljsbuild once to build
• load index.html in a browser and watch it go

bodil

(ns ring.adapter.webbit
  (:require [clojure.string :as s]
            [clojure.java.io :as io])
  (:import [org.webbitserver WebServer WebServers HttpHandler]
           [java.io File InputStream]))

(defn- transform-headers [headers]
  (apply hash-map (mapcat (fn [e] [(s/lower-case (.getKey e))
                                  (.getValue e)]) headers)))

bodil

/**
 * Magic version of Rx.Observable.sync() that allows for adding more
 * Observables to the input feed while processing.
 *
 * Needs a more descriptive name maybe.
 */
function wat<T,U>(initialState: T, initialFeeds: Rx.IObservable<U>[], iterator: (state: T, e: U) => StateChange<T,U>): any {
  var sub = new Rx.BehaviorSubject(initialState);
  var state = initialState;

bodil

///<reference path="dts/tween.js.d.ts" />
///<amd-dependency path="tween" />

import b = require("./bacon");
import graph = require("./graph");
import ev = require("./events");

module TweenEffects {

  var Tween = require("tween.js").Tween;