Hum, I did my implementation based on haskell's one. Scheme seems to do the same thing when there's only one element (http://repl.it/KGX)