several testcases for perl
git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk@10403 626c5289-ae23-0410-ae9c-e8d60b6d4f22
This commit is contained in:
parent
ef7c0cbbd2
commit
8b713d759d
53 changed files with 2037 additions and 486 deletions
12
Examples/test-suite/perl5/enum_template_runme.pl
Executable file
12
Examples/test-suite/perl5/enum_template_runme.pl
Executable file
|
|
@ -0,0 +1,12 @@
|
|||
#!/usr/bin/perl
|
||||
use strict;
|
||||
use warnings;
|
||||
use Test::More tests => 4;
|
||||
BEGIN { use_ok('enum_template') }
|
||||
require_ok('enum_template');
|
||||
|
||||
# adapted from ../python/enum_template_runme.py
|
||||
|
||||
is(enum_template::MakeETest(), 1);
|
||||
|
||||
is(enum_template::TakeETest(0), undef);
|
||||
Loading…
Add table
Add a link
Reference in a new issue