diff options
| author | Steve Bennett <steveb@workware.net.au> | 2011-11-09 07:17:56 +1000 |
|---|---|---|
| committer | Steve Bennett <steveb@workware.net.au> | 2011-11-09 07:18:25 +1000 |
| commit | 2fd47a708fb151565eaf6de2b555d2af1fbd820a (patch) | |
| tree | 172f8a8b069ca9d9a23836078c25ee75148c2945 /tests | |
| parent | e87b07712dc470c8a2a36be6a555edad16926747 (diff) | |
| download | jimtcl-2fd47a708fb151565eaf6de2b555d2af1fbd820a.zip jimtcl-2fd47a708fb151565eaf6de2b555d2af1fbd820a.tar.gz jimtcl-2fd47a708fb151565eaf6de2b555d2af1fbd820a.tar.bz2 | |
Fix a parsing bug for quoted orphan $
Signed-off-by: Steve Bennett <steveb@workware.net.au>
Diffstat (limited to 'tests')
| -rw-r--r-- | tests/parse.test | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/tests/parse.test b/tests/parse.test index 427a717..e352fc3 100644 --- a/tests/parse.test +++ b/tests/parse.test @@ -312,4 +312,12 @@ test parse-1.61 "quote in command" { lindex $x end } x +test parse-1.62 "quoted orphan dollar sign" { + set x "x$" +} {x$} + +test parse-1.63 "unquoted dollar sign" { + set x x$ +} {x$} + testreport |