Mercurial > hg > xemacs-beta

comparison src/unexconvex.c @ 647:b39c14581166

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[xemacs-hg @ 2001-08-13 04:45:47 by ben] removal of unsigned, size_t, etc.
author ben
date Mon, 13 Aug 2001 04:46:48 +0000
parents 183866b06e0b
children 04bc9d2f42c7
comparison
equal deleted inserted replaced
646:00c54252fe4f 647:b39c14581166
491 return; /* Nothing to do */ 491 return; /* Nothing to do */
492 492
493 if( lseek( new, (long) sptr->s_scnptr, 0 ) == -1 ) 493 if( lseek( new, (long) sptr->s_scnptr, 0 ) == -1 )
494 PERROR( "unexecing" ); 494 PERROR( "unexecing" );
495 495
496 memset (zeros, 0, sizeof zeros); 496 memset (zeros, 0, sizeof (zeros));
497 497
498 ptr = (char *) sptr->s_vaddr; 498 ptr = (char *) sptr->s_vaddr;
499 end = ptr + sptr->s_size; 499 end = ptr + sptr->s_size;
500 500
501 while( ptr < end ) { 501 while( ptr < end ) {
541 return 0; 541 return 0;
542 542
543 lseek (a_out, SYMS_START, 0); /* Position a.out to symtab. */ 543 lseek (a_out, SYMS_START, 0); /* Position a.out to symtab. */
544 lseek( new, (long)f_ohdr.o_symptr, 0 ); 544 lseek( new, (long)f_ohdr.o_symptr, 0 );
545 545
546 while ((n = read (a_out, page, sizeof page)) > 0) { 546 while ((n = read (a_out, page, sizeof (page))) > 0) {
547 if (write (new, page, n) != n) { 547 if (write (new, page, n) != n) {
548 PERROR (new_name); 548 PERROR (new_name);
549 } 549 }
550 } 550 }
551 if (n < 0) { 551 if (n < 0) {