Ignore:
Timestamp:
Jul 8, 2009, 4:47:03 AM (10 years ago)
Author:
rme
Message:

Purge extended-string, simple-extended-string.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/source/level-1/l1-aprims.lisp

    r12300 r12371  
    452452          (setf (%get-unsigned-byte s i) (%scharcode data (+ offset i))))
    453453        s))))
    454 
    455 
    456 (defun extended-string-p (thing)
    457   (declare (ignore thing)))
    458 
    459 (defun simple-extended-string-p (thing)
    460   (declare (ignore thing)))
    461 
    462 
    463454
    464455(defun move-string-bytes (source dest off1 off2 n)
Note: See TracChangeset for help on using the changeset viewer.