* numbers.c (s_scm_integer_expt): (expt 0 1) should be 1.