[cvs-nhc98] Write traced reductions called from untraced code correctl