insns.patch

cfis (Charlie Savage), 03/13/2009 05:23 pm

Download (931 Bytes)

insns.def (working copy)
113 113
()
114 114
(VALUE val)
115 115
{
116
    int i;
116
    unsigned long i;
117 117
    VALUE *dfp2 = GET_DFP();
118 118
    for (i = 0; i < level; i++) {
119 119
	dfp2 = GET_PREV_DFP(dfp2);
......
134 134
(VALUE val)
135 135
()
136 136
{
137
    int i;
137
    unsigned long i;
138 138
    VALUE *dfp2 = GET_DFP();
139 139
    for (i = 0; i < level; i++) {
140 140
	dfp2 = GET_PREV_DFP(dfp2);
......
424 424
(VALUE val) // inc += 1 - cnt;
425 425
{
426 426
    VALUE rb_reg_new_ary(VALUE ary, int options);
427
    int i;
427
    unsigned long i;
428 428
    const VALUE ary = rb_ary_tmp_new(cnt);
429 429
    for (i = 0; i < cnt; i++) {
430 430
        rb_ary_store(ary, cnt-i-1, TOPN(i));
......
652 652
(...)
653 653
(...) // inc += n;
654 654
{
655
    int i;
655
    unsigned long i;
656 656
    VALUE *sp = STACK_ADDR_FROM_TOP(n);
657 657
    for (i = 0; i < n; i++) {
658 658
	GET_SP()[i] = sp[i];