Changeset 10361


Ignore:
Timestamp:
11/05/05 01:30:12 (16 years ago)
Author:
piso
Message:

-(defsetf std-slot-value %set-std-slot-value)
+(defsetf std-slot-value set-std-slot-value)

File:
1 edited

Legend:

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

    r10341 r10361  
    22;;;
    33;;; Copyright (C) 2003-2005 Peter Graves
    4 ;;; $Id: clos.lisp,v 1.193 2005-11-04 00:38:37 piso Exp $
     4;;; $Id: clos.lisp,v 1.194 2005-11-05 01:30:12 piso Exp $
    55;;;
    66;;; This program is free software; you can redistribute it and/or
     
    439439      (slot-value-using-class (class-of object) object slot-name)))
    440440
    441 (defsetf std-slot-value %set-std-slot-value)
     441(defsetf std-slot-value set-std-slot-value)
    442442
    443443(defun %set-slot-value (object slot-name new-value)
Note: See TracChangeset for help on using the changeset viewer.