1 /*
2 * lwritel.c
3 * al_lwritel()
4 */
5
6
7 /*
8 This file is part of Atclib.
9
10 Atclib is Copyright � 1995-1999 Andr� Majorel.
11
12 This library is free software; you can redistribute it and/or
13 modify it under the terms of the GNU Library General Public
14 License as published by the Free Software Foundation; either
15 version 2 of the License, or (at your option) any later version.
16
17 This library is distributed in the hope that it will be useful,
18 but WITHOUT ANY WARRANTY; without even the implied warranty of
19 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
20 Library General Public License for more details.
21
22 You should have received a copy of the GNU Library General Public
23 License along with this library; if not, write to the Free
24 Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
25 02111-1307, USA.
26 */
27
28
29 #include <stddef.h>
30 #include <stdlib.h>
31 #include <memory.h>
32
33 #define AL_AILLEGAL_ACCESS
34 #include "atclib.h"
35
36
al_lwritel(al_llist_t * l,const void * buf,size_t length)37 int al_lwritel (al_llist_t *l, const void *buf, size_t length)
38 {
39 int r;
40 r = al_lpokel (l, buf, length);
41 if (r == 0)
42 r = al_lstep (l);
43 return r;
44 }
45
46