dll_handle_address = read_register (ARG1_REGNUM);
dll_handle_address = read_register (HPPA_ARG1_REGNUM);
som_solib_library_pathname (int pid){  CORE_ADDR dll_handle_address;  CORE_ADDR dll_pathname_address;  struct som_solib_mapped_entry dll_descriptor;  char *p;  static char dll_pathname[1024];  /* Read the descriptor of this newly-loaded library. */  dll_handle_address = read_register (ARG1_REGNUM);  read_memory (dll_handle_address, (char *) &dll_descriptor, sizeof (dll_descriptor));  /* We can find a pointer to the dll's pathname within the descriptor. */  dll_pathname_address = (CORE_ADDR) dll_descriptor.name;  /* Read the pathname, one byte at a time. */  p = dll_pathname;  for (;;)    {      char b;      read_memory (dll_pathname_address++, (char *) &b, 1);      *p++ = b;      if (b == '\0')	break;    }  return dll_pathname;}