* lread.c (read1): Simplify slightly to avoid an overflow warning