Example #1
0
	a = ason_create_object("third", eight);
	b = ason_join(object, a);
	ason_destroy(object);
	ason_destroy(a);
	object = b;

	a = ason_create_object("all", list);
	b = ason_join(object, a);
	ason_destroy(object);
	ason_destroy(a);
	ason_destroy(list);
	object = b;

	TEST("ASCII printing") {
		out = ason_asprint(object);
		test = ason_read(out, NULL);

		REQUIRE(test);
		REQUIRE(ason_check_equal(object, test));
	}

	free(out);
	ason_destroy(test);

	TEST("Unicode printing") {
		out = ason_asprint_unicode(object);
		test = ason_read(out, NULL);

		REQUIRE(test);
		REQUIRE(ason_check_equal(object, test));
	}
Example #2
0
TESTS(24);

/**
 * Basic exercise of the parser.
 **/
TEST_MAIN("Parse values")
{
	ason_t *test_value = NULL;
	ason_t *a = NULL;
	ason_t *b = NULL;
	ason_t *c = NULL;
	char *str = NULL;
	ason_iter_t *iter;

	TEST("Parse parameter") {
		a = ason_read("?i", 7);
		REQUIRE(ason_type(a) == ASON_TYPE_NUMERIC);
		REQUIRE(ason_long(a) == 7);

		b = ason_read("?i", 6);
		REQUIRE(ason_type(b) == ASON_TYPE_NUMERIC);
		REQUIRE(ason_long(b) == 6);

	}

	ason_destroy(a);
	ason_destroy(b);

	TEST("Parse unsigned parameter") {
		a = ason_read("?u", 3000);
		REQUIRE(ason_type(a) == ASON_TYPE_NUMERIC);