minix: commands/aal/wr_long.c Source File

00001 /* $Header: /opt/proj/minix/cvsroot/src/commands/aal/wr_long.c,v 1.1.1.1 2005/04/21 14:53:58 beng Exp $ */
00002 /*
00003  * (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
00004  * See the copyright notice in the ACK home directory, in the file "Copyright".
00005  */
00006 #include "object.h"
00007 
00008 wr_long(fd, l)
00009         long l;
00010 {
00011         char buf[4];
00012 
00013         put4(l, buf);
00014         wr_bytes(fd, buf, 4L);
00015 }