|
rlm@0
|
1 (ns rlm.quick
|
|
rlm@0
|
2 "quick and dirty convienence script to load EVERYTHING!
|
|
rlm@0
|
3 This is designed to work with clojure 1.2"
|
|
rlm@0
|
4 {:author "Robert McIntyre"}
|
|
rlm@0
|
5 (:require (clojure.core.javadoc))
|
|
rlm@0
|
6
|
|
rlm@0
|
7 )
|
|
rlm@0
|
8
|
|
rlm@0
|
9 (defn whatev [] (println 5))
|
|
rlm@0
|
10
|
|
rlm@0
|
11 (defn dirty []
|
|
rlm@0
|
12
|
|
rlm@0
|
13 (use
|
|
rlm@0
|
14 :reload-all
|
|
rlm@0
|
15
|
|
rlm@0
|
16 '[clojure.java
|
|
rlm@0
|
17 [javadoc :only [javadoc add-local-javadoc]]]
|
|
rlm@0
|
18
|
|
rlm@0
|
19 '[clojure
|
|
rlm@0
|
20 [repl :only [source]]]
|
|
rlm@0
|
21
|
|
rlm@0
|
22 '[rlm
|
|
rlm@0
|
23 [function-utils :only [mix defmix runonce]]
|
|
rlm@0
|
24 [rlm-commands :only [undef ns-nuke reload]]
|
|
rlm@0
|
25 [play-all :only [play-all-music]]
|
|
rlm@0
|
26 [shell-inspect :only [command-line?]]
|
|
rlm@0
|
27 [shell-write :only [sw]]
|
|
rlm@0
|
28 [classpath-utils :only [classpath add-to-classpath]]
|
|
rlm@0
|
29 [dreams :only [megadef defn-decorated silence]]
|
|
rlm@0
|
30 [map-utils :only [map-keys map-vals filter-keys filter-vals]]
|
|
rlm@0
|
31 [decorators :only [preserve-meta]]]
|
|
rlm@0
|
32
|
|
rlm@0
|
33 '[matchure :only [fn-match defn-match if-match when-match cond-match]]
|
|
rlm@0
|
34
|
|
rlm@0
|
35 '[clojure.contrib
|
|
rlm@0
|
36 [combinatorics :only [cartesian-product subsets selections
|
|
rlm@0
|
37 permutations lex-permutations combinations]]
|
|
rlm@0
|
38 [duck-streams :only [file-str]]
|
|
rlm@0
|
39 [str-utils :only [re-split re-gsub str-join]]
|
|
rlm@0
|
40 [seq :only [separate indexed rotations find-first positions]]
|
|
rlm@0
|
41 [math :only [expt round abs gcd lcm floor ceil sqrt]]
|
|
rlm@0
|
42 [repl-utils :only [show expression-info]]
|
|
rlm@0
|
43 [def :only [defvar defmacro-]]])
|
|
rlm@0
|
44 ; (set! clojure.core/*print-length* 20)
|
|
rlm@0
|
45 ; (require 'clojure.java.javadoc)
|
|
rlm@0
|
46 ; (clojure.java.javadoc/add-local-javadoc "/home/r/mobius/temp-clj/javadoc")
|
|
rlm@0
|
47 nil
|
|
rlm@0
|
48 )
|
|
rlm@0
|
49
|
|
rlm@0
|
50 (defn init []
|
|
rlm@0
|
51 (use :reload-all
|
|
rlm@0
|
52 '[clojure
|
|
rlm@0
|
53 core
|
|
rlm@0
|
54 ]))
|
|
rlm@0
|
55
|
|
rlm@0
|
56
|
|
rlm@0
|
57
|
|
rlm@0
|
58
|
|
rlm@0
|
59
|
|
rlm@0
|
60
|
|
rlm@0
|
61
|
