]> git.vpit.fr Git - perl/modules/Variable-Magic.git/blob - t/01-import.t
Convert t/30-scalar.t to the new testing framework
[perl/modules/Variable-Magic.git] / t / 01-import.t
1 #!perl -T
2
3 use strict;
4 use warnings;
5
6 use Test::More tests => 19;
7
8 require Variable::Magic;
9
10 for (qw/wizard gensig getsig cast getdata dispell SIG_MIN SIG_MAX SIG_NBR MGf_COPY MGf_DUP MGf_LOCAL VMG_UVAR VMG_COMPAT_ARRAY_PUSH_NOLEN VMG_COMPAT_ARRAY_UNSHIFT_NOLEN_VOID VMG_COMPAT_ARRAY_UNDEF_CLEAR VMG_COMPAT_SCALAR_LENGTH_NOLEN VMG_PERL_PATCHLEVEL VMG_THREADSAFE/) {
11  eval { Variable::Magic->import($_) };
12  is($@, '', 'import ' . $_);
13 }