
DEFVAR("*READ-DEFAULT-FLOAT-FORMAT*",sLAread_default_float_formatA,
   LISP,sLsingle_float,"")
DEFVAR("*READ-BASE*",sLAread_baseA,LISP,make_fixnum(10),"")
DEFVAR("*READ-SUPPRESS*",sLAread_suppressA,LISP,Cnil,"")