Small fix in r7rs.scm