Changeset 3870

Timestamp:

09/18/03 23:39:57 (20 years ago)

Author:

piso

Message:

Minor cleanup.

File:

• trunk/j/src/org/armedbear/lisp/rt.lisp (modified) (2 diffs)

trunk/j/src/org/armedbear/lisp/rt.lisp

@@ -2 +2 @@
 ;;;
 ;;; Copyright (C) 2003 Peter Graves
-;;; $Id: rt.lisp,v 1.131 2003-09-18 19:06:36 piso Exp $
+;;; $Id: rt.lisp,v 1.132 2003-09-18 23:39:57 piso Exp $
 ;;;
 ;;; This program is free software; you can redistribute it and/or
@@ -507 +507 @@
 
 #+armedbear
-(when (and (find-package "JVM")
-           (fboundp 'jvm::jvm-compile))
+(when (fboundp 'jvm::jvm-compile)
   (mapcar #'jvm::jvm-compile '(rt::equalp-with-case
                                cl-test::make-scaffold-copy