diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-04-14 14:30:35 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-04-14 14:30:35 (GMT) |
| commit | 6a0b66fc79d01eac04951c8d0bd0a4412c3b9c91 (patch) | |
| tree | 740553533208a7d59ce076bc595179164dfb10ee /generic/tclParse.c | |
| parent | 527a481e1a5488fe6c9f00e9b9531b78c52ca8cc (diff) | |
| parent | 1faed93cada29bd263dfed0b7b5df50e86defd39 (diff) | |
| download | tcl-6a0b66fc79d01eac04951c8d0bd0a4412c3b9c91.zip tcl-6a0b66fc79d01eac04951c8d0bd0a4412c3b9c91.tar.gz tcl-6a0b66fc79d01eac04951c8d0bd0a4412c3b9c91.tar.bz2 | |
Merge 8.7
Diffstat (limited to 'generic/tclParse.c')
| -rw-r--r-- | generic/tclParse.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclParse.c b/generic/tclParse.c index 3bf05f7..92c148b 100644 --- a/generic/tclParse.c +++ b/generic/tclParse.c @@ -1763,7 +1763,7 @@ Tcl_ParseBraces( openBrace = 0; break; case '#' : - if (openBrace && TclIsSpaceProc(src[-1])) { + if (openBrace && TclIsSpaceProcM(src[-1])) { Tcl_AppendToObj(Tcl_GetObjResult(parsePtr->interp), ": possible unbalanced brace in comment", -1); goto error; |