File: common.plt

package info (click to toggle)
libpdl-ccs-perl 1.24.1-1
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid, trixie
  • size: 612 kB
  • sloc: perl: 2,720; makefile: 3; ansic: 3
file content (15 lines) | stat: -rw-r--r-- 344 bytes parent folder | download | duplicates (8) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
 
# -*- Mode: CPerl -*-
# File: t/common.plt
# Description: re-usable test subs for Math::PartialOrder

##-- common subs
BEGIN {
  use File::Basename;
  use Cwd;
  my $topdir = Cwd::abs_path(dirname(__FILE__)."/../../..");
  do "$topdir/t/common.plt" or die("$0: failed to load $topdir/t/common.plt: $@");
}

print "loaded ", __FILE__, "\n";
1;