17 lines
382 B
C
17 lines
382 B
C
/* f o p e n */
|
|
|
|
#include "stdiolib.h"
|
|
|
|
/*LINTLIBRARY*/
|
|
|
|
FILE *fopen F2(CONST char *, name, CONST char *, mode)
|
|
|
|
{
|
|
register int fd; /* opened file descriptor */
|
|
short flags; /* flag settings */
|
|
|
|
return (fd = __fopen(name, mode, -1, &flags)) < 0
|
|
? (FILE *) (NULL)
|
|
: __file((FILE *) NULL, fd, flags);
|
|
}
|