1 Quickstart

Here’s a little snippet that uses the API.

(define m (create-mongo))

(define d (make-mongo-db m "awesome-dot-com"))

(current-mongo-db d)

(define-mongo-struct post "posts"

([title #:required]

[body #:required]

[tags #:set-add #:pull]

[comments #:push #:pull]

[views #:inc]))

(define p

(make-post #:title "Welcome to my blog"

#:body "This is my first entry, yay!"))

(set-add-post-tags! p 'awesome)

(inc-post-views! p)

(set-post-comments! p (list "Can't wait!" "Another blog?"))

(post-comments p)