Unified · Split
| @@ -415,8 +415,10 @@ BUILTIN("bignum", bignum) · 414 unmodified lines | |||
| 415 | args = sl.sp-1; | 415 | args = sl.sp-1; |
| 416 | }else | 416 | }else |
| 417 | argcount(1); | 417 | argcount(1); |
| 418 | mpint *m; | ||
| 419 | cvalue_bignum_init(sl_bignumtype, args[0], &m); | ||
| 418 | sl_v cv = cvalue(sl_bignumtype, sizeof(mpint*)); | 420 | sl_v cv = cvalue(sl_bignumtype, sizeof(mpint*)); |
| 419 | cvalue_bignum_init(sl_bignumtype, args[0], cvalue_data(cv)); | 421 | *((mpint**)cvalue_data(cv)) = m; |
| 420 | return cv; | 422 | return cv; |
| 421 | } | 423 | } |
| 422 | 424 | ||