1 #include <stdlib.h>
2 #include <stdio.h>
3 
4 #include "libgccjit.h"
5 
6 #include "harness.h"
7 
8 void
create_code(gcc_jit_context * ctxt,void * user_data)9 create_code (gcc_jit_context *ctxt, void *user_data)
10 {
11   /* Let's try to inject the equivalent of:
12 
13      int
14      test_fn ()
15      {
16        struct foo f;
17        return (int)f;
18      }
19 
20      and verify that the API complains about the bad cast.
21   */
22   gcc_jit_type *int_type =
23     gcc_jit_context_get_type (ctxt, GCC_JIT_TYPE_INT);
24 
25 
26   gcc_jit_struct *struct_foo =
27     gcc_jit_context_new_struct_type (ctxt, NULL, "foo",
28 				     0, NULL);
29 
30   gcc_jit_function *test_fn =
31     gcc_jit_context_new_function (ctxt, NULL,
32                                   GCC_JIT_FUNCTION_EXPORTED,
33                                   int_type,
34                                   "test_fn",
35                                   0, NULL,
36                                   0);
37   gcc_jit_lvalue *f =
38     gcc_jit_function_new_local (
39       test_fn,
40       NULL,
41       gcc_jit_struct_as_type (struct_foo), "f");
42 
43   gcc_jit_block *block = gcc_jit_function_new_block (test_fn, NULL);
44 
45   gcc_jit_block_end_with_return (
46     block, NULL,
47     gcc_jit_context_new_cast (ctxt, NULL,
48 			      gcc_jit_lvalue_as_rvalue (f),
49 			      int_type));
50 }
51 
52 void
verify_code(gcc_jit_context * ctxt,gcc_jit_result * result)53 verify_code (gcc_jit_context *ctxt, gcc_jit_result *result)
54 {
55   CHECK_VALUE (result, NULL);
56 
57   /* Verify that the correct error message was emitted.  */
58   CHECK_STRING_VALUE (gcc_jit_context_get_first_error (ctxt),
59 		      "gcc_jit_context_new_cast:"
60 		      " cannot cast f from type: struct foo"
61 		      " to type: int");
62 }
63 
64