summaryrefslogtreecommitdiffstats
path: root/src/tclscanner.l
diff options
context:
space:
mode:
authorDimitri van Heesch <dimitri@stack.nl>2014-10-25 17:09:31 (GMT)
committerDimitri van Heesch <dimitri@stack.nl>2014-10-25 17:09:31 (GMT)
commita31c9fffec6b5145ac8509d77da826d2e196ed1e (patch)
tree87498442016dfae3727b3e34c31feef1ca21cac6 /src/tclscanner.l
parent79ed06502c3abca083f2e231f09fc8101862fcf6 (diff)
downloadDoxygen-a31c9fffec6b5145ac8509d77da826d2e196ed1e.zip
Doxygen-a31c9fffec6b5145ac8509d77da826d2e196ed1e.tar.gz
Doxygen-a31c9fffec6b5145ac8509d77da826d2e196ed1e.tar.bz2
Compilation fixes for Windows for new string implementation.
Diffstat (limited to 'src/tclscanner.l')
-rw-r--r--src/tclscanner.l10
1 files changed, 7 insertions, 3 deletions
diff --git a/src/tclscanner.l b/src/tclscanner.l
index 88e3d1d..f162637 100644
--- a/src/tclscanner.l
+++ b/src/tclscanner.l
@@ -2833,14 +2833,18 @@ tcl_inf("TCL_SUBST: use '%s'\n",s);
}
}
- if (tcl.input_string.at(tcl.input_string.length()-1) == '\n')
+ if (tcl.input_string.at(tcl.input_string.length()-1) == 0x1A)
+ {
+ }
+ else if (tcl.input_string.at(tcl.input_string.length()-1) == '\n')
{
tcl.input_string[tcl.input_string.length()-1] = 0x1A;
- }
- else
+ }
+ else
{
tcl.input_string += 0x1A;
}
+
tcl.code = NULL;
tcl.code_font=NULL;
tcl.code_line=1;