Test for some Scheme code