Changeset 9249


Ignore:
Timestamp:
05/24/05 19:16:51 (16 years ago)
Author:
piso
Message:

Work in progress.

File:
1 edited

Legend:

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

    r9052 r9249  
    22;;;
    33;;; Copyright (C) 2003-2005 Peter Graves
    4 ;;; $Id: rt.lisp,v 1.164 2005-05-04 16:04:54 piso Exp $
     4;;; $Id: rt.lisp,v 1.165 2005-05-24 19:16:51 piso Exp $
    55;;;
    66;;; This program is free software; you can redistribute it and/or
     
    9090   (form (pop p))
    9191   (values p))
     92    (declare (ignore properties))
    9293    (let* ((aborted nil)
    9394           (r (handler-case (multiple-value-list
     
    115116(in-package :cl-user)
    116117
    117 (intern "==>" "CL-USER")
     118(eval-when (:compile-toplevel :load-toplevel :execute)
     119  (intern "==>" "CL-USER"))
    118120
    119121(defvar *compiled-and-loaded-files* nil)
Note: See TracChangeset for help on using the changeset viewer.