Trailing-Edge
-
PDP-10 Archives
-
clisp
-
clisp/upsala/known-bugs.txt
There are no other files named known-bugs.txt in the archive.
================================================================
File: BOOT
Function: Read-From-String (%Sp-Read-From-String)
Symptom:
(read-from-string "))))") =>
NIL 4
(read-from-string "))))" :ignore-whitespace t) =>
Error in function LISP::%SP-READ-FROM-STRING.
Unexpected EOF on channel #<CHN#26230647>
Cure: Yes please!
================================================================
Symptom:
(simple-vector-p "frotz") => T
(aref "frotz" 2) => #\o
(svref "frotz" 2) => Array index out of bounds: 2
Diagnosis:
Simple-strings are simple-vectors by definition, but are not handled as
such in this implementation.
================================================================
Symptom:
Most package-handling functions (rename-package, in-package etc) don't
parse their package argument very well, which can easily lead to
disasters.
Cure:
More type-checking.
================================================================
File: LAP
Symptom:
Compiling a file with *print-base* non-decimal, and loading it with
*read-base* decimal (or vice versa) fails.
Diagnosis:
Labels are numeric, which makes them depend on *print- and *read-base*.
Cure:
Make them alphabetic, for instance.
================================================================
File: PRED
Symptom:????
TYPEP: the STRING-CHAR and STANDARD-CHAR specifiers require a little more
pre-typechecking before being used. Following is a fix for PRED.CLISP:
REDIT 1(104) COMPARE by user D81.ANDERS-ANDERSSON, 19-Apr-86 06:01:20
File 1: SS:<CLISP>PRED.CLISP.5
File 2: PS:<D81.ANDERS-ANDERSSON.LISP>PRED.CLISP.4
***** CHANGE #2; PAGE 1, LINE 60; PAGE 1, LINE 61
(compiled-function . compiled-function-p)
(character . characterp)
(number . numberp)
(rational . rationalp)
(float . floatp)
(string-char . string-char-p)
(integer . integerp)
(ratio . ratiop)
(short-float . short-floatp)
(standard-char . standard-charp)
(fixnum . fixnump)
---------------------------------
(compiled-function . compiled-function-p)
(character . characterp)
(number . numberp)
(rational . rationalp)
(float . floatp)
(integer . integerp)
(ratio . ratiop)
(short-float . short-floatp)
(fixnum . fixnump)
***** CHANGE #3; PAGE 3, LINE 11; PAGE 3, LINE 11
(let ((type (type-expand type))
temp)
(cond ((symbolp type)
(cond ((eq type 't) t)
((eq type 'nil) nil)
((setq temp (assq type type-pred-alist))
---------------------------------
(let ((type (type-expand type))
temp)
(cond ((symbolp type)
(cond ((eq type 't) t)
((eq type 'nil) nil)
((setq temp (assq type '((string-char . string-char-p)
(standard-char . standard-char-p))))
(and (characterp object) (funcall (cdr temp) object)))
((setq temp (assq type type-pred-alist))
-------
================================================================
Symptom:
Encapsulations can create problems, e.g. when redefining an
encapsulated function and later decapsulating it, the new definition is
zapped.
Cure:
Make DEFUN et al use FSET of the encapsulated definition.