3
0
Fork 0
mirror of https://github.com/Z3Prover/z3 synced 2025-04-08 18:31:49 +00:00
z3/test/parray.cpp
Leonardo de Moura 68269c43a6 other components
Signed-off-by: Leonardo de Moura <leonardo@microsoft.com>
2012-10-02 11:48:48 -07:00

315 lines
8.8 KiB
C++

/*++
Copyright (c) 2006 Microsoft Corporation
Module Name:
parray.cpp
Abstract:
Test persistent arrays.
Author:
Leonardo de Moura (leonardo) 2011-02-23.
Revision History:
--*/
#include"parray.h"
#include"small_object_allocator.h"
#include"ast.h"
template<bool PRESERVE_ROOTS>
struct int_parray_config {
typedef int value;
typedef dummy_value_manager<int> value_manager;
typedef small_object_allocator allocator;
static const bool ref_count = false;
static const bool preserve_roots = PRESERVE_ROOTS;
static const unsigned max_trail_sz = 8;
static const unsigned factor = 2;
};
template<bool PRESERVE_ROOTS>
static void tst1() {
typedef parray_manager<int_parray_config<PRESERVE_ROOTS> > int_parray_manager;
typedef typename int_parray_manager::ref int_array;
dummy_value_manager<int> vm;
small_object_allocator a;
int_parray_manager m(vm, a);
int_array a1;
int_array a2;
int_array a3;
m.mk(a1);
SASSERT(m.size(a1) == 0);
m.push_back(a1, 10, a2);
TRACE("parray",
m.display_info(tout, a1); tout << "\n";
m.display_info(tout, a2); tout << "\n";);
SASSERT(m.size(a1) == 0);
SASSERT(m.size(a2) == 1);
m.push_back(a1, 20, a1);
m.push_back(a1, 30, a1);
TRACE("parray",
m.display_info(tout, a1); tout << "\n";
m.display_info(tout, a2); tout << "\n";);
SASSERT(m.get(a1, 0) == 20);
SASSERT(m.get(a1, 1) == 30);
SASSERT(m.get(a2, 0) == 10);
SASSERT(m.size(a1) == 2);
SASSERT(m.size(a2) == 1);
SASSERT(m.size(a3) == 0);
m.push_back(a2, 100, a3);
SASSERT(m.size(a3) == 2);
SASSERT(m.get(a3, 0) == 10);
SASSERT(m.get(a3, 1) == 100);
TRACE("parray",
m.display_info(tout, a1); tout << "\n";
m.display_info(tout, a2); tout << "\n";
m.display_info(tout, a3); tout << "\n";);
m.push_back(a2, 50);
SASSERT(m.get(a2, 0) == 10);
SASSERT(m.get(a2, 1) == 50);
SASSERT(m.size(a2) == 2);
TRACE("parray",
m.display_info(tout, a1); tout << "\n";
m.display_info(tout, a2); tout << "\n";
m.display_info(tout, a3); tout << "\n";);
m.del(a1);
m.del(a2);
m.del(a3);
}
template<bool PRESERVE_ROOTS>
static void tst2() {
typedef parray_manager<int_parray_config<PRESERVE_ROOTS> > int_parray_manager;
typedef typename int_parray_manager::ref int_array;
TRACE("parray", tout << "tst2\n";);
dummy_value_manager<int> vm;
small_object_allocator a;
int_parray_manager m(vm, a);
int_array a1;
int_array a2;
for (unsigned i = 0; i < 100; i++)
m.push_back(a1, i);
SASSERT(m.size(a1) == 100);
m.push_back(a1, 100, a2);
for (unsigned i = 0; i < 10; i++)
m.push_back(a2, i+101);
TRACE("parray",
m.display_info(tout, a1); tout << "\n";
m.display_info(tout, a2); tout << "\n";);
SASSERT(m.get(a1, 0) == 0);
TRACE("parray",
m.display_info(tout, a1); tout << "\n";
m.display_info(tout, a2); tout << "\n";);
for (unsigned i = 0; i < m.size(a1); i++) {
SASSERT(m.get(a1, i) == i);
}
for (unsigned i = 0; i < m.size(a2); i++) {
SASSERT(m.get(a2, i) == i);
}
TRACE("parray",
m.display_info(tout, a1); tout << "\n";
m.display_info(tout, a2); tout << "\n";);
m.unshare(a1);
TRACE("parray",
m.display_info(tout, a1); tout << "\n";
m.display_info(tout, a2); tout << "\n";);
m.del(a1);
m.del(a2);
}
template<bool PRESERVE_ROOTS>
static void tst3() {
typedef parray_manager<int_parray_config<PRESERVE_ROOTS> > int_parray_manager;
typedef typename int_parray_manager::ref int_array;
TRACE("parray", tout << "tst3\n";);
dummy_value_manager<int> vm;
small_object_allocator a;
int_parray_manager m(vm, a);
int_array a1;
int_array a2;
int_array a3;
int_array a4;
for (unsigned i = 0; i < 20; i++)
m.push_back(a1, i);
SASSERT(m.size(a1) == 20);
m.set(a1, 0, 1, a2);
for (unsigned i = 1; i < 20; i++) {
if (i == 6) {
m.copy(a2, a3);
m.pop_back(a3);
m.pop_back(a3);
m.push_back(a3, 40);
}
m.set(a2, i, i+1);
}
m.pop_back(a2, a4);
m.pop_back(a4);
m.push_back(a4, 30);
for (unsigned i = 0; i < 20; i++) {
SASSERT(m.get(a2, i) == i+1);
}
TRACE("parray",
m.display_info(tout, a1); tout << "\n";
m.display_info(tout, a2); tout << "\n";
m.display_info(tout, a3); tout << "\n";
m.display_info(tout, a4); tout << "\n";
);
SASSERT(m.get(a1, 10) == 10);
TRACE("parray",
tout << "after rerooting...\n";
m.display_info(tout, a1); tout << "\n";
m.display_info(tout, a2); tout << "\n";
m.display_info(tout, a3); tout << "\n";
m.display_info(tout, a4); tout << "\n";
);
SASSERT(m.size(a1) == 20);
SASSERT(m.size(a2) == 20);
SASSERT(m.size(a3) == 19);
SASSERT(m.size(a4) == 19);
for (unsigned i = 0; i < 20; i++) {
SASSERT(m.get(a1, i) == i);
SASSERT(m.get(a2, i) == i+1);
SASSERT(i >= 18 || m.get(a4, i) == i+1);
SASSERT(i >= 6 || m.get(a3, i) == i+1);
SASSERT(!(6 <= i && i <= 17) || m.get(a3, i) == i);
}
SASSERT(m.get(a4, 18) == 30);
SASSERT(m.get(a3, 18) == 40);
TRACE("parray",
tout << "after many gets...\n";
m.display_info(tout, a1); tout << "\n";
m.display_info(tout, a2); tout << "\n";
m.display_info(tout, a3); tout << "\n";
m.display_info(tout, a4); tout << "\n";
);
m.unshare(a1);
TRACE("parray",
tout << "after unshare...\n";
m.display_info(tout, a1); tout << "\n";
m.display_info(tout, a2); tout << "\n";
m.display_info(tout, a3); tout << "\n";
m.display_info(tout, a4); tout << "\n";
);
m.reroot(a4);
TRACE("parray",
tout << "after reroot...\n";
m.display_info(tout, a1); tout << "\n";
m.display_info(tout, a2); tout << "\n";
m.display_info(tout, a3); tout << "\n";
m.display_info(tout, a4); tout << "\n";
);
m.unshare(a2);
TRACE("parray",
tout << "after second unshare...\n";
m.display_info(tout, a1); tout << "\n";
m.display_info(tout, a2); tout << "\n";
m.display_info(tout, a3); tout << "\n";
m.display_info(tout, a4); tout << "\n";
);
m.del(a1);
m.del(a2);
m.del(a3);
m.del(a4);
}
#if 0
// Moved to ast.cpp
struct expr_array_config {
typedef expr * value;
typedef ast_manager value_manager;
typedef small_object_allocator allocator;
static const bool ref_count = true;
static const bool preserve_roots = true;
static const unsigned max_trail_sz = 8;
static const unsigned factor = 2;
};
typedef parray_manager<expr_array_config> expr_array_manager;
typedef expr_array_manager::ref expr_array;
static void tst4() {
TRACE("parray", tout << "tst4\n";);
ast_manager m;
expr_array_manager m2(m, m.get_allocator());
expr_array a1;
expr_array a2;
expr * v0 = m.mk_var(0, m.mk_bool_sort());
expr * v1 = m.mk_var(1, m.mk_bool_sort());
expr * v2 = m.mk_var(2, m.mk_bool_sort());
expr * v3 = m.mk_var(3, m.mk_bool_sort());
m2.push_back(a1, v0);
m2.push_back(a1, v1);
m2.push_back(a1, v2, a2);
m2.push_back(a1, v3);
m2.push_back(a2, v2);
m2.pop_back(a1);
TRACE("parray",
m2.display_info(tout, a1); tout << "\n";
m2.display_info(tout, a2); tout << "\n";
);
m2.reroot(a1);
TRACE("parray",
m2.display_info(tout, a1); tout << "\n";
m2.display_info(tout, a2); tout << "\n";
);
m2.del(a1);
m2.del(a2);
}
#endif
static void tst5() {
ast_manager m;
expr_array a1;
expr_array a2;
m.mk(a1);
for (unsigned i = 0; i < 100; i++) {
m.push_back(a1, m.mk_var(i, m.mk_bool_sort()));
}
unsigned long long mem = memory::get_max_used_memory();
std::cout << "max. heap size: " << static_cast<double>(mem)/static_cast<double>(1024*1024) << " Mbytes\n";
m.copy(a1, a2);
for (unsigned i = 0; i < 1000000; i++) {
m.set(a1, i % 100, m.mk_var(rand() % 100, m.mk_bool_sort()));
}
mem = memory::get_max_used_memory();
std::cout << "max. heap size: " << static_cast<double>(mem)/static_cast<double>(1024*1024) << " Mbytes\n";
m.del(a2);
m.del(a1);
}
void tst_parray() {
// enable_trace("parray_mem");
tst1<true>();
tst2<true>();
tst3<true>();
tst1<false>();
tst2<false>();
tst3<false>();
// tst4();
tst5();
}