Changeset 3512


Ignore:
Timestamp:
08/25/03 17:59:01 (19 years ago)
Author:
piso
Message:

%SET-FILL-POINTER, %SET-CHAR, %SET-SCHAR => PACKAGE_SYS

File:
1 edited

Legend:

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

    r3483 r3512  
    22;;;
    33;;; Copyright (C) 2003 Peter Graves
    4 ;;; $Id: setf.lisp,v 1.20 2003-08-24 16:43:53 piso Exp $
     4;;; $Id: setf.lisp,v 1.21 2003-08-25 17:59:01 piso Exp $
    55;;;
    66;;; This program is free software; you can redistribute it and/or
     
    210210(defsetf nth sys:%setnth)
    211211(defsetf svref sys::%svset)
    212 (defsetf fill-pointer %set-fill-pointer)
     212(defsetf fill-pointer sys::%set-fill-pointer)
    213213(defsetf fdefinition %set-fdefinition)
    214214(defsetf subseq %set-subseq)
     
    218218(defsetf get %put)
    219219(defsetf gethash puthash)
    220 (defsetf char %set-char)
    221 (defsetf schar %set-schar)
     220(defsetf char sys::%set-char)
     221(defsetf schar sys::%set-schar)
Note: See TracChangeset for help on using the changeset viewer.