File: pushfile.cc

package info (click to toggle)
icmake 13.05.01-1
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid
  • size: 7,132 kB
  • sloc: cpp: 11,595; fortran: 883; makefile: 853; sh: 546; pascal: 342
file content (20 lines) | stat: -rw-r--r-- 664 bytes parent folder | download | duplicates (3) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
 
//#define XERR
#include "scanner.ih"

void Scanner::pushFile()
{
    d_fileStack.top().second = lineNr();

    string name = matched().substr(2);              // the next filename

    setFilename(name);                              // update the scanner's
                                                    // current filename
    d_filenames += name + '\n';

    d_input->setLineNr(1);                          // and line nr

    d_fileStack.push( { filename(), 1 } );          // push the current 
                                                    // file name and line nr

xerr("stack[" << d_fileStack.size() << "]: " << filename() << ", " << lineNr());
}