Changeset 5173


Ignore:
Timestamp:
12/17/03 16:50:23 (17 years ago)
Author:
piso
Message:

STORE-VALUE, USE-VALUE: added &optional condition to argument list.

File:
1 edited

Legend:

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

    r5168 r5173  
    22;;;
    33;;; Copyright (C) 2003 Peter Graves
    4 ;;; $Id: restart.lisp,v 1.5 2003-12-17 00:12:41 piso Exp $
     4;;; $Id: restart.lisp,v 1.6 2003-12-17 16:50:23 piso Exp $
    55;;;
    66;;; This program is free software; you can redistribute it and/or
     
    187187  (invoke-restart 'muffle-warning))
    188188
    189 (defun store-value (value)
     189(defun store-value (value &optional condition)
    190190  (invoke-restart 'store-value value))
    191191
    192 (defun use-value (value)
     192(defun use-value (value &optional condition)
    193193  (invoke-restart 'use-value value))
    194194
Note: See TracChangeset for help on using the changeset viewer.