77 lines
1.5 KiB
C
77 lines
1.5 KiB
C
/*
|
|
* QFloat unit-tests.
|
|
*
|
|
* Copyright IBM, Corp. 2009
|
|
*
|
|
* Authors:
|
|
* Anthony Liguori <aliguori@us.ibm.com>
|
|
*
|
|
* This work is licensed under the terms of the GNU LGPL, version 2.1 or later.
|
|
* See the COPYING.LIB file in the top-level directory.
|
|
*
|
|
*/
|
|
#include <check.h>
|
|
|
|
#include "qfloat.h"
|
|
#include "qemu-common.h"
|
|
|
|
/*
|
|
* Public Interface test-cases
|
|
*
|
|
* (with some violations to access 'private' data)
|
|
*/
|
|
|
|
START_TEST(qfloat_from_double_test)
|
|
{
|
|
QFloat *qf;
|
|
const double value = -42.23423;
|
|
|
|
qf = qfloat_from_double(value);
|
|
fail_unless(qf != NULL);
|
|
fail_unless(qf->value == value);
|
|
fail_unless(qf->base.refcnt == 1);
|
|
fail_unless(qobject_type(QOBJECT(qf)) == QTYPE_QFLOAT);
|
|
|
|
// destroy doesn't exit yet
|
|
qemu_free(qf);
|
|
}
|
|
END_TEST
|
|
|
|
START_TEST(qfloat_destroy_test)
|
|
{
|
|
QFloat *qf = qfloat_from_double(0.0);
|
|
QDECREF(qf);
|
|
}
|
|
END_TEST
|
|
|
|
static Suite *qfloat_suite(void)
|
|
{
|
|
Suite *s;
|
|
TCase *qfloat_public_tcase;
|
|
|
|
s = suite_create("QFloat test-suite");
|
|
|
|
qfloat_public_tcase = tcase_create("Public Interface");
|
|
suite_add_tcase(s, qfloat_public_tcase);
|
|
tcase_add_test(qfloat_public_tcase, qfloat_from_double_test);
|
|
tcase_add_test(qfloat_public_tcase, qfloat_destroy_test);
|
|
|
|
return s;
|
|
}
|
|
|
|
int main(void)
|
|
{
|
|
int nf;
|
|
Suite *s;
|
|
SRunner *sr;
|
|
|
|
s = qfloat_suite();
|
|
sr = srunner_create(s);
|
|
|
|
srunner_run_all(sr, CK_NORMAL);
|
|
nf = srunner_ntests_failed(sr);
|
|
srunner_free(sr);
|
|
|
|
return (nf == 0) ? EXIT_SUCCESS : EXIT_FAILURE;
|
|
}
|