diff options
| author | Kaz Kylheku <kaz@kylheku.com> | 2011-12-11 10:30:24 -0800 |
|---|---|---|
| committer | Kaz Kylheku <kaz@kylheku.com> | 2011-12-11 10:30:24 -0800 |
| commit | 819102d2a66dae05f251871d032320167d48b29e (patch) | |
| tree | 6e87748c2f72f12d5739b7036bd0a2174bb66399 | |
| parent | 9b555711794f699f4553a77eadb00dc0074b37fe (diff) | |
| download | txr-819102d2a66dae05f251871d032320167d48b29e.tar.gz txr-819102d2a66dae05f251871d032320167d48b29e.tar.bz2 txr-819102d2a66dae05f251871d032320167d48b29e.zip | |
Whitespace.
| -rw-r--r-- | arith.c | 48 |
1 files changed, 24 insertions, 24 deletions
@@ -290,18 +290,18 @@ val plus(val anum, val bnum) } case TAG_PAIR(TAG_PTR, TAG_NUM): { - val n; - type_check(anum, BGNUM); - n = make_bignum(); - if (sizeof (int_ptr_t) <= sizeof (mp_digit)) { - mp_add_d(mp(anum), c_num(bnum), mp(n)); - } else { - mp_int tmp; - mp_init(&tmp); - mp_set_intptr(&tmp, c_num(bnum)); - mp_add(mp(anum), &tmp, mp(n)); - } - return normalize(n); + val n; + type_check(anum, BGNUM); + n = make_bignum(); + if (sizeof (int_ptr_t) <= sizeof (mp_digit)) { + mp_add_d(mp(anum), c_num(bnum), mp(n)); + } else { + mp_int tmp; + mp_init(&tmp); + mp_set_intptr(&tmp, c_num(bnum)); + mp_add(mp(anum), &tmp, mp(n)); + } + return normalize(n); } case TAG_PAIR(TAG_PTR, TAG_PTR): { @@ -351,18 +351,18 @@ val minus(val anum, val bnum) } case TAG_PAIR(TAG_PTR, TAG_NUM): { - val n; - type_check(anum, BGNUM); - n = make_bignum(); - if (sizeof (int_ptr_t) <= sizeof (mp_digit)) { - mp_sub_d(mp(anum), c_num(bnum), mp(n)); - } else { - mp_int tmp; - mp_init(&tmp); - mp_set_intptr(&tmp, c_num(bnum)); - mp_sub(mp(anum), &tmp, mp(n)); - } - return normalize(n); + val n; + type_check(anum, BGNUM); + n = make_bignum(); + if (sizeof (int_ptr_t) <= sizeof (mp_digit)) { + mp_sub_d(mp(anum), c_num(bnum), mp(n)); + } else { + mp_int tmp; + mp_init(&tmp); + mp_set_intptr(&tmp, c_num(bnum)); + mp_sub(mp(anum), &tmp, mp(n)); + } + return normalize(n); } case TAG_PAIR(TAG_PTR, TAG_PTR): { |