rem: kprintf("Got elf object: %08lx\n", PPCObject );
context: OpenLibs ( void ){  /* Intuition Library */  IntuitionBase = (struct IntuitionBase *) OpenLibrary( "intuition.library", 37 );  if( IntuitionBase == NULL)  {    Alert(AN_Unknown|AG_OpenLib|AO_Intuition);    return FALSE;  }  /* DOS Library */  DOSBase = (struct DosLibrary *) OpenLibrary( "dos.library", 37 );  if( DOSBase == NULL)  {    Req( "Unable to open dos.library." );    return FALSE;  }  /* Graphics Library */  GfxBase = (struct GfxBase *) OpenLibrary( "graphics.library", 37 );  if( GfxBase == NULL)  {    Req( "Unable to open graphics.library." );    return FALSE;  }  /* GadTools Library */  GadToolsBase = OpenLibrary( "gadtools.library", 37 );  if( GadToolsBase == NULL)  {    Req( "Unable to open gadtools.library." );    return FALSE;  }  /* IFFParse Library */  IFFParseBase = OpenLibrary( "iffparse.library", 37 );  if( IFFParseBase == NULL)  {    Req( "Unable to open iffparse.library." );    return FALSE;  }  /* Locale Library */  LocaleBase = (struct LocaleBase*) OpenLibrary( "locale.library", 38 );  /* Timer Device */  TimerIO = (struct timerequest *) AllocVec( sizeof(struct timerequest),                                             MEMF_PUBLIC | MEMF_CLEAR );  if( TimerIO == NULL)  {    Req( "Out of memory." );    return FALSE;  }  timeval = (struct timeval *) AllocVec( sizeof(struct timeval),                                         MEMF_PUBLIC | MEMF_CLEAR);  if( timeval == NULL)  {    Req( "Out of memory." );    return FALSE;  }  if( OpenDevice( "timer.device",                  UNIT_MICROHZ,                  (struct IORequest *)                  TimerIO,                  0) != 0 )  {    Req( "Unable to open timer.device." );    return FALSE;  }  TimerBase = (struct Device *) TimerIO->tr_node.io_Device;  /* Utility Library */  UtilityBase = (struct UtilityBase *) OpenLibrary( "utility.library", 37 );  if( UtilityBase == NULL)  {    Req( "Unable to open utility.library." );    return FALSE;  }#ifndef VERSION68K  /* PPC/PowerPC library */  Forbid();    PowerPCBase = (struct Library *) FindName( &SysBase->LibList,                                             "powerpc.library" );    Permit();  if( PowerPCBase != NULL )  {    PowerPCBase = OpenLibrary( "powerpc.library", 14 );kprintf( "opened powerpc.library\n" );  }  else  {    PPCLibBase = OpenLibrary( "ppc.library", 46 );  }  if( PPCLibBase == NULL )  {    PowerPCBase = OpenLibrary( "powerpc.library", 14 );kprintf( "opened powerpc.library #2\n" );  }  if( PPCLibBase != NULL || PowerPCBase != NULL )  {    /* Load our code to PPC..  */    PPCObject = AHILoadObject( "DEVS:ahi.elf" );    kprintf("Got elf object: %08lx\n", PPCObject );  }  #endif   OpenahiCatalog(NULL, NULL);  return TRUE;}