1  #include <stdlib.h>
       2  #include <stdio.h>
       3  
       4  #include "libgccjit.h"
       5  
       6  #include "harness.h"
       7  
       8  void
       9  create_code (gcc_jit_context *ctxt, void *user_data)
      10  {
      11    /* Let's try to inject the equivalent of:
      12       void
      13       hello_world (const char *name)
      14       {
      15          // a test comment
      16          printf ("hello %s\n", name);
      17       }
      18    */
      19    gcc_jit_type *void_type =
      20      gcc_jit_context_get_type (ctxt, GCC_JIT_TYPE_VOID);
      21    gcc_jit_type *const_char_ptr_type =
      22      gcc_jit_context_get_type (ctxt, GCC_JIT_TYPE_CONST_CHAR_PTR);
      23    gcc_jit_param *param_name =
      24      gcc_jit_context_new_param (ctxt, NULL, const_char_ptr_type, "name");
      25    gcc_jit_function *func =
      26      gcc_jit_context_new_function (ctxt, NULL,
      27                                    GCC_JIT_FUNCTION_EXPORTED,
      28                                    void_type,
      29                                    "hello_world",
      30                                    1, &param_name,
      31                                    0);
      32  
      33    gcc_jit_param *param_format =
      34      gcc_jit_context_new_param (ctxt, NULL, const_char_ptr_type, "format");
      35    gcc_jit_function *printf_func =
      36      gcc_jit_context_new_function (ctxt, NULL,
      37  				  GCC_JIT_FUNCTION_IMPORTED,
      38  				  gcc_jit_context_get_type (
      39  				     ctxt, GCC_JIT_TYPE_INT),
      40  				  "printf",
      41  				  1, &param_format,
      42  				  1);
      43    gcc_jit_rvalue *args[2];
      44    args[0] = gcc_jit_context_new_string_literal (ctxt, "hello %s\n");
      45    args[1] = gcc_jit_param_as_rvalue (param_name);
      46  
      47    gcc_jit_block *block = gcc_jit_function_new_block (func, NULL);
      48  
      49    gcc_jit_block_add_comment (
      50      block, NULL,
      51      "a test comment");
      52  
      53    gcc_jit_block_add_eval (
      54      block, NULL,
      55      gcc_jit_context_new_call (ctxt,
      56                                NULL,
      57                                printf_func,
      58                                2, args));
      59    gcc_jit_block_end_with_void_return (block, NULL);
      60  }
      61  
      62  extern void
      63  verify_code (gcc_jit_context *ctxt, gcc_jit_result *result)
      64  {
      65    typedef void (*fn_type) (const char *);
      66    CHECK_NON_NULL (result);
      67    fn_type hello_world =
      68      (fn_type)gcc_jit_result_get_code (result, "hello_world");
      69    CHECK_NON_NULL (hello_world);
      70    hello_world ("world");
      71    fflush (stdout);
      72  }