swig/Examples/test-suite/perl5/sneaky1_runme.pl
Karl Wette 7cd9063b52 Remove execute permissions from various non-executable files
- source files and Makefiles need never be executable
- scripts are run directly by their interpreters in the
  test suites, so also do not need to be executable
2014-05-02 20:06:11 +02:00

13 lines
277 B
Perl

#!/usr/bin/perl
use strict;
use warnings;
use Test::More 'no_plan';
BEGIN { use_ok('sneaky1') }
require_ok('sneaky1');
# adapted from ../python/sneaky1_runme.py
is(sneaky1::add(3,4), 7);
is(sneaky1::subtract(3,4), -1);
is(sneaky1::mul(3,4), 12);
is(sneaky1::divide(3,4), 0);