stuarthalloway

ant test
Buildfile: /Users/stu/tmp/jruby/build.xml

init:

prepare-bin-jruby:

jar:

init:

stuarthalloway

Buildfile: build.xml

init:

prepare-bin-jruby:

jar:

init:

stuarthalloway

(require '[clojure.string :as str])

(def data "Bob,Dobbs,bob@dobbs.com,25.00
Rocket J.,Squirrel,rocky@frostbite.com,0.00
Bullwinkle,Moose,bull@frostbite.com,0.25
Vim,Wibner,vim32@goomail.com,25.00")

(def lines (str/split data #"\n"))

(def registrants (map #(zipmap [:first :last :email :payment]

stuarthalloway

;; lein settings
(defproject foo "1.0.0-SNAPSHOT"
  :description "Test App"
  :dependencies [[com.datomic/datomic "0.1.2678"]
                 [frinj "0.1.2" :exclusions [org.clojure/clojure]]])

;; load libs
(use 'frinj.core 'frinj.calc)
(frinj-init!)
(use '[datomic.api :only (q db) :as d])

stuarthalloway

;; Datomic example code
;;
;; The extent of entity ?x is all datoms that are about ?x.
;; Drop this into your rules.
;;
;; Demonstrates
;;
;; 1. recursive query (extent calls itself)
;; 2. disjunction (different extent bodies are ORed)
;; 3. component attributes (e.g. your arm is a component, your brother isn't)

stuarthalloway

/**
 * Datomic example code
 */

import datomic.Connection;
import datomic.Database;
import datomic.Entity;

import java.util.Collection;
import java.util.Iterator;

stuarthalloway

;; Datomic example code

;; make in memory database
(use '[datomic.api :only (q db) :as d])
(def uri "datomic:mem://matches")
(d/create-database uri)
(def conn (d/connect uri))

;; add the match attribute
(d/transact

stuarthalloway

;; Datomic sample code
;; schema query for attribute types in specified namespaces

(q '[:find ?attr
     :in $ [?include-ns ...]                ;; bind ?include-ns once for each item in collection
     :where
     [?e :db/valueType]                     ;; all schema types (must have a valueType)
     [?e :db/ident ?attr]                   ;; schema type name
     [(datomic.Util/namespace ?attr) ?ns]   ;; namespace of name
     [(= ?ns ?include-ns)]]                 ;; must match one of the ?include-ns 

stuarthalloway

;; Builds of Datomic with revision numbers higher than 0.1.3057 have
;; support for :db.type/fn, :db.type/bytes, and :db/fn.

;; To add these types to a database created using with a pre-0.1.3057
;; build, simply run the database with a newer version of Datomic, and
;; execute the two transactions below.

[{:db/id #db/id [:db.part/db]
  :db/ident :db.type/bytes
  :fressian/tag :bytes

stuarthalloway

;; this code valid as of build 3084

;; in-memory example database
(use '[datomic.api :only (db q) :as d])
(def uri "datomic:mem://test")
(d/create-database uri)
(def conn (d/connect uri))

;; example schema
(d/transact conn [{:db.install/_attribute :db.part/db,