SCM_CHAR_UPPER_P  264 src/gauche.h   #define SCM_CHAR_DOWNCASE(ch)   (SCM_CHAR_UPPER_P(ch)?((ch)+('a'-'A')):(ch))
SCM_CHAR_UPPER_P 2387 src/stdlib.c   SCM_RESULT = SCM_CHAR_UPPER_P(c);