t/foreign/Method-Signatures/func.t

   1 #!perl
   2 use strict;
   3 use warnings FATAL => 'all';
   4
   5 use Test::More tests => 1;
   6
   7 use Function::Parameters qw(:strict);
   8
   9 fun echo($arg) {
  10     return $arg;
  11 }
  12
  13 is echo(42), 42, "basic func";