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

Diff of /src/code/interr.lisp

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

revision 1.39 by pmai, Wed Aug 28 13:29:26 2002 UTC revision 1.39.2.1 by pmai, Fri Oct 4 23:13:25 2002 UTC
# Line 128  Line 128 
128           :datum object           :datum object
129           :expected-type 'simple-string))           :expected-type 'simple-string))
130    
131    #+unicode
132    (deferr object-not-simple-base-string-error (object)
133      (error 'type-error
134             :function-name name
135             :datum object
136             :expected-type 'simple-base-string))
137    
138    #+unicode
139    (deferr object-not-simple-character-string-error (object)
140      (error 'type-error
141             :function-name name
142             :datum object
143             :expected-type 'simple-character-string))
144    
145    #+unicode
146    (deferr object-not-base-string-error (object)
147      (error 'type-error
148             :function-name name
149             :datum object
150             :expected-type 'base-string))
151    
152  (deferr object-not-simple-bit-vector-error (object)  (deferr object-not-simple-bit-vector-error (object)
153    (error 'type-error    (error 'type-error
154           :function-name name           :function-name name

Legend:
Removed from v.1.39  
changed lines
  Added in v.1.39.2.1

  ViewVC Help
Powered by ViewVC 1.1.5