package-test.lisp @ de6e248866f4

Implement dynamic calling and fix `bind!`

It turns out `bind!` needs to actually *copy* the thing it's binding into the
target, not create a reference.

Dynamic calling was actually pretty easy.
author Steve Losh <steve@stevelosh.com>
date Wed, 29 Jun 2016 16:42:02 +0000
parents 809f43baf982
children 970e21fa14b0
(defpackage #:bones-test
  (:use
    #:cl
    #:5am
    #:bones))

(defpackage #:bones-test.paip
  (:use
    #:cl
    #:5am
    #:bones.quickutils
    #:bones.paip)
  ; kill me
  (:shadowing-import-from #:5am
    #:fail))

(defpackage #:bones-test.wam
  (:use
    #:cl
    #:5am
    #:bones.quickutils
    #:bones.wam)
  (:import-from #:bones.wam
    #:with-database
    #:make-database
    #:with-fresh-database
    #:rule
    #:rules
    #:fact
    #:facts
    #:call
    #:return-one
    #:return-all)
  (:shadowing-import-from #:bones.wam
    #:!))

(defpackage #:bones-test.circle
  (:use :cl :5am :bones.circle))