mirror of
				https://github.com/Z3Prover/z3
				synced 2025-11-04 05:19:11 +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