97 lines
1.6 KiB
C
97 lines
1.6 KiB
C
#include <qse/cmn/pma.h>
|
|
#include <qse/cmn/mem.h>
|
|
#include <qse/si/sio.h>
|
|
|
|
#define R(f) \
|
|
do { \
|
|
qse_printf (QSE_T("== %s ==\n"), QSE_T(#f)); \
|
|
if (f() == -1) return -1; \
|
|
} while (0)
|
|
|
|
static int test1 ()
|
|
{
|
|
int i;
|
|
int* ptr[100];
|
|
|
|
qse_pma_t* pma = qse_pma_open (QSE_MMGR_GETDFL(), 0);
|
|
if (pma == QSE_NULL)
|
|
{
|
|
qse_printf (QSE_T("cannot open pma\n"));
|
|
return -1;
|
|
}
|
|
|
|
for (i = 0; i < 100; i++)
|
|
{
|
|
ptr[i] = qse_pma_alloc (pma, sizeof(int));
|
|
if (ptr[i])
|
|
{
|
|
qse_printf (QSE_T("%d %p\n"), i, ptr[i]);
|
|
*(ptr[i]) = i;
|
|
}
|
|
else qse_printf (QSE_T("%d FAIL\n"), i);
|
|
}
|
|
|
|
for (i = 0; i < 100; i++)
|
|
{
|
|
ptr[i] = qse_pma_alloc (pma, sizeof(int));
|
|
if (ptr[i])
|
|
{
|
|
qse_printf (QSE_T("%d %p\n"), i, ptr[i]);
|
|
*(ptr[i]) = i;
|
|
}
|
|
else qse_printf (QSE_T("%d FAIL\n"), i);
|
|
}
|
|
|
|
qse_pma_close (pma);
|
|
return 0;
|
|
}
|
|
|
|
static int test2 ()
|
|
{
|
|
int i;
|
|
int* ptr[100];
|
|
|
|
qse_pma_t* pma = qse_pma_open (QSE_MMGR_GETDFL(), 0);
|
|
if (pma == QSE_NULL)
|
|
{
|
|
qse_printf (QSE_T("cannot open pma\n"));
|
|
return -1;
|
|
}
|
|
|
|
for (i = 0; i < 100; i++)
|
|
{
|
|
ptr[i] = qse_pma_alloc (pma, sizeof(int));
|
|
if (ptr[i])
|
|
{
|
|
qse_printf (QSE_T("%d %p\n"), i, ptr[i]);
|
|
*(ptr[i]) = i;
|
|
}
|
|
else qse_printf (QSE_T("%d FAIL\n"), i);
|
|
}
|
|
|
|
qse_pma_clear (pma);
|
|
|
|
for (i = 0; i < 100; i++)
|
|
{
|
|
ptr[i] = qse_pma_alloc (pma, sizeof(int));
|
|
if (ptr[i])
|
|
{
|
|
qse_printf (QSE_T("%d %p\n"), i, ptr[i]);
|
|
*(ptr[i]) = i;
|
|
}
|
|
else qse_printf (QSE_T("%d FAIL\n"), i);
|
|
}
|
|
|
|
qse_pma_close (pma);
|
|
return 0;
|
|
}
|
|
|
|
int main ()
|
|
{
|
|
qse_open_stdsios ();
|
|
R (test1);
|
|
R (test2);
|
|
qse_close_stdsios ();
|
|
return 0;
|
|
}
|