Changeset 31362 in project


Ignore:
Timestamp:
09/10/14 17:02:20 (5 years ago)
Author:
sjamaan
Message:

numbers: Fix small mistake in closure size indication

File:
1 edited

Legend:

Unmodified
Added
Removed
  • release/4/numbers/trunk/numbers-c.c

    r31361 r31362  
    24142414         uy = C_unfix(y),
    24152415         negp, digit_offset, bit_offset,
    2416         ab[C_SIZEOF_FIX_BIGNUM + C_SIZEOF_CLOSURE(6)], *a = ab, k2, size;
     2416        ab[C_SIZEOF_FIX_BIGNUM + C_SIZEOF_CLOSURE(6)], *a = ab, k2, size;
    24172417
    24182418  if (x & C_FIXNUM_BIT) /* Normalisation may happen after negation */
     
    25622562
    25632563  negp = C_mk_bool(C_bignum_negativep(max));
    2564   k2 = C_closure(&ka, 3, (C_word)bignum_random_2, k, C_fix(max_top_digit), C_fix(max_len));
     2564  k2 = C_closure(&ka, 4, (C_word)bignum_random_2, k, C_fix(max_top_digit), C_fix(max_len));
    25652565  C_allocate_bignum(3, (C_word)NULL, k2, size, negp, C_SCHEME_FALSE);
    25662566}
Note: See TracChangeset for help on using the changeset viewer.