From 356da72b90d86e8b1cd29782aa986f88241bc6ba Mon Sep 17 00:00:00 2001 From: setrar Date: Mon, 27 Jan 2014 15:49:09 -0500 Subject: [PATCH] Testing in Eclipse --- .settings/ccw.repl.cmdhistory.prefs | 2 +- README.md | 7 +++++++ src/africa_coin/core.clj | 2 ++ 3 files changed, 10 insertions(+), 1 deletion(-) diff --git a/.settings/ccw.repl.cmdhistory.prefs b/.settings/ccw.repl.cmdhistory.prefs index 57d8c83..7a7c39f 100644 --- a/.settings/ccw.repl.cmdhistory.prefs +++ b/.settings/ccw.repl.cmdhistory.prefs @@ -1,2 +1,2 @@ -cmdhistory=["(hello \\"Betty\\")" "(hello \\"Me\\")" "(foo \\"t\\")" "(hello \\"me\\")" "(hello 't')" "(use '(akka-clojure core))\\n\\n(let [a (actor \#(println \\"Received \\" %))]\\n (\! a \\"hello\\"))" "(let [a (actor\\n (with-state [count 0]\\n (fn [msg]\\n (println count)\\n (inc count))))]\\n (\! a \\"hi\\")\\n (\! a \\"hi\\"))" "(defn supervisor [msg]\\n (let [child (actor (fn [msg] (println msg)))]\\n (\! child msg)))\\n\\n(let [s (actor supervisor)]\\n (\! s \\"hello\\"))" "(use '(akka-clojure core))" "actor" "(def url \\"http\://www.quandl.com/api/v1/datasets/BITCOIN/MTGOXUSD.csv?&trim_start\=2010-07-01&trim_end\=2013-07-01&sort_order\=asc\\")\\n(def btc (read-dataset url \:header true))" "(def url \\"http\://www.quandl.com/api/v1/datasets/BITCOIN/MTGOXUSD.csv?&trim_start\=2010-07-01&trim_end\=2013-07-01&sort_order\=asc\\")" "(def btc (read-dataset url \:header true))" "(def url \\"http\://www.quandl.com/api/v1/datasets/BITCOIN/MTGOXUSD.csv?&trim_start\=2010-07-01&trim_end\=2013-07-01&sort_order\=asc\\")" "(def btc (read-dataset url \:header true))" "(def url \\"http\://www.quandl.com/api/v1/datasets/BITCOIN/MTGOXUSD.csv?&trim_start\=2010-07-01&trim_end\=2013-07-01&sort_order\=asc\\")" "(def btc (read-dataset url \:header true))" "(def btc-z (zoo btc \:Date))" "(def btc-r (log-return btc-z \:Close))" "(view btc-r)" "(def url \\"http\://www.quandl.com/api/v1/datasets/BITCOIN/MTGOXUSD.csv?&trim_start\=2010-07-01&trim_end\=2013-07-01&sort_order\=asc\\")" "(def btc (read-dataset url \:header true))" "(def btc-z (zoo btc \:Date))" "(def btc-r (log-return btc-z \:Close))" "(view btc-r)" "(def btc-lr ($ \:Close btc-r))\\n(mean btc-lr) ;; 0.006929153189399101\\n(variance btc-lr) ;; 0.005812258211367765\\n(sd btc-lr) ;; 0.07623816768107537\\n(skewness btc-lr) ;; -0.04491679240743672\\n(kurtosis btc-lr) ;; 392704.64840013976 Looks very wrong" "(use '(akka-clojure core))\\n\\n(let [a (actor \#(println \\"Received \\" %))]\\n (\! a \\"hello\\"))" "(use '(akka-clojure akka))" "(let [a (actor \#(println \\"Received \\" %))]\\n (\! a \\"hello\\"))" "(let [a (actor\\n (with-state [count 0]\\n (fn [msg]\\n (println count)\\n (inc count))))]\\n (\! a \\"hi\\")\\n (\! a \\"hi\\"))" "(let [a (actor \#(println \\"Received \\" %))]\\n (\! a \\"hello\\"))" "(let [a (akka/actor \#(println \\"Received \\" %))]\\n (\! a \\"hello\\"))" "(let [a (akka-clojure.akka/actor \#(println \\"Received \\" %))]\\n (\! a \\"hello\\"))" "(use '(akka-clojure akka-clojure.akka))" "(let [a (actor \#(println \\"Received \\" %))]\\n (\! a \\"hello\\"))" "(let [a (`User/actor \#(println \\"Received \\" %))]\\n (\! a \\"hello\\"))" "(let [a (\:akka/actor \#(println \\"Received \\" %))]\\n (\! a \\"hello\\"))" "(let [a (\:akka/actor \#(println \\"Received \\" %))]\\n (\:akka/\! a \\"hello\\"))" "(let [a (\:akka/actor \#(println \\"Received \\" %))]\\n (\:akka/\! a \\"hello\\"))" "(let [a (Akka/actor \#(println \\"Received \\" %))]\\n (Akka/\! a \\"hello\\"))" "(let [a (\:akka/actor \#(println \\"Received \\" %))]\\n (\:akka/\! a \\"hello\\"))" "(let [a (\:akka/actor \#(println \\"Received \\" %))]\\n (\! a \\"hello\\"))" "(let [a (\:akka/actor \#(println \\"Received \\" %))]\\n (\:akka\! a \\"hello\\"))" "(let [a (actor \#(println \\"Received \\" %))]\\n (\! a \\"hello\\"))" "(let [a (\:akka/actor \#(println \\"Received \\" %))]\\n (\:akka/\! a \\"hello\\"))" "(let [a (\:akka/actor \#(println \\"Received \\" %))]\\n (\:akka\! a \\"hello\\"))" "(view btc-r)" "(let [a (actor \#(println \\"Received \\" %))]\\n (\! a \\"hello\\"))" "(let [a (\:akka/actor \#(println \\"Received \\" %))]\\n (\:akka\! a \\"hello\\"))" "(view btc-r)"] +cmdhistory=["(hello \\"Betty\\")" "(hello \\"Me\\")" "(foo \\"t\\")" "(hello \\"me\\")" "(hello 't')" "(use '(akka-clojure core))\\n\\n(let [a (actor \#(println \\"Received \\" %))]\\n (\! a \\"hello\\"))" "(let [a (actor\\n (with-state [count 0]\\n (fn [msg]\\n (println count)\\n (inc count))))]\\n (\! a \\"hi\\")\\n (\! a \\"hi\\"))" "(defn supervisor [msg]\\n (let [child (actor (fn [msg] (println msg)))]\\n (\! child msg)))\\n\\n(let [s (actor supervisor)]\\n (\! s \\"hello\\"))" "(use '(akka-clojure core))" "actor" "(def url \\"http\://www.quandl.com/api/v1/datasets/BITCOIN/MTGOXUSD.csv?&trim_start\=2010-07-01&trim_end\=2013-07-01&sort_order\=asc\\")\\n(def btc (read-dataset url \:header true))" "(def url \\"http\://www.quandl.com/api/v1/datasets/BITCOIN/MTGOXUSD.csv?&trim_start\=2010-07-01&trim_end\=2013-07-01&sort_order\=asc\\")" "(def btc (read-dataset url \:header true))" "(def url \\"http\://www.quandl.com/api/v1/datasets/BITCOIN/MTGOXUSD.csv?&trim_start\=2010-07-01&trim_end\=2013-07-01&sort_order\=asc\\")" "(def btc (read-dataset url \:header true))" "(def url \\"http\://www.quandl.com/api/v1/datasets/BITCOIN/MTGOXUSD.csv?&trim_start\=2010-07-01&trim_end\=2013-07-01&sort_order\=asc\\")" "(def btc (read-dataset url \:header true))" "(def btc-z (zoo btc \:Date))" "(def btc-r (log-return btc-z \:Close))" "(view btc-r)" "(def url \\"http\://www.quandl.com/api/v1/datasets/BITCOIN/MTGOXUSD.csv?&trim_start\=2010-07-01&trim_end\=2013-07-01&sort_order\=asc\\")" "(def btc (read-dataset url \:header true))" "(def btc-z (zoo btc \:Date))" "(def btc-r (log-return btc-z \:Close))" "(view btc-r)" "(def btc-lr ($ \:Close btc-r))\\n(mean btc-lr) ;; 0.006929153189399101\\n(variance btc-lr) ;; 0.005812258211367765\\n(sd btc-lr) ;; 0.07623816768107537\\n(skewness btc-lr) ;; -0.04491679240743672\\n(kurtosis btc-lr) ;; 392704.64840013976 Looks very wrong" "(use '(akka-clojure core))\\n\\n(let [a (actor \#(println \\"Received \\" %))]\\n (\! a \\"hello\\"))" "(use '(akka-clojure akka))" "(let [a (actor \#(println \\"Received \\" %))]\\n (\! a \\"hello\\"))" "(let [a (actor\\n (with-state [count 0]\\n (fn [msg]\\n (println count)\\n (inc count))))]\\n (\! a \\"hi\\")\\n (\! a \\"hi\\"))" "(let [a (actor \#(println \\"Received \\" %))]\\n (\! a \\"hello\\"))" "(let [a (akka/actor \#(println \\"Received \\" %))]\\n (\! a \\"hello\\"))" "(let [a (akka-clojure.akka/actor \#(println \\"Received \\" %))]\\n (\! a \\"hello\\"))" "(use '(akka-clojure akka-clojure.akka))" "(let [a (actor \#(println \\"Received \\" %))]\\n (\! a \\"hello\\"))" "(let [a (`User/actor \#(println \\"Received \\" %))]\\n (\! a \\"hello\\"))" "(let [a (\:akka/actor \#(println \\"Received \\" %))]\\n (\! a \\"hello\\"))" "(let [a (\:akka/actor \#(println \\"Received \\" %))]\\n (\:akka/\! a \\"hello\\"))" "(let [a (\:akka/actor \#(println \\"Received \\" %))]\\n (\:akka/\! a \\"hello\\"))" "(let [a (Akka/actor \#(println \\"Received \\" %))]\\n (Akka/\! a \\"hello\\"))" "(let [a (\:akka/actor \#(println \\"Received \\" %))]\\n (\:akka/\! a \\"hello\\"))" "(let [a (\:akka/actor \#(println \\"Received \\" %))]\\n (\! a \\"hello\\"))" "(let [a (\:akka/actor \#(println \\"Received \\" %))]\\n (\:akka\! a \\"hello\\"))" "(let [a (actor \#(println \\"Received \\" %))]\\n (\! a \\"hello\\"))" "(let [a (\:akka/actor \#(println \\"Received \\" %))]\\n (\:akka/\! a \\"hello\\"))" "(let [a (\:akka/actor \#(println \\"Received \\" %))]\\n (\:akka\! a \\"hello\\"))" "(view btc-r)" "(let [a (actor \#(println \\"Received \\" %))]\\n (\! a \\"hello\\"))" "(let [a (\:akka/actor \#(println \\"Received \\" %))]\\n (\:akka\! a \\"hello\\"))" "(view btc-r)" "view btc-r" "(view btc-r)"] eclipse.preferences.version=1 diff --git a/README.md b/README.md index f9478da..e47dff4 100644 --- a/README.md +++ b/README.md @@ -9,6 +9,13 @@ A Clojure library designed to provide Exchange Rates. ## Usage +This project uses Eclipse Counterclockwise plugin http://doc.ccw-ide.org/documentation.html +To run the sample, open up core.clj, press [CMD][ALT][S] MacOSX and [CTL][ALT][S] in Windows + +At the REPL Prompt: + +> (let [a (:akka/actor #(println "Received " %))] + (:akka! a "hello")) [Ctrl+Enter] ## License diff --git a/src/africa_coin/core.clj b/src/africa_coin/core.clj index b03c6a2..ab16dc5 100644 --- a/src/africa_coin/core.clj +++ b/src/africa_coin/core.clj @@ -23,3 +23,5 @@ (def btc-z (zoo btc :Date)) (def btc-r (log-return btc-z :Close)) +;; Displays the results in the REPL +view btc-r \ No newline at end of file