#include #include #include #include #include "libgccjit.h" #include "harness.h" void create_code (gcc_jit_context *ctxt, void *user_data) { /* Let's try to inject the equivalent of: _Thread_local int foo; int test_using_tls() { foo = 42; return foo; } */ gcc_jit_type *int_type = gcc_jit_context_get_type (ctxt, GCC_JIT_TYPE_INT); gcc_jit_lvalue *foo = gcc_jit_context_new_global ( ctxt, NULL, GCC_JIT_GLOBAL_EXPORTED, int_type, "foo"); gcc_jit_lvalue_set_tls_model (foo, GCC_JIT_TLS_MODEL_GLOBAL_DYNAMIC); /* Build the test_fn. */ gcc_jit_function *test_fn = gcc_jit_context_new_function (ctxt, NULL, GCC_JIT_FUNCTION_EXPORTED, int_type, "test_using_tls", 0, NULL, 0); gcc_jit_block *block = gcc_jit_function_new_block (test_fn, NULL); gcc_jit_block_add_assignment ( block, NULL, foo, gcc_jit_context_new_rvalue_from_int (ctxt, int_type, 42)); gcc_jit_block_end_with_return (block, NULL, gcc_jit_lvalue_as_rvalue (foo)); } void verify_code (gcc_jit_context *ctxt, gcc_jit_result *result) { typedef int (*fn_type) (void); CHECK_NON_NULL (result); fn_type test_using_tls = (fn_type)gcc_jit_result_get_code (result, "test_using_tls"); CHECK_NON_NULL (test_using_tls); int return_value = test_using_tls(); CHECK_VALUE (return_value, 42); int *foo = (int *)gcc_jit_result_get_global (result, "foo"); CHECK_NON_NULL (foo); CHECK_VALUE (*foo, 42); }