2 * Copyright (c) 2009 Petri Lehtinen <petri@digip.org>
4 * Jansson is free software; you can redistribute it and/or modify
5 * it under the terms of the MIT license. See LICENSE for details.
12 /* Call the simple functions not covered by other tests of the public API */
17 value = json_integer(1);
18 if(json_typeof(value) != JSON_INTEGER)
19 fail("json_typeof failed");
21 if(json_is_object(value))
22 fail("json_is_object failed");
24 if(json_is_array(value))
25 fail("json_is_array failed");
27 if(json_is_string(value))
28 fail("json_is_string failed");
30 if(!json_is_integer(value))
31 fail("json_is_integer failed");
33 if(json_is_real(value))
34 fail("json_is_real failed");
36 if(!json_is_number(value))
37 fail("json_is_number failed");
39 if(json_is_true(value))
40 fail("json_is_true failed");
42 if(json_is_false(value))
43 fail("json_is_false failed");
45 if(json_is_boolean(value))
46 fail("json_is_boolean failed");
48 if(json_is_null(value))
49 fail("json_is_null failed");
54 value = json_string("foo");
56 fail("json_string failed");
57 if(strcmp(json_string_value(value), "foo"))
58 fail("invalid string value");
60 if(json_string_set(value, "bar"))
61 fail("json_string_set failed");
62 if(strcmp(json_string_value(value), "bar"))
63 fail("invalid string value");
67 value = json_string(NULL);
69 fail("json_string(NULL) failed");
72 value = json_string("a\xefz");
74 fail("json_string(<invalid utf-8>) failed");
77 value = json_integer(123);
79 fail("json_integer failed");
80 if(json_integer_value(value) != 123)
81 fail("invalid integer value");
82 if(json_number_value(value) != 123.0)
83 fail("invalid number value");
85 if(json_integer_set(value, 321))
86 fail("json_integer_set failed");
87 if(json_integer_value(value) != 321)
88 fail("invalid integer value");
89 if(json_number_value(value) != 321.0)
90 fail("invalid number value");
94 value = json_real(123.123);
96 fail("json_real failed");
97 if(json_real_value(value) != 123.123)
98 fail("invalid integer value");
99 if(json_number_value(value) != 123.123)
100 fail("invalid number value");
102 if(json_real_set(value, 321.321))
103 fail("json_real_set failed");
104 if(json_real_value(value) != 321.321)
105 fail("invalid real value");
106 if(json_number_value(value) != 321.321)
107 fail("invalid number value");
113 fail("json_true failed");
116 value = json_false();
118 fail("json_false failed");
123 fail("json_null failed");