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 | c8ca74c7d7a6e1830ed62b121b44e62dd40b88b2 (patch) | |
| tree | 07be3a0a4aa7c4877e67583773d65a5f08390630 /tests/assemble.test | |
| parent | 65bdd90b0360e0c35ee9d78947d2e66c794ffb6f (diff) | |
| download | tcl-c8ca74c7d7a6e1830ed62b121b44e62dd40b88b2.zip tcl-c8ca74c7d7a6e1830ed62b121b44e62dd40b88b2.tar.gz tcl-c8ca74c7d7a6e1830ed62b121b44e62dd40b88b2.tar.bz2 | |
Tests of [assemble] use of compiled index values.
Diffstat (limited to 'tests/assemble.test')
| -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 |