aboutsummaryrefslogtreecommitdiff
path: root/jim.c
diff options
context:
space:
mode:
authorSteve Bennett <steveb@workware.net.au>2011-05-23 15:45:13 +1000
committerSteve Bennett <steveb@workware.net.au>2011-05-23 16:20:50 +1000
commit02ae800eb611f489e43b9924c8d7fc18e534a726 (patch)
treeab46a6afced07c8fbaf951dc257551c2df1401a2 /jim.c
parentd6606a992d859230bb8a989ec96603407f6e79fe (diff)
downloadjimtcl-02ae800eb611f489e43b9924c8d7fc18e534a726.zip
jimtcl-02ae800eb611f489e43b9924c8d7fc18e534a726.tar.gz
jimtcl-02ae800eb611f489e43b9924c8d7fc18e534a726.tar.bz2
Fix some minor parsing bugs
And add additional tests Signed-off-by: Steve Bennett <steveb@workware.net.au>
Diffstat (limited to 'jim.c')
-rw-r--r--jim.c3
1 files changed, 2 insertions, 1 deletions
diff --git a/jim.c b/jim.c
index 8e159f2..3077d75 100644
--- a/jim.c
+++ b/jim.c
@@ -1143,8 +1143,9 @@ static int JimParseScript(struct JimParserCtx *pc)
}
switch (*(pc->p)) {
case '\\':
- if (*(pc->p + 1) == '\n')
+ if (*(pc->p + 1) == '\n' && pc->state == JIM_PS_DEF) {
return JimParseSep(pc);
+ }
else {
pc->comment = 0;
return JimParseStr(pc);