c2 1671 src/intlib.c ScmObj c2 = SCM_OBJ(data[4]); c2 1678 src/intlib.c SCM_RETURN(Scm_VMApply3(proc, SCM_CAR(lis), c1, c2)); c2 1690 src/intlib.c ScmObj c2; c2 1699 src/intlib.c c2 = (c2_scm); c2 1707 src/intlib.c data[4] = c2; c2 1709 src/intlib.c SCM_RETURN(Scm_VMApply3(proc, SCM_CAR(lis), c1, c2)); c2 457 src/read.c int c2; c2 460 src/read.c c2 = Scm_GetcUnsafe(port); c2 461 src/read.c switch (c2) { c2 469 src/read.c Scm_ReadError(port, "unsupported #?-syntax: #?%C", c2); c2 480 src/read.c int c2; c2 481 src/read.c c2 = Scm_GetcUnsafe(port); c2 482 src/read.c if (c2 == '"') return read_string(port, TRUE, ctx); c2 483 src/read.c Scm_ReadError(port, "unsupported #*-syntax: #*%C", c2); c2 574 src/read.c int c2 = Scm_GetcUnsafe(port); c2 575 src/read.c if (c2 == closer) { c2 577 src/read.c } else if (c2 == EOF) { c2 579 src/read.c } else if (isspace(c2)) { c2 588 src/read.c Scm_UngetcUnsafe(c2, port); c2 1105 src/read.c ScmChar c1, c2 = SCM_CHAR_INVALID; c2 1114 src/read.c c2 = Scm_GetcUnsafe(port); c2 1115 src/read.c if (c1 == '3' && c2 == '2') tag = "f32"; c2 1116 src/read.c else if (c1 == '6' && c2 == '4') tag = "f64"; c2 1120 src/read.c c2 = Scm_GetcUnsafe(port); c2 1121 src/read.c if (c2 == '6') tag = (ch == 's')? "s16" : "u16"; c2 1124 src/read.c c2 = Scm_GetcUnsafe(port); c2 1125 src/read.c if (c2 == '2') tag = (ch == 's')? "s32" : "u32"; c2 1128 src/read.c c2 = Scm_GetcUnsafe(port); c2 1129 src/read.c if (c2 == '4') tag = (ch == 's')? "s64" : "u64"; c2 1137 src/read.c if (c2 != SCM_CHAR_INVALID) { c2 1138 src/read.c SCM_CHAR_PUT(bufp, c2); c2 1139 src/read.c bufp += SCM_CHAR_NBYTES(c2); c2 2071 src/stdlib.c ScmChar c2; c2 2078 src/stdlib.c c2 = SCM_CHAR_VALUE(c2_scm); c2 2082 src/stdlib.c SCM_RESULT = (c1 == c2); c2 2096 src/stdlib.c ScmChar c2; c2 2103 src/stdlib.c c2 = SCM_CHAR_VALUE(c2_scm); c2 2107 src/stdlib.c SCM_RESULT = (c1 < c2); c2 2121 src/stdlib.c ScmChar c2; c2 2128 src/stdlib.c c2 = SCM_CHAR_VALUE(c2_scm); c2 2132 src/stdlib.c SCM_RESULT = (c1 > c2); c2 2146 src/stdlib.c ScmChar c2; c2 2153 src/stdlib.c c2 = SCM_CHAR_VALUE(c2_scm); c2 2157 src/stdlib.c SCM_RESULT = (c1 <= c2); c2 2171 src/stdlib.c ScmChar c2; c2 2178 src/stdlib.c c2 = SCM_CHAR_VALUE(c2_scm); c2 2182 src/stdlib.c SCM_RESULT = (c1 >= c2); c2 2196 src/stdlib.c ScmChar c2; c2 2203 src/stdlib.c c2 = SCM_CHAR_VALUE(c2_scm); c2 2207 src/stdlib.c SCM_RESULT = (SCM_CHAR_UPCASE(c1) == SCM_CHAR_UPCASE(c2)); c2 2221 src/stdlib.c ScmChar c2; c2 2228 src/stdlib.c c2 = SCM_CHAR_VALUE(c2_scm); c2 2232 src/stdlib.c SCM_RESULT = (SCM_CHAR_UPCASE(c1)<SCM_CHAR_UPCASE(c2)); c2 2246 src/stdlib.c ScmChar c2; c2 2253 src/stdlib.c c2 = SCM_CHAR_VALUE(c2_scm); c2 2257 src/stdlib.c SCM_RESULT = (SCM_CHAR_UPCASE(c1)<=SCM_CHAR_UPCASE(c2)); c2 2271 src/stdlib.c ScmChar c2; c2 2278 src/stdlib.c c2 = SCM_CHAR_VALUE(c2_scm); c2 2282 src/stdlib.c SCM_RESULT = (SCM_CHAR_UPCASE(c1)>SCM_CHAR_UPCASE(c2)); c2 2296 src/stdlib.c ScmChar c2; c2 2303 src/stdlib.c c2 = SCM_CHAR_VALUE(c2_scm); c2 2307 src/stdlib.c SCM_RESULT = (SCM_CHAR_UPCASE(c1)>=SCM_CHAR_UPCASE(c2));