--- /dev/null
+#!perl -T
+
+#use Test::More tests => 39;
+use Test::More qw(no_plan);
+#use Equinox::Migration::MapDrivenXMLProc;
+is (1,1);
+exit;
+# baseline object creation
+#my $sm = Equinox::Migration::MapDrivenXMLProc->new();
+#is(ref $sm, "Equinox::Migration::MapDrivenXMLProc", "self is self");
+