1Quickstart🔗 i

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-commentsp)