package-test.lisp @ 95d0602ff36b

Begin inlining things

Things seemed a bit slow, so I decided to start poking around the guts of this
thing I've built.  After a couple hours of profiling, poring over disassembly,
tweaking the hottest functions, and inlining things once their bodies were small
enough, I can say it's definitely faster.
author Steve Losh <steve@stevelosh.com>
date Sun, 15 May 2016 00:06:53 +0000
parents 14de0f74d3e2
children e244881864f7
(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
    #:rules
    #:facts
    #:return-one
    #:return-all))

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