Negative number highlighting with Scheme