6 use Test::More tests => 21;
8 require Variable::Magic;
10 for (qw/wizard gensig getsig cast getdata dispell
11 SIG_MIN SIG_MAX SIG_NBR
12 MGf_COPY MGf_DUP MGf_LOCAL VMG_UVAR
13 VMG_COMPAT_ARRAY_PUSH_NOLEN VMG_COMPAT_ARRAY_UNSHIFT_NOLEN_VOID
14 VMG_COMPAT_ARRAY_UNDEF_CLEAR VMG_COMPAT_SCALAR_LENGTH_NOLEN
17 VMG_OP_INFO_NAME VMG_OP_INFO_OBJECT/) {
18 eval { Variable::Magic->import($_) };
19 is($@, '', 'import ' . $_);