Doxygen Source Code Documentation
wsle.c File Reference
#include "f2c.h"
#include "fio.h"
#include "fmt.h"
#include "lio.h"
Go to the source code of this file.
Functions | |
integer | s_wsle (cilist *a) |
integer | e_wsle (Void) |
Function Documentation
|
Definition at line 26 of file wsle.c.
|
|
Definition at line 9 of file wsle.c. References a, c_le(), err, f__nowwriting(), and LINE.
00011 { 00012 int n; 00013 if(n=c_le(a)) return(n); 00014 f__reading=0; 00015 f__external=1; 00016 f__formatted=1; 00017 f__putn = t_putc; 00018 f__lioproc = l_write; 00019 L_len = LINE; 00020 f__donewrec = x_wSL; 00021 if(f__curunit->uwrt != 1 && f__nowwriting(f__curunit)) 00022 err(a->cierr, errno, "list output start"); 00023 return(0); 00024 } |