Doxygen Source Code Documentation

Main Page Alphabetical List Data Structures File List Data Fields Globals Search

sfe.c File Reference

#include "f2c.h"
#include "fio.h"


Functions
integer	e_rsfe (Void)
	c_sfe (cilist *a)
integer	e_wsfe (Void)
Variables
char *	f__fmtbuf

Function Documentation

c_sfe

(

cilist *

)

Definition at line 20 of file sfe.c.

References cilist::cierr, cilist::ciunit, err, fk_open(), FMT, MXUNIT, p, unit::ufd, and unit::ufmt.

Referenced by s_rsfe(), and s_wsfe().

00022 {       unit *p;
00023         if(a->ciunit >= MXUNIT || a->ciunit<0)
00024                 err(a->cierr,101,"startio");
00025         p = &f__units[a->ciunit];
00026         if(p->ufd==NULL && fk_open(SEQ,FMT,a->ciunit)) err(a->cierr,114,"sfe")
00027         if(!p->ufmt) err(a->cierr,102,"sfe")
00028         return(0);
00029 }

integer e_rsfe

(

Void

)

Definition at line 7 of file sfe.c.

References en_fio(), and f__fmtbuf.

Referenced by e_wsfe(), and MAIN__().

00008 {       int n;
00009         n=en_fio();
00010         if (f__cf == stdout)
00011                 fflush(stdout);
00012         else if (f__cf == stderr)
00013                 fflush(stderr);
00014         f__fmtbuf=NULL;
00015         return(n);
00016 }

integer e_wsfe

(

Void

)

Definition at line 30 of file sfe.c.

References e_rsfe(), en_fio(), err, and f__fmtbuf.

Referenced by ff_(), MAIN__(), parser_(), qqqerr_(), and set_().

00031 {
00032 #ifdef ALWAYS_FLUSH
00033         int n;
00034         n = en_fio();
00035         f__fmtbuf=NULL;
00036         if (!n && fflush(f__cf))
00037                 err(f__elist->cierr, errno, "write end");
00038         return n;
00039 #else
00040         return(e_rsfe());
00041 #endif
00042 }

Variable Documentation

char* f__fmtbuf

Definition at line 5 of file sfe.c.

Referenced by e_rsfe(), e_wsfe(), and f__fatal().

AFNI/NIfTI Server

Sections

Personal tools

Navigation

Doxygen Source Code Documentation

sfe.c File Reference

Functions

Variables

Function Documentation

Variable Documentation