diff options
Diffstat (limited to 't/100-errors.t')
-rw-r--r-- | t/100-errors.t | 12 |
1 files changed, 8 insertions, 4 deletions
diff --git a/t/100-errors.t b/t/100-errors.t index 3bd23e1..b2c2d7c 100644 --- a/t/100-errors.t +++ b/t/100-errors.t @@ -14,10 +14,14 @@ $te->execute("5j"); for my $cmd (@test_cmds) { throws_ok { $te->execute("100$cmd") } qr/Pointer off page/, "moving the pointer off the end of the buffer ($cmd)"; - is($te->pointer, 5); - is($te->buffer, $buftext); + is($te->pointer, 5, + "pointer position after moving off the buffer end ($cmd)"); + is($te->buffer, $buftext, + "buffer contents after moving off the buffer end ($cmd)"); throws_ok { $te->execute("-100$cmd") } qr/Pointer off page/, "moving the pointer off the beginning of the buffer ($cmd)"; - is($te->pointer, 5); - is($te->buffer, $buftext); + is($te->pointer, 5, + "pointer position after moving off the buffer beginning ($cmd)"); + is($te->buffer, $buftext, + "buffer contents after moving off the buffer beginning ($cmd)"); } |