16 lines
282 B
C
16 lines
282 B
C
|
/* $Header$ */
|
||
|
|
/*
|
||
|
|
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
|
||
|
|
* See the copyright notice in the ACK home directory, in the file "Copyright".
|
||
|
|
*/
|
||
|
|
#include "object.h"
|
||
|
|
|
||
|
|
wr_long(fd, l)
|
||
|
|
long l;
|
||
|
|
{
|
||
|
|
char buf[4];
|
||
|
|
|
||
|
|
put4(l, buf);
|
||
|
|
wr_bytes(fd, buf, 4L);
|
||
|
|
}
|