ghoseb

(defn tests []
     [{:name 'suiteA
       :total 3
       :tests [{:name 'testA}
               {:name 'testB}
               {:name 'testC}]}
      {:name 'suiteB
       :total 3
       :tests [{:name 'testD}
               {:name 'testE}

ghoseb

(defn tests []
     [{:name 'suiteA
       :total 3
       :passed (promise)
       :failed (promise)
       :success (promise)
       :tests [{:name 'testA :success (promise)}
               {:name 'testB :success (promise)}
               {:name 'testC :success (promise)}]}
      {:name 'suiteB

ghoseb

# log4j.properties

log4j.rootLogger = DEBUG, standard

log4j.appender.standard = org.apache.log4j.RollingFileAppender
log4j.appender.standard.File = logs/project.log
log4j.appender.standard.MaxFileSize=1MB
log4j.appender.standard.MaxBackupIndex=1

log4j.appender.standard.layout = org.apache.log4j.PatternLayout

ghoseb

(ns redis-memo
  (:require redis)
  (:import (java.net URLEncoder)))

;; --------------------------------------------------------------------------------
;; Default connection params
;; --------------------------------------------------------------------------------

(def memo-server {:host "localhost" :port 6379 :db 14})

ghoseb

;;; ghoseb.el -- My customisations in addition to ESK
;;; Author: Baishampayan Ghose <b.ghose@gmail.com>
;;; Time-stamp: "2009-08-01 01:44:30 ghoseb"

(require 'cl)

;;; ----------------------
;;; General customisations
;;; ----------------------
(set-scroll-bar-mode 'nil)

ghoseb

; Church Numerals in Clojure
;
; Church numerals use anonymous functions to represent numbers.
;
; ((zero f) x) -- returns x
; ((one f)  x) -- return (f x)
; ((two f)  x) -- return (f (f x))
; ...

(def zero (fn [f] (fn [x] x)))

ghoseb

#Newbie programmer
def factorial(x):
    if x == 0:
        return 1
    else:
        return x * factorial(x - 1)
print factorial(6)


#First year programmer, studied Pascal