source: trunk/gcc/libf2c/libI77/fmt.h@ 3103

struct syl
{
  int op;
  int p1;
  union
  {
    int i[2];
    char *s;
  }
  p2;
};
#define RET1 1
#define REVERT 2
#define GOTO 3
#define X 4
#define SLASH 5
#define STACK 6
#define I 7
#define ED 8
#define NED 9
#define IM 10
#define APOS 11
#define H 12
#define TL 13
#define TR 14
#define T 15
#define COLON 16
#define S 17
#define SP 18
#define SS 19
#define P 20
#define BN 21
#define BZ 22
#define F 23
#define E 24
#define EE 25
#define D 26
#define G 27
#define GE 28
#define L 29
#define A 30
#define AW 31
#define O 32
#define NONL 33
#define OM 34
#define Z 35
#define ZM 36
extern int f__pc, f__parenlvl, f__revloc;
typedef union
{
  real pf;
  doublereal pd;
}
ufloat;
typedef union
{
  short is;
  signed char ic;
  integer il;
#ifdef Allow_TYQUAD