[plt-scheme] Industrial strength interpreters with Scheme?

Lately I've been investigating books that use Scheme for implementing
interpreters. As part of this investigation I've been reading comments
on books that fall into this category,  and a common criticism is that
a book "does not demonstrate how to implement \"real world\"
interpreters, but only \"toy interpreters\"".

Said comments of course do not point in the direction of books that do
fulfill this aim, or elaborate on what makes interpreters \"real
world\".

What is your take on this? Are there books on this topic?