void initialize()
{
fgraph = fgraph_new();
globals[0] = (long int)c_box( (void *)dynamic_load, fgraph );
write_code = 0;
write_buffer = 0;
}
void *dynamic_load( char *library, char *symbol )
{
void *sym = dlsym( dlopen(library, 1), symbol);
void *box;
printf("sym\n");
box = c_box(sym, fgraph);
printf( "!!!!!!!!!!load: %x %s, %x %s -> %x\n", library, library, symbol, symbol, box );
return box;
}
HDINLINE static Type create()
{
Type c_box(Type::init());
return c_box.shift(OffsetOrigin());
}