admin/mruby-mruby
1
0
Fork 0
mirror of https://github.com/mruby/mruby synced 2026-06-08 16:11:16 +00:00
Code Issues Packages Projects Releases Wiki Activity

mruby-bigint: fixed a bug in string conversion; ref #6444

Browse Source
This commit is contained in:
Yukihiro "Matz" Matsumoto
2024-12-09 13:09:59 +09:00
parent 6d2e7f50e2
commit 9af061a4ce
1 changed files with 4 additions and 10 deletions
Download Patch File Download Diff File Expand all files Collapse all files
mrbgems/mruby-bigint/core/bigint.c
+4 -10
View File
@@ -364,12 +364,6 @@ mpz_sub_int(mrb_state *mrb, mpz_t *x, mrb_int n)
mpz_set_int(mrb, x, n);
return;
}
#if 0
if (x->sn < 0) {
mpz_add_int(mrb, x, n);
return;
}
#endif
// Initialize borrow and start decrement
mp_dbl_limb_signed borrow = (mp_limb)n;
@@ -901,7 +895,7 @@ mpz_get_str(mrb_state *mrb, char *s, mrb_int sz, mrb_int base, mpz_t *x)
mp_limb *t = (mp_limb*)mrb_malloc(mrb, xlen*sizeof(mp_limb));
mp_limb *tend = t + xlen;
memcpy(t, x->p, xlen*sizeof(mp_limb));
mp_limb b2 = base_limit[(base-3)];
mp_limb b2 = base_limit[base-3];
for (;;) {
mp_limb *d = tend;
@@ -914,12 +908,12 @@ mpz_get_str(mrb_state *mrb, char *s, mrb_int sz, mrb_int base, mpz_t *x)
}
// convert to character
while (a > 0) {
mp_limb a0 = (mp_limb)(a % base);
for (mp_limb b=b2/base; b>0; b/=base) {
char a0 = (char)(a % base);
if (a0 < 10) a0 += '0';
else a0 += 'a' - 10;
if (s == se) break;
*s++ = (char)a0;
*s++ = a0;
a /= base;
}