92 |
|
register int siz; |
93 |
|
{ |
94 |
|
while (siz--) |
95 |
< |
putc(i>>(siz<<3) & 0377, stdout); |
95 |
> |
putc(i>>(siz<<3) & 0xff, stdout); |
96 |
|
if (ferror(stdout)) |
97 |
|
error(SYSTEM, "write error in putint"); |
98 |
|
} |
105 |
|
extern double frexp(); |
106 |
|
int e; |
107 |
|
|
108 |
< |
putint((long)(frexp(f,&e)*0x7fffffff), sizeof(long)); |
108 |
> |
putint((long)(frexp(f,&e)*0x7fffffff), 4); |
109 |
|
putint(e, 1); |
110 |
|
} |
111 |
|
|
147 |
|
#ifdef IARGS |
148 |
|
putint(o->oargs.niargs, 2); |
149 |
|
for (i = 0; i < o->oargs.niargs; i++) |
150 |
< |
putint(o->oargs.iarg[i], sizeof(long)); |
150 |
> |
putint(o->oargs.iarg[i], 4); |
151 |
|
#endif |
152 |
|
putint((long)o->oargs.nfargs, 2); |
153 |
|
for (i = 0; i < o->oargs.nfargs; i++) |