Defines | Functions

scan.c File Reference

#include <fortran.h>
#include <string.h>
Include dependency graph for scan.c:

Go to the source code of this file.

Defines

#define WORDS   4
#define BITS   63
#define MASK   03
#define SHIFT   2
#define FOUND(a)   (mask[a & MASK] << (a >> SHIFT)) < 0

Functions

_f_int _SCAN (_fcd str1, _fcd str2, _f_log *back)

Define Documentation

#define BITS   63

Definition at line 71 of file scan.c.

Referenced by _SCAN().

#define FOUND (   a  )     (mask[a & MASK] << (a >> SHIFT)) < 0
#define MASK   03

Definition at line 72 of file scan.c.

Referenced by _SCAN().

#define SHIFT   2

Definition at line 73 of file scan.c.

Referenced by _SCAN().

#define WORDS   4

Definition at line 70 of file scan.c.


Function Documentation

_f_int _SCAN ( _fcd  str1,
_fcd  str2,
_f_log *  back 
)

Definition at line 84 of file scan.c.

References _fcdlen(), _fcdtocp(), _ltob(), BITS, FOUND, MASK, NULL, and SHIFT.

Here is the call graph for this function: