Changeset e5210c9 for perlconfig.c


Ignore:
Timestamp:
Feb 19, 2013, 8:29:05 PM (8 years ago)
Author:
David Benjamin <davidben@mit.edu>
Branches:
master
Children:
69f74c2
Parents:
897fc1c
git-author:
David Benjamin <davidben@mit.edu> (06/09/12 23:04:33)
git-committer:
David Benjamin <davidben@mit.edu> (02/19/13 20:29:05)
Message:
dlsym the functions we need after use Glib and before use BarnOwl

After use Glib so the library is loaded. Before use BarnOwl so we try to
use them before they're available.
File:
1 edited

Legend:

Unmodified
Added
Removed
  • perlconfig.c

    r353719a re5210c9  
    331331  char *err;
    332332  const char *args[4] = {"", "-e", "0;", NULL};
     333  const char *dlerr;
    333334  AV *inc;
    334335  char *path;
     
    388389  g_free(path);
    389390
     391  /* Load up perl-Glib. */
     392  eval_pv("use Glib;", FALSE);
     393
     394  /* Now, before BarnOwl tries to use them, get the relevant function pointers out. */
     395  dlerr = owl_closure_init();
     396  if (dlerr) {
     397    return g_strdup(dlerr);
     398  }
     399
     400  /* And now it's safe to import BarnOwl. */
    390401  eval_pv("use BarnOwl;", FALSE);
    391402
Note: See TracChangeset for help on using the changeset viewer.