From 1f52abc52ff0a3a57a5a38e9858edaf90a2a8ef5 Mon Sep 17 00:00:00 2001 From: Jesse Luehrs Date: Thu, 20 Sep 2012 12:17:08 -0500 Subject: error if a parameter is declared after a slurpy parameter --- t/slurpy-syntax-errors.t | 10 ++++++++++ 1 file changed, 10 insertions(+) (limited to 't/slurpy-syntax-errors.t') 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; -- cgit v1.2.3-54-g00ecf