diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/tclscanner.l | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/src/tclscanner.l b/src/tclscanner.l index 10aba97..2e15fc5 100644 --- a/src/tclscanner.l +++ b/src/tclscanner.l @@ -1173,6 +1173,7 @@ tcl_inf("line=%d type=%d '%s'\n",tcl.line_body0,type,content.data()); myScan->type[0] = type; break; case '?': + if (content.isEmpty()) break; if (content[0]=='"' && content[content.length()-1]=='"') myScan->type[0]='"'; if (content[0]=='{' && content[content.length()-1]=='}') myScan->type[0]='{'; if (content[0]=='[' && content[content.length()-1]==']') myScan->type[0]='['; |