diff options
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; |