mirror of
https://github.com/Z3Prover/z3
synced 2025-04-22 16:45:31 +00:00
Nikolaj's changes in rationals
Signed-off-by: Lev Nachmanson <levnach@hotmail.com>
This commit is contained in:
parent
c2f3428373
commit
40a363d249
2 changed files with 29 additions and 24 deletions
|
@ -237,7 +237,7 @@ void mpz_manager<SYNCH>::set_big_i64(mpz & c, int64_t v) {
|
|||
c.m_ptr = allocate(m_init_cell_capacity);
|
||||
c.m_owner = mpz_self;
|
||||
}
|
||||
c.m_kind = mpz_ptr_k;
|
||||
c.m_kind = mpz_ptr;
|
||||
SASSERT(capacity(c) >= m_init_cell_capacity);
|
||||
uint64_t _v;
|
||||
if (v < 0) {
|
||||
|
@ -293,7 +293,7 @@ void mpz_manager<SYNCH>::set_big_ui64(mpz & c, uint64_t v) {
|
|||
c.m_ptr = allocate(m_init_cell_capacity);
|
||||
c.m_owner = mpz_self;
|
||||
}
|
||||
c.m_kind = mpz_ptr_k;
|
||||
c.m_kind = mpz_ptr;
|
||||
SASSERT(capacity(c) >= m_init_cell_capacity);
|
||||
c.m_val = 1;
|
||||
if (sizeof(digit_t) == sizeof(uint64_t)) {
|
||||
|
@ -368,7 +368,7 @@ void mpz_manager<SYNCH>::set(mpz_cell& src, mpz & a, int sign, unsigned sz) {
|
|||
set_digits(a, i, src.m_digits);
|
||||
a.m_val = sign;
|
||||
|
||||
SASSERT(a.m_kind == mpz_ptr_k);
|
||||
SASSERT(a.m_kind == mpz_ptr);
|
||||
}
|
||||
#endif
|
||||
|
||||
|
@ -413,7 +413,7 @@ void mpz_manager<SYNCH>::set_digits(mpz & target, unsigned sz, digit_t const * d
|
|||
target.m_ptr = allocate(c);
|
||||
target.m_ptr->m_size = sz;
|
||||
target.m_ptr->m_capacity = c;
|
||||
target.m_kind = mpz_ptr_k;
|
||||
target.m_kind = mpz_ptr;
|
||||
target.m_owner = mpz_self;
|
||||
memcpy(target.m_ptr->m_digits, digits, sizeof(digit_t) * sz);
|
||||
}
|
||||
|
@ -426,14 +426,14 @@ void mpz_manager<SYNCH>::set_digits(mpz & target, unsigned sz, digit_t const * d
|
|||
deallocate(target);
|
||||
target.m_val = 1;
|
||||
target.m_ptr = ptr;
|
||||
target.m_kind = mpz_ptr_k;
|
||||
target.m_kind = mpz_ptr;
|
||||
target.m_owner = mpz_self;
|
||||
}
|
||||
else {
|
||||
target.m_ptr->m_size = sz;
|
||||
if (target.m_ptr->m_digits != digits)
|
||||
memcpy(target.m_ptr->m_digits, digits, sizeof(digit_t) * sz);
|
||||
target.m_kind = mpz_ptr_k;
|
||||
target.m_kind = mpz_ptr;
|
||||
}
|
||||
#else
|
||||
mk_big(target);
|
||||
|
@ -1453,7 +1453,7 @@ void mpz_manager<SYNCH>::big_set(mpz & target, mpz const & source) {
|
|||
target.m_ptr = allocate(capacity(source));
|
||||
target.m_ptr->m_size = size(source);
|
||||
target.m_ptr->m_capacity = capacity(source);
|
||||
target.m_kind = mpz_ptr_k;
|
||||
target.m_kind = mpz_ptr;
|
||||
target.m_owner = mpz_self;
|
||||
memcpy(target.m_ptr->m_digits, source.m_ptr->m_digits, sizeof(digit_t) * size(source));
|
||||
}
|
||||
|
@ -1462,14 +1462,14 @@ void mpz_manager<SYNCH>::big_set(mpz & target, mpz const & source) {
|
|||
target.m_ptr = allocate(capacity(source));
|
||||
target.m_ptr->m_size = size(source);
|
||||
target.m_ptr->m_capacity = capacity(source);
|
||||
target.m_kind = mpz_ptr_k;
|
||||
target.m_kind = mpz_ptr;
|
||||
target.m_owner = mpz_self;
|
||||
memcpy(target.m_ptr->m_digits, source.m_ptr->m_digits, sizeof(digit_t) * size(source));
|
||||
}
|
||||
else {
|
||||
target.m_ptr->m_size = size(source);
|
||||
memcpy(target.m_ptr->m_digits, source.m_ptr->m_digits, sizeof(digit_t) * size(source));
|
||||
target.m_kind = mpz_ptr_k;
|
||||
target.m_kind = mpz_ptr;
|
||||
}
|
||||
#else
|
||||
// GMP version
|
||||
|
@ -1736,7 +1736,7 @@ void mpz_manager<SYNCH>::power(mpz const & a, unsigned p, mpz & b) {
|
|||
b.m_ptr->m_digits[i] = 0;
|
||||
b.m_ptr->m_digits[sz-1] = 1 << shift;
|
||||
b.m_val = 1;
|
||||
b.m_kind = mpz_ptr_k;
|
||||
b.m_kind = mpz_ptr;
|
||||
}
|
||||
return;
|
||||
}
|
||||
|
@ -1819,25 +1819,26 @@ void mpz_manager<SYNCH>::ensure_capacity(mpz & a, unsigned capacity) {
|
|||
return;
|
||||
if (capacity < m_init_cell_capacity)
|
||||
capacity = m_init_cell_capacity;
|
||||
if (a.m_ptr == nullptr) {
|
||||
a.m_ptr = allocate(capacity);
|
||||
a.m_owner = mpz_self;
|
||||
a.m_kind = mpz_ptr_k;
|
||||
SASSERT(a.m_ptr->m_capacity == capacity);
|
||||
if (a.m_val == INT_MIN) {
|
||||
|
||||
if (is_small(a)) {
|
||||
int val = a.m_val;
|
||||
allocate_if_needed(a, capacity);
|
||||
a.m_kind = mpz_ptr;
|
||||
SASSERT(a.m_ptr->m_capacity >= capacity);
|
||||
if (val == INT_MIN) {
|
||||
unsigned intmin_sz = m_int_min.m_ptr->m_size;
|
||||
for (unsigned i = 0; i < intmin_sz; i++)
|
||||
a.m_ptr->m_digits[i] = m_int_min.m_ptr->m_digits[i];
|
||||
a.m_val = -1;
|
||||
a.m_ptr->m_size = m_int_min.m_ptr->m_size;
|
||||
}
|
||||
else if (a.m_val < 0) {
|
||||
a.m_ptr->m_digits[0] = -a.m_val;
|
||||
else if (val < 0) {
|
||||
a.m_ptr->m_digits[0] = -val;
|
||||
a.m_val = -1;
|
||||
a.m_ptr->m_size = 1;
|
||||
}
|
||||
else {
|
||||
a.m_ptr->m_digits[0] = a.m_val;
|
||||
a.m_ptr->m_digits[0] = val;
|
||||
a.m_val = 1;
|
||||
a.m_ptr->m_size = 1;
|
||||
}
|
||||
|
@ -1852,7 +1853,7 @@ void mpz_manager<SYNCH>::ensure_capacity(mpz & a, unsigned capacity) {
|
|||
deallocate(a);
|
||||
a.m_ptr = new_cell;
|
||||
a.m_owner = mpz_self;
|
||||
a.m_kind = mpz_ptr_k;
|
||||
a.m_kind = mpz_ptr;
|
||||
}
|
||||
}
|
||||
|
||||
|
@ -1969,8 +1970,9 @@ void mpz_manager<SYNCH>::mul2k(mpz & a, unsigned k) {
|
|||
unsigned new_sz = old_sz + word_shift + 1;
|
||||
ensure_capacity(a, new_sz);
|
||||
TRACE("mpz_mul2k", tout << "word_shift: " << word_shift << "\nbit_shift: " << bit_shift << "\nold_sz: " << old_sz << "\nnew_sz: " << new_sz
|
||||
<< "\na after ensure capacity:\n" << to_string(a) << "\n";);
|
||||
SASSERT(a.m_ptr != nullptr);
|
||||
<< "\na after ensure capacity:\n" << to_string(a) << "\n";
|
||||
tout << a.m_kind << "\n";);
|
||||
SASSERT(!is_small(a));
|
||||
mpz_cell * cell_a = a.m_ptr;
|
||||
old_sz = cell_a->m_size;
|
||||
digit_t * ds = cell_a->m_digits;
|
||||
|
|
|
@ -79,7 +79,7 @@ class mpz_cell {
|
|||
under winodws, m_ptr points to a mpz_cell that store the value.
|
||||
*/
|
||||
|
||||
enum mpz_kind { mpz_small = 0, mpz_ptr_k = 1};
|
||||
enum mpz_kind { mpz_small = 0, mpz_ptr = 1};
|
||||
enum mpz_owner { mpz_self = 0, mpz_ext = 1};
|
||||
|
||||
class mpz {
|
||||
|
@ -172,10 +172,13 @@ class mpz_manager {
|
|||
if (n.m_ptr == nullptr || capacity(n) < c) {
|
||||
deallocate(n);
|
||||
n.m_val = 1;
|
||||
n.m_kind = mpz_ptr_k;
|
||||
n.m_kind = mpz_ptr;
|
||||
n.m_owner = mpz_self;
|
||||
n.m_ptr = allocate(c);
|
||||
}
|
||||
else {
|
||||
n.m_kind = mpz_ptr;
|
||||
}
|
||||
}
|
||||
|
||||
void deallocate(bool is_heap, mpz_cell * ptr) {
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue