1 files changed, 27 insertions, 0 deletions
diff --git a/lib/Math/BigInt/t/require.t b/lib/Math/BigInt/t/require.t
new file mode 100644
index 0000000000..f98dbebb45
--- /dev/null
+++ b/lib/Math/BigInt/t/require.t
@@ -0,0 +1,27 @@
+#!/usr/bin/perl -w
+
+use strict;
+use Test;
+
+BEGIN
+  {
+  $| = 1;
+  chdir 't' if -d 't';
+  unshift @INC, '../lib'; # for running manually
+  plan tests => 1;
+  } 
+
+my ($try,$ans,$x);
+
+require Math::BigInt; $x = Math::BigInt->new(1); ++$x;
+
+#$try = 'require Math::BigInt; $x = Math::BigInt->new(1); ++$x;';
+#$ans = eval $try || 'undef';
+#print "# For '$try'\n" if (!ok "$ans" , '2' ); 
+
+ok ($x||'undef',2);
+
+# all tests done
+
+1;
+