diff options
| author | dgp <dgp@users.sourceforge.net> | 2018-03-07 13:40:54 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2018-03-07 13:40:54 (GMT) |
| commit | f003df5624ef84697f69a9b130bf014e90fb0d31 (patch) | |
| tree | 07be3a0a4aa7c4877e67583773d65a5f08390630 /tests | |
| parent | 9fb94718075b45530e0a14cc39ddbb9185d9bf48 (diff) | |
| download | tcl-f003df5624ef84697f69a9b130bf014e90fb0d31.zip tcl-f003df5624ef84697f69a9b130bf014e90fb0d31.tar.gz tcl-f003df5624ef84697f69a9b130bf014e90fb0d31.tar.bz2 | |
Tests of [assemble] use of compiled index values.
Diffstat (limited to 'tests')
| -rw-r--r-- | tests/assemble.test | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/tests/assemble.test b/tests/assemble.test index 5231048..40c132d 100644 --- a/tests/assemble.test +++ b/tests/assemble.test @@ -1584,6 +1584,12 @@ test assemble-15.7 {listIndexImm} { } -result c } +test assemble-15.8 {listIndexImm} { + assemble {push {a b c}; listIndexImm end+2} +} {} +test assemble-15.9 {listIndexImm} { + assemble {push {a b c}; listIndexImm -1-1} +} {} # assemble-16 - invokeStk |