1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38
|
#include <sollya.h>
int main(void) {
sollya_obj_t a;
char *s;
sollya_lib_init();
a = sollya_lib_parse_string("\"Hello, World!\"");
if(!sollya_lib_get_string(&s, a)) sollya_lib_printf("%b is not a string\n\n", a);
else {
sollya_lib_printf("%b has been converted to \"%s\"\n\n", a, s);
sollya_lib_free(s);
}
sollya_lib_clear_obj(a);
a = sollya_lib_parse_string("[1; 2]");
if(!sollya_lib_get_string(&s, a)) sollya_lib_printf("%b is not a string\n\n", a);
else {
sollya_lib_printf("%b has been converted to \"%s\"\n\n", a, s);
sollya_lib_free(s);
}
sollya_lib_clear_obj(a);
a = sollya_lib_parse_string("\"\"");
if(!sollya_lib_get_string(&s, a)) sollya_lib_printf("%b is not a string\n\n", a);
else {
sollya_lib_printf("%b has been converted to \"%s\"\n\n", a, s);
sollya_lib_free(s);
}
sollya_lib_clear_obj(a);
sollya_lib_close();
return 0;
}
|