pike.git/
src/
dynamic_load.c
Branch:
Tag:
Non-build tags
All tags
No tags
2004-03-21
2004-03-21 17:19:40 by Henrik Grubbström (Grubba) <grubba@grubba.org>
334193dcd6a60cd58c24e41ceadb436290ed1739 (
10
lines) (+
8
/-
2
)
[
Show
|
Annotate
]
Branch:
7.9
Added FIXME for the dyld case.
Rev: src/dynamic_load.c:1.76
2:
|| This file is part of Pike. For copyright information see COPYRIGHT. || Pike is distributed under GPL, LGPL and MPL. See the file COPYING || for more information.
-
|| $Id: dynamic_load.c,v 1.
75
2004/03/21
16
:
42
:
01
grubba Exp $
+
|| $Id: dynamic_load.c,v 1.
76
2004/03/21
17
:
19
:
40
grubba Exp $
*/ #ifdef TESTING
24:
# include "language.h" # include "lex.h"
-
RCSID("$Id: dynamic_load.c,v 1.
75
2004/03/21
16
:
42
:
01
grubba Exp $");
+
RCSID("$Id: dynamic_load.c,v 1.
76
2004/03/21
17
:
19
:
40
grubba Exp $");
#else /* TESTING */
248:
NSObjectFileImageReturnCode code = 0; NSObjectFileImage image = NULL;
+
/* FIXME: Should be fixed to detect if the module already is loaded. */
if ((code = NSCreateObjectFileImageFromFile(module_name, &image)) != NSObjectFileImageSuccess) { fprintf(stderr, "NSCreateObjectFileImageFromFile(\"%s\") failed with %d\n",
255:
return NULL; } /* FIXME: image should be freed somewhere! */
+
+
fprintf(stderr, "dlopen(\"%s\") ==> image:%p\n",
+
module_name, image);
+
return NSLinkModule(image, module_name, how | NSLINKMODULE_OPTION_RETURN_ON_ERROR | NSLINKMODULE_OPTION_PRIVATE);