gcc/jit/jit-result.c

   1 /* Internals of libgccjit: implementation of gcc_jit_result
   2    Copyright (C) 2013-2014 Free Software Foundation, Inc.
   3    Contributed by David Malcolm <dmalcolm@redhat.com>.
   4
   5 This file is part of GCC.
   6
   7 GCC is free software; you can redistribute it and/or modify it
   8 under the terms of the GNU General Public License as published by
   9 the Free Software Foundation; either version 3, or (at your option)
  10 any later version.
  11
  12 GCC is distributed in the hope that it will be useful, but
  13 WITHOUT ANY WARRANTY; without even the implied warranty of
  14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  15 General Public License for more details.
  16
  17 You should have received a copy of the GNU General Public License
  18 along with GCC; see the file COPYING3.  If not see
  19 <http://www.gnu.org/licenses/>.  */
  20
  21 #include "config.h"
  22 #include "system.h"
  23 #include "coretypes.h"
  24 #include "jit-result.h"
  25
  26 namespace gcc {
  27 namespace jit {
  28
  29 /* Constructor for gcc::jit::result.  */
  30
  31 result::
  32 result(void *dso_handle)
  33   : m_dso_handle(dso_handle)
  34 {
  35 }
  36
  37 /* gcc::jit::result's destructor.
  38
  39    Called implicitly by gcc_jit_result_release.  */
  40
  41 result::~result()
  42 {
  43   dlclose (m_dso_handle);
  44 }
  45
  46 /* Attempt to locate the given function by name within the
  47    playback::result, using dlsym.
  48
  49    Implements the post-error-checking part of
  50    gcc_jit_result_get_code.  */
  51
  52 void *
  53 result::
  54 get_code (const char *funcname)
  55 {
  56   void *code;
  57   const char *error;
  58
  59   /* Clear any existing error.  */
  60   dlerror ();
  61
  62   code = dlsym (m_dso_handle, funcname);
  63
  64   if ((error = dlerror()) != NULL)  {
  65     fprintf(stderr, "%s\n", error);
  66   }
  67
  68   return code;
  69 }
  70
  71 } // namespace gcc::jit
  72
  73 } // namespace gcc