diff options
| author | Stevan Little <stevan.little@iinteractive.com> | 2012-09-09 00:24:01 -0400 |
|---|---|---|
| committer | Stevan Little <stevan.little@iinteractive.com> | 2012-09-09 00:24:01 -0400 |
| commit | 906bcd2d0c4fc4b4c1bbfd6616fbc3c3ba550612 (patch) | |
| tree | cf8c08e98e5e4c5f351dfcb0d158490ee036cebc | |
| parent | 06bb7a74e07fa07b10af731945557f0fc5288704 (diff) | |
| download | fun-906bcd2d0c4fc4b4c1bbfd6616fbc3c3ba550612.tar.gz fun-906bcd2d0c4fc4b4c1bbfd6616fbc3c3ba550612.zip | |
tests to make phaylon happy
| -rw-r--r-- | t/defaults.t | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/t/defaults.t b/t/defaults.t index 7f710b6..c7505f3 100644 --- a/t/defaults.t +++ b/t/defaults.t @@ -45,4 +45,13 @@ fun baz ($a, $b = our $FOO) { our $FOO = "abc"; is(baz("123"), "123 abc"); +fun goorch ($x, $y = []) { + return $y +} + +my $goorch_y_1 = goorch( 10 ); +my $goorch_y_2 = goorch( 10 ); + +isnt($goorch_y_1, $goorch_y_2, '... not the same reference'); + done_testing; |