anchor.diff:  (defpackage "LISA.REFLECT"
     (:use "COMMON-LISP")
     (:nicknames "REFLECT")
  -  #+(or Allegro CMUCL)
  +  #+(or Allegro CMU)
     (:import-from "CLOS"
                   "CLASS-SLOTS"
                   "SLOT-DEFINITION-NAME"
  
positive.code: ;;; File: pkgdecl.lisp
  ;;; Description: Package declarations for LISA.
  
  ;;; $Id: pkgdecl.lisp,v 1.14 2001/04/17 19:10:19 youngde Exp $
  
  (in-package "CL-USER")
  
  (defpackage "LISA"
    (:use "COMMON-LISP")
  
negative.code:   (:import-from "CLOS"
                  clos::class-slots
                  clos::slot-definition-name)
    #-(or Allegro CMU Lispworks CLISP)
    (error "Unsupported implementation.")
    (:export "CLASS-SLOTS"
             "SLOT-DEFINITION-NAME"
             "FINALIZE-INHERITANCE"
             "CLASS-FINALIZED-P"))
  