Open64 (mfef90, whirl2f, and IR tools)  TAG: version-openad; SVN changeset: 916
util.c File Reference
#include <ctype.h>
#include <ffio.h>
#include <memory.h>
#include <string.h>
#include <unistd.h>
#include <sys/types.h>
#include <sys/stat.h>
#include "fio.h"
Include dependency graph for util.c:

Go to the source code of this file.

Functions

void _copy_n_trim (char *a, ftnlen alen, char *b)
void _b_char (char *a, char *b, ftnlen blen)
int _is_file_name (long n)
static void g_skip (char *a, int alen)
int _fortname (char *buf, unum_t n)

Function Documentation

void _b_char ( char *  a,
char *  b,
ftnlen  blen 
)

Definition at line 80 of file util.c.

References MIN.

Referenced by _f_inqu(), ttynamf90_(), and ttynamf90_8_().

void _copy_n_trim ( char *  a,
ftnlen  alen,
char *  b 
)

Definition at line 56 of file util.c.

Referenced by _f_inqu(), and _f_open().

int _fortname ( char *  buf,
unum_t  n 
)

Definition at line 172 of file util.c.

References _is_file_name(), and g_skip().

Referenced by _f_open().

Here is the call graph for this function:

int _is_file_name ( long  n)

Definition at line 104 of file util.c.

Referenced by _fcleanup(), _fortname(), _setunit(), and fmt_unit().

static void g_skip ( char *  a,
int  alen 
) [static]

Definition at line 145 of file util.c.

Referenced by _fortname().

 All Classes Namespaces Files Functions Variables Typedefs Enumerations Enumerator Friends Defines