Gauche is a modern, full-featured Scheme that already supports much of R7RS.

Gauche Scheme is an implementation of Gauche Scheme. Other implementations of Gauche Scheme.

Visit the home-page: http://practical-scheme.net/gauche/