s1 4505 bignum.c long s1; s1 4514 bignum.c s1 = shift_numdigits; s1 4517 bignum.c z = bignew(xn+s1+1, BIGNUM_SIGN(x)); s1 4519 bignum.c BDIGITS_ZERO(zds, s1); s1 4521 bignum.c zds[xn+s1] = bary_small_lshift(zds+s1, xds, xn, s2); s1 4533 bignum.c s1 = shift_numdigits; s1 4537 bignum.c if (xn <= s1) { s1 4540 bignum.c zn = xn - s1; s1 4543 bignum.c bary_small_rshift(zds, xds+s1, zn, s2, hibitsx != 0 ? BDIGMAX : 0); s1 4586 bignum.c long s1 = shift/BITSPERDIG; s1 4588 bignum.c return big_shift3(x, 1, s1, s2); s1 4594 bignum.c long s1 = shift/BITSPERDIG; s1 4596 bignum.c return big_shift3(x, 0, s1, s2); s1 6610 bignum.c size_t i, s1, s2; s1 6633 bignum.c s1 = shift/BITSPERDIG; s1 6637 bignum.c if (s1 >= BIGNUM_LEN(x)) goto out_of_range; s1 6641 bignum.c return (xds[s1] & bit) ? INT2FIX(1) : INT2FIX(0); s1 6642 bignum.c if (xds[s1] & (bit-1)) s1 6643 bignum.c return (xds[s1] & bit) ? INT2FIX(0) : INT2FIX(1); s1 6644 bignum.c for (i = 0; i < s1; i++) s1 6646 bignum.c return (xds[s1] & bit) ? INT2FIX(0) : INT2FIX(1); s1 6647 bignum.c return (xds[s1] & bit) ? INT2FIX(1) : INT2FIX(0); s1 39 enc/jis/props.h const UChar *str = (const UChar *)s1; s1 117 enc/jis/props.h unsigned char c1 = gperf_downcase[(unsigned char)*s1++]; s1 633 ext/date/date_parse.c VALUE s1, s2; s1 635 ext/date/date_parse.c s1 = rb_reg_nth_match(1, m); s1 644 ext/date/date_parse.c VALUE m = f_match(pat, s1); s1 1722 ext/date/date_parse.c VALUE s1, s2, s3, s4, s5; s1 1726 ext/date/date_parse.c s1 = rb_reg_nth_match(1, m); s1 1760 ext/date/date_parse.c if (!NIL_P(s1) && *RSTRING_PTR(s1) == '-') s1 1780 ext/date/date_parse.c if (!NIL_P(s1) && *RSTRING_PTR(s1) == '-') s1 1786 ext/date/date_parse.c if (!NIL_P(s1) && *RSTRING_PTR(s1) == '-') s1 1794 ext/date/date_parse.c if (!NIL_P(s1) && *RSTRING_PTR(s1) == '-') s1 1824 ext/date/date_parse.c if (!NIL_P(s1) && *RSTRING_PTR(s1) == '-') s1 1839 ext/date/date_parse.c if (!NIL_P(s1) && *RSTRING_PTR(s1) == '-') s1 1895 ext/date/date_parse.c char *s1, *s2, *s3; s1 1901 ext/date/date_parse.c s1 = buf + 1; s1 1910 ext/date/date_parse.c s3 = s1; s1 1913 ext/date/date_parse.c if (isdigit((unsigned char)*s1)) s1 1914 ext/date/date_parse.c *--s1 = '+'; s1 1915 ext/date/date_parse.c set_hash("offset", date_zone_to_diff(rb_str_new2(s1))); s1 383 ext/digest/sha2/sha2.c s1 = W256[(j+14)&0x0f]; \ s1 384 ext/digest/sha2/sha2.c s1 = sigma1_256(s1); \ s1 386 ext/digest/sha2/sha2.c (W256[j&0x0f] += s1 + W256[(j+9)&0x0f] + s0); \ s1 392 ext/digest/sha2/sha2.c sha2_word32 a, b, c, d, e, f, g, h, s0, s1; s1 450 ext/digest/sha2/sha2.c sha2_word32 a, b, c, d, e, f, g, h, s0, s1; s1 494 ext/digest/sha2/sha2.c s1 = W256[(j+14)&0x0f]; s1 495 ext/digest/sha2/sha2.c s1 = sigma1_256(s1); s1 499 ext/digest/sha2/sha2.c (W256[j&0x0f] += s1 + W256[(j+9)&0x0f] + s0); s1 713 ext/digest/sha2/sha2.c s1 = W512[(j+14)&0x0f]; \ s1 714 ext/digest/sha2/sha2.c s1 = sigma1_512(s1); \ s1 716 ext/digest/sha2/sha2.c (W512[j&0x0f] += s1 + W512[(j+9)&0x0f] + s0); \ s1 722 ext/digest/sha2/sha2.c sha2_word64 a, b, c, d, e, f, g, h, s0, s1; s1 777 ext/digest/sha2/sha2.c sha2_word64 a, b, c, d, e, f, g, h, s0, s1; s1 819 ext/digest/sha2/sha2.c s1 = W512[(j+14)&0x0f]; s1 820 ext/digest/sha2/sha2.c s1 = sigma1_512(s1); s1 824 ext/digest/sha2/sha2.c (W512[j&0x0f] += s1 + W512[(j+9)&0x0f] + s0); s1 1951 ext/nkf/nkf-utf8/nkf.c nkf_char s2, s1; s1 1952 ext/nkf/nkf-utf8/nkf.c if (e2s_conv(*p2, *p1, &s2, &s1) == 0) { s1 1953 ext/nkf/nkf-utf8/nkf.c s2e_conv(s2, s1, p2, p1); s1 2143 ext/nkf/nkf-utf8/nkf.c nkf_char s2, s1; s1 2144 ext/nkf/nkf-utf8/nkf.c if (e2s_conv(c2, c1, &s2, &s1) == 0){ s1 2145 ext/nkf/nkf-utf8/nkf.c s2e_conv(s2, s1, &c2, &c1); s1 2167 ext/nkf/nkf-utf8/nkf.c nkf_char s2, s1; s1 2168 ext/nkf/nkf-utf8/nkf.c if (e2s_conv(c2, c1, &s2, &s1) == 0){ s1 2169 ext/nkf/nkf-utf8/nkf.c s2e_conv(s2, s1, &c2, &c1); s1 2687 ext/nkf/nkf-utf8/nkf.c nkf_char s2, s1; s1 2688 ext/nkf/nkf-utf8/nkf.c if (e2s_conv(c2, c1, &s2, &s1) == 0){ s1 2689 ext/nkf/nkf-utf8/nkf.c s2e_conv(s2, s1, &c2, &c1); s1 127 ext/pathname/pathname.c VALUE s1, s2; s1 132 ext/pathname/pathname.c s1 = get_strpath(self); s1 134 ext/pathname/pathname.c p1 = RSTRING_PTR(s1); s1 136 ext/pathname/pathname.c e1 = p1 + RSTRING_LEN(s1); s1 9578 ext/ripper/ripper.c VALUE s1 = 1, s2 = 0, n1 = (yyvsp[-1].val), n2 = (yyvsp[0].val); s1 9580 ext/ripper/ripper.c s1 = RNODE(n1)->nd_cval; s1 9588 ext/ripper/ripper.c if (!s1 && s2) { s1 4311 ext/ripper/ripper.y VALUE s1 = 1, s2 = 0, n1 = $1, n2 = $2; s1 4313 ext/ripper/ripper.y s1 = RNODE(n1)->nd_cval; s1 4321 ext/ripper/ripper.y if (!s1 && s2) { s1 29 ext/sdbm/_sdbm.c #define memcpy(s1,s2,n) bcopy((s2), (s1), (n)) s1 30 ext/sdbm/_sdbm.c #define memcmp(s1,s2,n) bcmp((s1),(s2),(n)) s1 286 ext/socket/socket.c VALUE s1, s2, r; s1 299 ext/socket/socket.c s1 = rsock_init_sock(rb_obj_alloc(klass), sp[0]); s1 301 ext/socket/socket.c r = rb_assoc_new(s1, s2); s1 303 ext/socket/socket.c return rb_ensure(pair_yield, r, io_close, s1); s1 2658 file.c # define syserr_fail2(e, s1, s2) syserr_fail2_in(RUBY_FUNCTION_NAME_STRING, e, s1, s2) s1 2660 file.c # define syserr_fail2_in(func, e, s1, s2) syserr_fail2(e, s1, s2) s1 2662 file.c #define sys_fail2(s1, s2) syserr_fail2(errno, s1, s2) s1 2678 file.c rb_str_append(str, rb_str_ellipsize(s1, max_pathlen)); s1 2898 hash.c #define ENVMATCH(s1, s2) (STRCASECMP((s1), (s2)) == 0) s1 2899 hash.c #define ENVNMATCH(s1, s2, n) (STRNCASECMP((s1), (s2), (n)) == 0) s1 2902 hash.c #define ENVNMATCH(s1, s2, n) (memcmp((s1), (s2), (n)) == 0) s1 2143 include/ruby/ruby.h int st_locale_insensitive_strcasecmp(const char *s1, const char *s2); s1 2144 include/ruby/ruby.h int st_locale_insensitive_strncasecmp(const char *s1, const char *s2, size_t n); s1 2145 include/ruby/ruby.h #define STRCASECMP(s1, s2) (st_locale_insensitive_strcasecmp((s1), (s2))) s1 2146 include/ruby/ruby.h #define STRNCASECMP(s1, s2, n) (st_locale_insensitive_strncasecmp((s1), (s2), (n))) s1 136 include/ruby/st.h PUREFUNC(int st_locale_insensitive_strcasecmp(const char *s1, const char *s2)); s1 137 include/ruby/st.h PUREFUNC(int st_locale_insensitive_strncasecmp(const char *s1, const char *s2, size_t n)); s1 124 missing/crypt.c #define LOADREG(d,d0,d1,s,s0,s1) ((d0) = (s0), (d1) = (s1)) s1 126 missing/crypt.c #define STORE(s,s0,s1,bl) ((bl).b32.i0 = (s0), (bl).b32.i1 = (s1)) s1 9 missing/memcmp.c register unsigned char *a = (unsigned char*)s1; s1 1073 regexec.c if (*s1++ != *s2++) goto fail;\ s1 1078 regexec.c if (string_cmp_ic(encode, case_fold_flag, s1, ps2, len, text_end) == 0) \ s1 1091 regexec.c end1 = s1 + mblen; s1 1092 regexec.c while (s1 < end1) { s1 1093 regexec.c len1 = ONIGENC_MBC_CASE_FOLD(enc, case_fold_flag, &s1, text_end, buf1); s1 1112 regexec.c if (*s1++ != *s2++) {\ s1 1119 regexec.c if (string_cmp_ic(encode, case_fold_flag, s1, ps2, len, text_end) == 0) \ s1 225 regparse.c x = *s2++ - *s1++; s1 1643 st.c c1 = (unsigned char)*s1++; s1 1667 st.c c1 = (unsigned char)*s1++; s1 1717 st.c return (st_index_t)((n>>s1|(n<<s2)) ^ (n>>s2)); s1 1989 util.c const char *s, *s0, *s1; s1 2037 util.c if (!*++s || !(s1 = strchr(hexdigit, *s))) goto ret0; s1 2040 util.c s1 = strchr(hexdigit, *s); s1 2042 util.c if (s1 != NULL) { s1 2044 util.c adj += aadj * ((s1 - hexdigit) & 15); s1 2047 util.c } while (*++s && (s1 = strchr(hexdigit, *s))); s1 2052 util.c if (!*++s || !(s1 = strchr(hexdigit, *s))) goto ret0; s1 2059 util.c for (; *s && (s1 = strchr(hexdigit, *s)); ++s) { s1 2060 util.c adj += aadj * ((s1 - hexdigit) & 15); s1 2112 util.c s1 = localeconv()->decimal_point; s1 2113 util.c if (c == *s1) { s1 2115 util.c if (*++s1) { s1 2118 util.c if (*++s2 != *s1) { s1 2122 util.c if (!*++s1) { s1 2183 util.c s1 = s; s1 2186 util.c if (s - s1 > 8 || L > 19999)