diff options
author | Dimitri van Heesch <dimitri@stack.nl> | 2012-08-11 13:06:22 (GMT) |
---|---|---|
committer | Dimitri van Heesch <dimitri@stack.nl> | 2012-08-11 13:06:22 (GMT) |
commit | 34cc61be7d0f6dafcaaa5fcdaa98ce4d31014634 (patch) | |
tree | ad481e345a35820f0142bb774556afc6de0d00fa /src/tclscanner.l | |
parent | 3583a7c0bea47665a06d14a64b62376eee21c528 (diff) | |
download | Doxygen-34cc61be7d0f6dafcaaa5fcdaa98ce4d31014634.zip Doxygen-34cc61be7d0f6dafcaaa5fcdaa98ce4d31014634.tar.gz Doxygen-34cc61be7d0f6dafcaaa5fcdaa98ce4d31014634.tar.bz2 |
Release-1.8.2
Diffstat (limited to 'src/tclscanner.l')
-rw-r--r-- | src/tclscanner.l | 12 |
1 files changed, 8 insertions, 4 deletions
diff --git a/src/tclscanner.l b/src/tclscanner.l index 7db791a..5a1ec1d 100644 --- a/src/tclscanner.l +++ b/src/tclscanner.l @@ -1790,7 +1790,8 @@ static void tcl_command_PROC() { D QCString myNs, myName; - Entry *myEntryNs, *myEntry; + Entry *myEntryNs; + Entry *myEntry; tcl_scan *myScan = tcl.scan.at(0); tcl_codify_cmd("keyword",0); @@ -2010,7 +2011,8 @@ static void tcl_command_OO_CLASS() { D QCString myNs, myName, myStr; - Entry *myEntryNs, *myEntryCl; + //Entry *myEntryNs; + Entry *myEntryCl; tcl_scan *myScan = tcl.scan.at(0); tcl_codify_cmd("keyword",0); @@ -2030,7 +2032,7 @@ D tcl.entry_current->bodyLine = tcl.line_body0; tcl.entry_current->endBodyLine = tcl.line_body1; tcl.entry_main->addSubEntry(tcl.entry_current); - myEntryNs = tcl_entry_namespace(myName); + //myEntryNs = tcl_entry_namespace(myName); tcl.cl.insert(myName,tcl.entry_current); myEntryCl = tcl.entry_current; myScan = tcl_scan_start(tcl.word_is,*tcl.list_commandwords.at(6), @@ -2559,7 +2561,8 @@ void TclLanguageScanner::parseCode(CodeOutputInterface & codeOutIntf, int endLine, bool inlineFragment, MemberDef *memberDef, - bool showLineNumbers + bool showLineNumbers, + Definition *searchCtx ) { (void)scopeName; @@ -2567,6 +2570,7 @@ void TclLanguageScanner::parseCode(CodeOutputInterface & codeOutIntf, (void)fileDef; (void)endLine; (void)inlineFragment; + (void)searchCtx; if (input.length()<1) return; tcl.input_string = input; |