Scheme 48 is the Scheme Underground's implementation of R4RS.