Skip to content

Instantly share code, notes, and snippets.

View radhikalism's full-sized avatar

radhika reddy radhikalism

32 followers · 2 following
  • New Zealand
View GitHub Profile
@radhikalism
radhikalism / breakfast.clj
Created April 25, 2019 03:06
(defmethod menu :breakfast
[_]
["scrambled eggs"
"french toast"
"full english"])
@radhikalism
radhikalism / gist:1605120
Created January 13, 2012 08:46
https://raw.github.com/gist/1605054/1cfcd32a3d31a3cad62111ff6d27e62378e68ef4/gistfile1.txt
https://github.com/mikaelj/snippets/raw/master/lisp/spellcheck/spellcheck.lisp
http://lib.store.yahoo.net/lib/paulgraham/acl2.lisp
http://lib.store.yahoo.net/lib/paulgraham/onlisp.lisp
http://common-lisp.net/gitweb?p=projects/alexandria/alexandria.git;a=blob_plain;f=arrays.lisp;hb=HEAD;js=1
http://common-lisp.net/gitweb?p=projects/alexandria/alexandria.git;a=blob_plain;f=binding.lisp;hb=HEAD;js=1
http://common-lisp.net/gitweb?p=projects/alexandria/alexandria.git;a=blob_plain;f=conditions.lisp;hb=HEAD;js=1
http://common-lisp.net/gitweb?p=projects/alexandria/alexandria.git;a=blob_plain;f=control-flow.lisp;hb=HEAD;js=1
http://common-lisp.net/gitweb?p=projects/alexandria/alexandria.git;a=blob_plain;f=definitions.lisp;hb=HEAD;js=1
http://common-lisp.net/gitweb?p=projects/alexandria/alexandria.git;a=blob_plain;f=features.lisp;hb=HEAD;js=1
@radhikalism
radhikalism / gist:1605054
Created January 13, 2012 08:06
(defun y (func)
((lambda (x) (funcall x x))
(lambda (y)
(funcall func
(lambda (&rest args)
(apply (funcall y y) args))))))
@radhikalism
radhikalism / gist:787351
Created January 20, 2011 03:29
termcapinfo xterm ti@:te@
hardstatus alwayslastline "%{= ky}%?%-Lw%?%{ky}[%{=br bk}%n*%f %t%?(%u)%?%{-b yk}]%?%+Lw%{yk} "
@radhikalism
radhikalism / gist:782689
Created January 17, 2011 10:15
(define-minor-mode teleprompt2-mode
"Teleprompt mode"
nil
" Teleprompt"
`((,(kbd "<prior>") . (lambda () (interactive) (scroll-down 1)))
(,(kbd "<next>") . (lambda () (interactive) (scroll-up 1)))))
(defun teleprompt-roll ()
(interactive)
@radhikalism
radhikalism / basic gitignore
Created February 11, 2010 07:26
*#*#
.*#*
*~
.*~
tmp/
build/
@radhikalism
radhikalism / gist:206521
Created October 10, 2009 01:56
(ns sudoku
(:require [clojure.contrib.seq-utils :as su]))
(defn cross [A B]
(for [a A b B] (str a b)))
(def rows "ABCDEFGHI")
(def cols "123456789")
(def digits "123456789")
@radhikalism
radhikalism / gist:200252
Created October 2, 2009 23:31
(defmulti foo (fn [a & more] a))
(defmethod foo :bar
([a] (println "a 1"))
([a b] (println "a 2")))
(comment
> (foo :bar)
a 1
nil
@radhikalism
radhikalism / gist:182515
Created September 7, 2009 18:55
; cc -m64 -fPIC -o /home/abhishek/Shed/cl-proc/darcs/cl-proc/src/grovel /home/abhishek/Shed/cl-proc/darcs/cl-proc/src/grovel.c
/home/abhishek/Shed/cl-proc/darcs/cl-proc/src/grovel.c: In function ‘main’:
/home/abhishek/Shed/cl-proc/darcs/cl-proc/src/grovel.c:69: warning: cast from pointer to integer of different size
/home/abhishek/Shed/cl-proc/darcs/cl-proc/src/grovel.c:75: warning: cast from pointer to integer of different size
/home/abhishek/Shed/cl-proc/darcs/cl-proc/src/grovel.c:80: warning: cast from pointer to integer of different size
/home/abhishek/Shed/cl-proc/darcs/cl-proc/src/grovel.c:85: warning: cast from pointer to integer of different size
/home/abhishek/Shed/cl-proc/darcs/cl-proc/src/grovel.c:90: warning: cast from pointer to integer of different size
/home/abhishek/Shed/cl-proc/darcs/cl-proc/src/grovel.c:95: warning: cast from pointer to integer of different size
/home/ab
@radhikalism
radhikalism / gist:182490
Created September 7, 2009 18:18
(defn hello-route [request]
((GET "/"
{:status 200
:headers {}
:body "Hello World"}) request))