blob: a813f67441b8dca07832777b68c34844bc38a5d4 [file] [log] [blame]
#include <libgccjit.h>
#include "harness.h"
void
create_code (gcc_jit_context *ctxt, void *user_data)
{
/* Replay of API calls for ctxt. */
gcc_jit_type *type_long_long =
gcc_jit_context_get_type (ctxt, GCC_JIT_TYPE_LONG_LONG);
gcc_jit_type *type_void =
gcc_jit_context_get_type (ctxt, GCC_JIT_TYPE_VOID);
gcc_jit_type *type_void_ptr =
gcc_jit_context_get_type (ctxt, GCC_JIT_TYPE_VOID_PTR);
gcc_jit_field *field_u_signed =
gcc_jit_context_new_field (ctxt,
NULL, /* gcc_jit_location *loc */
type_long_long, /* gcc_jit_type *type, */
"u_signed"); /* const char *name */
gcc_jit_field *field_u_ptr =
gcc_jit_context_new_field (ctxt,
NULL, /* gcc_jit_location *loc */
type_void_ptr, /* gcc_jit_type *type, */
"u_ptr"); /* const char *name */
gcc_jit_field *fields_for_union_any[2] = {
field_u_signed,
field_u_ptr,
};
gcc_jit_type *union_any =
gcc_jit_context_new_union_type (ctxt,
NULL, /* gcc_jit_location *loc */
"any", /* const char *name */
2, /* int num_fields */
fields_for_union_any);
gcc_jit_function *func =
gcc_jit_context_new_function (ctxt, /* gcc_jit_context *ctxt */
NULL, /* gcc_jit_location *loc */
GCC_JIT_FUNCTION_EXPORTED,
type_void, /* gcc_jit_type *return_type */
"anonloop_0", /* const char *name */
0, /* int num_params */
NULL, /* gcc_jit_param **params */
0); /* int is_variadic */
gcc_jit_block *block_initial =
gcc_jit_function_new_block (func, "initial");
gcc_jit_lvalue *local_tmp =
gcc_jit_function_new_local (func, /* gcc_jit_function *func */
NULL, /* gcc_jit_location *loc */
union_any, /* gcc_jit_type *type */
"tmp"); /* const char *name */
/* "tmp.u_signed = 0x213d640;" */
gcc_jit_block_add_assignment (
block_initial, /*gcc_jit_block *block */
NULL, /* gcc_jit_location *loc */
gcc_jit_lvalue_access_field (local_tmp, /*gcc_jit_lvalue *struct_or_union */
NULL, /*gcc_jit_location *loc */
field_u_signed),
gcc_jit_context_new_rvalue_from_long (
ctxt, /* gcc_jit_context *ctxt */
type_long_long, /* gcc_jit_type *numeric_type */
0x213d640)); /* long value */
/* "(*tmp.u_ptr) += 1;" which can't be done since u_ptr is a (void *). */
gcc_jit_block_add_assignment_op (
block_initial, /*gcc_jit_block *block */
NULL, /* gcc_jit_location *loc */
/* "(*tmp.u_ptr)". */
gcc_jit_rvalue_dereference (
gcc_jit_lvalue_as_rvalue (
gcc_jit_lvalue_access_field (
local_tmp, /*gcc_jit_lvalue *struct_or_union */
NULL, /*gcc_jit_location *loc */
field_u_ptr)),
NULL), /* gcc_jit_location *loc */
GCC_JIT_BINARY_OP_PLUS, /* enum gcc_jit_binary_op op */
gcc_jit_context_new_rvalue_from_int (
ctxt, /* gcc_jit_context *ctxt */
type_long_long, /* gcc_jit_type *numeric_type */
1)); /* int value */
gcc_jit_block_end_with_void_return (block_initial, /*gcc_jit_block *block */
NULL);
}
void
verify_code (gcc_jit_context *ctxt, gcc_jit_result *result)
{
CHECK_VALUE (result, NULL);
/* Verify that the correct error message was emitted. */
CHECK_STRING_VALUE (gcc_jit_context_get_first_error (ctxt),
"gcc_jit_rvalue_dereference:"
" dereference of void pointer tmp.u_ptr"
" (type: void *)");
}