[Python-checkins] python/dist/src/Python dynload_aix.c,2.12,2.13

2002年12月30日 16:06:26 -0800

Update of /cvsroot/python/python/dist/src/Python
In directory sc8-pr-cvs1:/tmp/cvs-serv22531/Python
Modified Files:
	dynload_aix.c 
Log Message:
Fix SF #639945, 64-bit bug on AIX
I can't test this on the snake farm (no aix box is working).
This change works for the submitter seems correct.
Can anybody test this on 32- and 64- bit AIX?
Index: dynload_aix.c
===================================================================
RCS file: /cvsroot/python/python/dist/src/Python/dynload_aix.c,v
retrieving revision 2.12
retrieving revision 2.13
diff -C2 -d -r2.12 -r2.13
*** dynload_aix.c	14 Jun 2002 20:41:16 -0000	2.12
--- dynload_aix.c	31 Dec 2002 00:06:24 -0000	2.13
***************
*** 78,83 ****
 			*/
 			offset = (unsigned int)ldiptr->ldinfo_next;
! 			ldiptr = (struct ld_info *)((unsigned int)
! 						 ldiptr + offset);
 			continue;
 		}
--- 78,82 ----
 			*/
 			offset = (unsigned int)ldiptr->ldinfo_next;
! 			ldiptr = (struct ld_info *)((char*)ldiptr + offset);
 			continue;
 		}
***************
*** 99,103 ****
 		prevmodptr = modptr;
 		offset = (unsigned int)ldiptr->ldinfo_next;
! 		ldiptr = (struct ld_info *)((unsigned int)ldiptr + offset);
 	} while (offset);
 	free(ldibuf);
--- 98,102 ----
 		prevmodptr = modptr;
 		offset = (unsigned int)ldiptr->ldinfo_next;
! 		ldiptr = (struct ld_info *)((char*)ldiptr + offset);
 	} while (offset);
 	free(ldibuf);