r3287: *** empty log message ***
[hyperobject.git] / hyperobject.asd
1 ;;;; -*- Mode: Lisp; Syntax: ANSI-Common-Lisp; Base: 10 -*-
2 ;;;; *************************************************************************
3 ;;;; FILE IDENTIFICATION
4 ;;;;
5 ;;;; Name:          hyperobject.asd
6 ;;;; Purpose:       ASDF system definition for hyperobject package
7 ;;;; Programmer:    Kevin M. Rosenberg
8 ;;;; Date Started:  Apr 2000
9 ;;;;
10 ;;;; $Id: hyperobject.asd,v 1.2 2002/11/03 20:10:48 kevin Exp $
11 ;;;;
12 ;;;; This file is Copyright (c) 2000-2002 by Kevin M. Rosenberg
13 ;;;; *************************************************************************
14
15 (in-package :asdf)
16
17 #+(or allegro lispworks cmu sbcl scl)
18 (defsystem :hyperobject
19     :perform (load-op :after (op hyperobject)
20                       (pushnew :hyperobject cl:*features*))
21     :components 
22     ((:file "package")
23      (:file "hyperobject" :depends-on ("package")))
24     :depends-on (:kmrcl))
25
26
27 #+(or allegro lispworks cmu sbcl scl)
28 (when (ignore-errors (find-class 'load-compiled-op))
29   (defmethod perform :after ((op load-compiled-op)
30                              (c (eql (find-system :hyperobject))))
31     (pushnew :hyperobject cl:*features*)))
32