[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Arg checking for *ARRAY



(*ARRAY NIL 'READTABLE 500)
;500 ATOMIC SYMBOL REQUIRED
(*ARRAY NIL 'READTABLE 'AN-ATOMIC-SYMBOL)
;AN-ATOMIC-SYMBOL NOT AN ARRAY
(SETQ OK-LETS-TRY-AN-ARRAY (*ARRAY NIL T 100))
(*ARRAY NIL 'READTABLE OK-LETS-TRY-AN-ARRAY)
;#T-100-70754 NOT READTABLE - *ARRAY

The first error message seems way offbase. Probably the second is, also.
Is a readtable the only allowable third arg? If so, would it be hard for
all of these forms to give the same error message (the NOT READTABLE ...
message)?