Ignore:
Timestamp:
08/07/03 13:04:13 (18 years ago)
Author:
piso
Message:

JVM-COMPILE

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/j/src/org/armedbear/lisp/rt.lisp

    r3246 r3250  
    22;;;
    33;;; Copyright (C) 2003 Peter Graves
    4 ;;; $Id: rt.lisp,v 1.96 2003-08-06 19:38:59 piso Exp $
     4;;; $Id: rt.lisp,v 1.97 2003-08-07 13:04:13 piso Exp $
    55;;;
    66;;; This program is free software; you can redistribute it and/or
     
    393393    (time (do-tests))))
    394394
     395(when (and (find-package "JVM")
     396           (fboundp 'jvm::jvm-compile))
     397  (mapcar #'jvm::jvm-compile '(sys::list-remove-duplicates*
     398                               sys::vector-remove-duplicates*
     399                               remove-duplicates)))
     400
    395401(load (concatenate 'string rt::*prefix* "char-aux.lsp"))
    396402(load (concatenate 'string rt::*prefix* "cl-symbols-aux.lsp"))
Note: See TracChangeset for help on using the changeset viewer.