lisp/ouat/sample-dot-sbclrc


1
2
3
4
5
6
7
8
9
10

;;; -*- Mode: Lisp -*-

(require :asdf)

(push "/home/john/sources/quackle/qcvs-nov11-2008/lisp/ouat/" 
      asdf:*central-registry*)

(defun ouat ()
  (asdf:operate 'asdf:load-op 'ouat)
  (in-package :ouat))