[p5sagit/Function-Parameters.git] / t / foreign / Method-Signatures / func.t

#!perl
use strict;
use warnings FATAL => 'all';

use Test::More tests => 1;

use Function::Parameters qw(:strict);

fun echo($arg) {
    return $arg;
}

is echo(42), 42, "basic func";
Commit	Line	Data
633048d5	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";