1
      2
      3
      4
      5
      6
      7
      8
      9
     10
     11
     12
     13
     14
     15
     16
<doc 17
     18

     19
<doc 20
     21

     22
<doc 23
     24

     25
<doc 26
     27

     28
     29
<doc 30
     31

     32
     33
     34
     35
     36
     37
     38
     39
     40
     41
     42
     43
     44
     45
/*
 *  This software is derived from f2c (http://www.netlib.org/f2c)
 *
 *  Copyright 1990, 1992 - 1997, 1999, 2000 by AT&T, Lucent Technologies
 *  and Bellcore.
 *
 *  See the LICENCE file for the permission notice and warranty disclaimer
 *  provided by the f2c authors.
 *
 */

#ifndef F77CRASH_LEX_H
#define F77CRASH_LEX_H 1

#include <string>

void
initLex();

int
yylex();

void
yyerror(const char *s);

void
flushLine();


void
doInputFile(const char *filename);

extern int   yyStatementNumber;
extern long  lineNumber;
extern char  *token;
extern int   tokenLength;

//
//  States determined and set/controlled by the parser
//
extern int   newDeclaration;
extern int   needKeyword;
extern bool  inioctl;

#endif // F77CRASH_LEX_H