Functions | Variables
fortrancode.h File Reference
#include "types.h"

Go to the source code of this file.

Functions

void parseFortranCode (CodeOutputInterface &, const char *, const QCString &, bool, const char *, FileDef *fd, int startLine, int endLine, bool inlineFragment, MemberDef *memberDef, bool showLineNumbers, Definition *searchCtx, bool collectRefs, FortranFormat format)
 
void resetFortranCodeParserState ()
 
void codeFreeScanner ()
 

Variables

const int fixedCommentAfter = 72
 

Function Documentation

void codeFreeScanner ( )

Definition at line 16505 of file code.cpp.

16506 {
16507 #if defined(YY_FLEX_SUBMINOR_VERSION)
16508  if (g_lexInit)
16509  {
16511  }
16512 #endif
16513 }
static bool g_lexInit
Definition: code.cpp:10660
int codeYYlex_destroy(void)
Definition: code.cpp:16257
void parseFortranCode ( CodeOutputInterface ,
const char *  ,
const QCString ,
bool  ,
const char *  ,
FileDef fd,
int  startLine,
int  endLine,
bool  inlineFragment,
MemberDef memberDef,
bool  showLineNumbers,
Definition searchCtx,
bool  collectRefs,
FortranFormat  format 
)

Definition at line 29831 of file fortrancode.cpp.

29836 {
29837  //printf("***parseCode() exBlock=%d exName=%s fd=%p\n",exBlock,exName,fd);
29838 
29839  // used parameters
29840  (void)memberDef;
29841  (void)className;
29842 
29843  if (s.isEmpty()) return;
29844  printlex(fortrancodeYY_flex_debug, TRUE, __FILE__, fd ? fd->fileName().data(): NULL);
29846  g_code = &od;
29847  g_inputString = s;
29848  g_inputPosition = 0;
29849  g_isFixedForm = recognizeFixedForm((const char*)s,format);
29850  g_currentFontClass = 0;
29852  g_searchCtx = searchCtx;
29854  if (endLine!=-1)
29855  g_inputLines = endLine+1;
29856  else
29858 
29859  if (startLine!=-1)
29860  g_yyLineNr = startLine;
29861  else
29862  g_yyLineNr = 1;
29863 
29864  g_exampleBlock = exBlock;
29865  g_exampleName = exName;
29866  g_sourceFileDef = fd;
29867  if (exBlock && fd==0)
29868  {
29869  // create a dummy filedef for the example
29870  g_sourceFileDef = new FileDef("",exName);
29871  }
29872  if (g_sourceFileDef)
29873  {
29874  setCurrentDoc("l00001");
29875  }
29876  g_currentDefinition = 0;
29877  g_currentMemberDef = 0;
29878  if (!g_exampleName.isEmpty())
29879  {
29881  }
29882  g_includeCodeFragment = inlineFragment;
29883  startCodeLine();
29884  g_parmName.resize(0);
29885  g_parmType.resize(0);
29887  BEGIN( Start );
29888  fortrancodeYYlex();
29889  if (g_needsTermination)
29890  {
29891  endFontClass();
29892  g_code->endCodeLine();
29893  }
29894  if (fd)
29895  {
29897  }
29898  if (exBlock && g_sourceFileDef)
29899  {
29900  // delete the temporary file definition used for this example
29901  delete g_sourceFileDef;
29902  g_sourceFileDef=0;
29903  }
29904  printlex(fortrancodeYY_flex_debug, FALSE, __FILE__, fd ? fd->fileName().data(): NULL);
29905  return;
29906 }
static void setCurrentDoc(const QCString &anchor)
void fortrancodeYYrestart(FILE *input_file)
bool resize(uint newlen)
Definition: qcstring.h:225
static QCString g_parmType
static MemberDef * g_currentMemberDef
bool isEmpty() const
Definition: qcstring.h:189
void printlex(int dbg, bool enter, const char *lexName, const char *fileName)
Definition: message.cpp:242
FILE * fortrancodeYYin
static bool format(QChar::Decomposition tag, QString &str, int index, int len)
Definition: qstring.cpp:11496
const bool FALSE
Definition: qglobal.h:370
static bool g_collectXRefs
static QCString className
Definition: declinfo.cpp:669
static int g_yyLineNr
current line number
void clearTooltips()
Definition: tooltip.cpp:54
static bool recognizeFixedForm(const char *contents, FortranFormat format)
static bool g_includeCodeFragment
static QCString g_exampleName
static QCString g_exampleFile
#define BEGIN
static int g_inputLines
number of line in the code fragment
static Definition * g_searchCtx
static bool g_needsTermination
static QCString g_parmName
static void startCodeLine()
static void endFontClass()
const char * data() const
Definition: qcstring.h:207
static FileDef * g_sourceFileDef
static int g_inputPosition
read offset during parsing
static const char * g_currentFontClass
static CodeOutputInterface * g_code
contents of fortran string
void writeTooltips(CodeOutputInterface &ol)
Definition: tooltip.cpp:93
#define Start
static bool g_exampleBlock
int fortrancodeYYlex(void)
static bool g_isFixedForm
static TooltipManager * instance()
Definition: tooltip.cpp:45
QCString fileName() const
Definition: filedef.h:81
QCString convertNameToFile(const char *name, bool allowDots, bool allowUnderscore)
Definition: util.cpp:5354
int fortrancodeYY_flex_debug
virtual void endCodeLine()=0
static QCString * s
Definition: config.cpp:1042
const bool TRUE
Definition: qglobal.h:371
static const char * g_inputString
the code fragment as text
bool collectXRefs
static int countLines()
static Definition * g_currentDefinition
void resetFortranCodeParserState ( )

Definition at line 29829 of file fortrancode.cpp.

29829 {}

Variable Documentation

const int fixedCommentAfter = 72

Definition at line 37 of file fortrancode.h.