Robert Stuttaford robert-stuttaford

## Editing Clojure with Emacs
Check out README.md to get started editing Clojure with Emacs.

## web-session-tx-fn.clj
(defn start-session!
  []
  ;; put-value! talks to ring's sessions dsl
  (put-value! :session-uuid (db/new-uuid)))

(defn uuid
  []
  ;; get-value talks to ring's sessions dsl
  (get-value :session-uuid))

## with.clj
(def conn (d/conn some-uri))

(def some-id 12345)

(defn get-v [db] (ffirst (d/q '[:find ?v :in $ ?e :where [?e :some/attribute ?v]] db some-id)))

(get-v (d/db conn))
;; => :some-value

(def tx [[:db/retract some-id :some/attribute :some-value]

## 1-notes.md

      
              4 files
            
          
              0 forks
            
          
              0 comments
            
          
              0 stars
            
          
                robert-stuttaford
                / 1-notes.md
            
            
              Last active
              December 17, 2015 08:49
            
          
    Functional programming isn't scary: Notes


These notes accompany a talk I gave on the 15th of May at the Computer Science Dept of UCT.


@RobStuttaford


Slides: https://speakerdeck.com/robertstuttaford/functional-programming-star-isnt-star-scary


About Clojure


## README.md

      
              1 file
            
          
              0 forks
            
          
              0 comments
            
          
              2 stars
            
          
                robert-stuttaford
                / README.md
            
            
              Last active
              December 16, 2015 05:08
            
              
                Cognician's new architecture with Clojure and Datomic: Notes
              
          
    Cognician's new architecture with Clojure and Datomic: Notes


These notes accompany a talk I gave on the 19th of April at ScaleConf 2013.


@RobStuttaford


Slides: https://speakerdeck.com/robertstuttaford/cognicians-new-architecture-with-clojure-and-datomic


General interest
	(defn start-session!
	[]
	;; put-value! talks to ring's sessions dsl
	(put-value! :session-uuid (db/new-uuid)))

	(defn uuid
	[]
	;; get-value talks to ring's sessions dsl
	(get-value :session-uuid))
	(def conn (d/conn some-uri))

	(def some-id 12345)

	(defn get-v [db] (ffirst (d/q '[:find ?v :in $ ?e :where [?e :some/attribute ?v]] db some-id)))

	(get-v (d/db conn))
	;; => :some-value

	(def tx [[:db/retract some-id :some/attribute :some-value]