I've just published an update to the implementation of SRFI 146. Here are Marc's comments on his update:
Please just update the sample implementation (some invariants of rb-trees weren't preserved by the former code). The spec didn't change so there's no need for a new draft.