alwayssign        669 src/write.c                               int delimited, int alwayssign, int use_upper)
alwayssign        688 src/write.c        if (alwayssign && SCM_STRING_BODY_START(SCM_STRING_BODY(str))[0] != '-') {