diff options
| author | Jesse Luehrs <doy@tozt.net> | 2012-09-20 12:17:08 -0500 |
|---|---|---|
| committer | Jesse Luehrs <doy@tozt.net> | 2012-09-20 12:17:08 -0500 |
| commit | 1f52abc52ff0a3a57a5a38e9858edaf90a2a8ef5 (patch) | |
| tree | a5faf706965baf626feeb47623e3fb7ee468f98a /t/slurpy-syntax-errors.t | |
| parent | 5fd2d16154bc75b2174e9936999058daee900e3a (diff) | |
| download | fun-1f52abc52ff0a3a57a5a38e9858edaf90a2a8ef5.tar.gz fun-1f52abc52ff0a3a57a5a38e9858edaf90a2a8ef5.zip | |
error if a parameter is declared after a slurpy parameter
Diffstat (limited to 't/slurpy-syntax-errors.t')
| -rw-r--r-- | t/slurpy-syntax-errors.t | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/t/slurpy-syntax-errors.t b/t/slurpy-syntax-errors.t index 9f8ce3f..2b08d28 100644 --- a/t/slurpy-syntax-errors.t +++ b/t/slurpy-syntax-errors.t @@ -15,4 +15,14 @@ use Fun; ok $@, '... got an error'; } +{ + eval 'fun ( $foo, @bar, %baz ) { return [] }'; + ok $@, '... got an error'; +} + +{ + eval 'fun ( $foo, %bar, @baz ) { return {} }'; + ok $@, '... got an error'; +} + done_testing; |