2015-12-16 23:16:17 +00:00
|
|
|
(ns app.www
|
|
|
|
|
(:require [app.nyse :refer [add-order find-orders create-nyse-schema]]
|
|
|
|
|
[mount.core :refer [defstate]]
|
|
|
|
|
[cheshire.core :refer [generate-string]]
|
2015-12-27 22:46:56 +00:00
|
|
|
[compojure.core :refer [routes defroutes GET]]))
|
2015-12-16 23:16:17 +00:00
|
|
|
|
|
|
|
|
(defroutes mount-example-routes
|
|
|
|
|
|
|
|
|
|
(GET "/" [] "welcome to mount sample app!")
|
|
|
|
|
|
2015-12-27 22:39:59 +00:00
|
|
|
(GET "/nyse/orders/:ticker" [ticker]
|
|
|
|
|
(generate-string (find-orders ticker))))
|
2015-12-16 23:16:17 +00:00
|
|
|
|
2015-12-27 22:39:59 +00:00
|
|
|
(defstate nyse-app :start (do (create-nyse-schema)
|
|
|
|
|
(add-order "GOOG" 665.51M 665.59M 100)))
|
