/[cmucl]/src/code/pred.lisp
ViewVC logotype

Diff of /src/code/pred.lisp

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.4 by ram, Mon Feb 12 15:09:29 1990 UTC revision 1.5 by ram, Tue May 29 16:54:28 1990 UTC
# Line 41  Line 41 
41  ;;; the following are named structures and need no special type hackery:  ;;; the following are named structures and need no special type hackery:
42  ;;; PATHNAME, STREAM, READTABLE, PACKAGE, HASHTABLE, RANDOM-STATE.  ;;; PATHNAME, STREAM, READTABLE, PACKAGE, HASHTABLE, RANDOM-STATE.
43    
44  (defconstant type-pred-alist  (defparameter type-pred-alist
45    '((keyword . keywordp)    '((keyword . keywordp)
46      (common . commonp)      (common . commonp)
47      (null . null)      (null . null)
# Line 54  Line 54 
54      (string . stringp)      (string . stringp)
55      (sequence . sequencep)      (sequence . sequencep)
56      (simple-array . simple-array-p)      (simple-array . simple-array-p)
57        (c::structure-vector . simple-vector-p)
58      (simple-vector . simple-vector-p)      (simple-vector . simple-vector-p)
59      (simple-string . simple-string-p)      (simple-string . simple-string-p)
60      (simple-bit-vector . simple-bit-vector-p)      (simple-bit-vector . simple-bit-vector-p)

Legend:
Removed from v.1.4  
changed lines
  Added in v.1.5

  ViewVC Help
Powered by ViewVC 1.1.5