Line | |
---|
1 | /* $Header: /cvsup/minix/src/commands/aal/wr_ranlib.c,v 1.1.1.1 2005/04/21 14:53:58 beng Exp $ */
|
---|
2 | /*
|
---|
3 | * (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
|
---|
4 | * See the copyright notice in the ACK home directory, in the file "Copyright".
|
---|
5 | */
|
---|
6 | #include <ranlib.h>
|
---|
7 | #include "object.h"
|
---|
8 |
|
---|
9 | wr_ranlib(fd, ran, cnt)
|
---|
10 | register struct ranlib *ran;
|
---|
11 | register long cnt;
|
---|
12 | {
|
---|
13 | #if ! (BYTES_REVERSED || WORDS_REVERSED)
|
---|
14 | if (sizeof (struct ranlib) != SZ_RAN)
|
---|
15 | #endif
|
---|
16 | {
|
---|
17 | char buf[100 * SZ_RAN];
|
---|
18 |
|
---|
19 | while (cnt) {
|
---|
20 | register int i = (cnt > 100) ? 100 : cnt;
|
---|
21 | register char *c = buf;
|
---|
22 | long j = i * SZ_RAN;
|
---|
23 |
|
---|
24 | cnt -= i;
|
---|
25 | while (i--) {
|
---|
26 | put4(ran->ran_off,c); c += 4;
|
---|
27 | put4(ran->ran_pos,c); c += 4;
|
---|
28 | ran++;
|
---|
29 | }
|
---|
30 | wr_bytes(fd, buf, j);
|
---|
31 | }
|
---|
32 | }
|
---|
33 | #if ! (BYTES_REVERSED || WORDS_REVERSED)
|
---|
34 | else wr_bytes(fd, (char *) ran, cnt * SZ_RAN);
|
---|
35 | #endif
|
---|
36 | }
|
---|
Note:
See
TracBrowser
for help on using the repository browser.