author | Andreas Thurnherr <ant@ldeo.columbia.edu> |
Tue, 05 Mar 2019 10:03:40 -0500 | |
changeset 38 | 15c603bc4f70 |
parent 36 | 04e8cb4f8073 |
child 41 | fa41b3a72c97 |
permissions | -rw-r--r-- |
0 | 1 |
#!/usr/bin/perl |
2 |
#====================================================================== |
|
9
1a7983cbb82a
automatic version checking; abbreviated layout and %PARAM def; ubtest okay
A.M. Thurnherr <athurnherr@yahoo.com>
parents:
8
diff
changeset
|
3 |
# A N T S . P L |
0 | 4 |
# doc: Fri Jun 19 14:01:06 1998 |
36 | 5 |
# dlm: Tue Nov 27 12:57:36 2018 |
0 | 6 |
# (c) 1998 A.M. Thurnherr |
36 | 7 |
# uE-Info: 27 60 NIL 0 0 72 2 2 4 NIL ofnI |
0 | 8 |
#====================================================================== |
9 |
||
10 |
# HISTORY: |
|
11 |
# Jun 19, 1998: - apparently created |
|
12 |
# Jul 3, 2006: - added support for ANTS_PERL |
|
13 |
# Jul 5, 2006: - removed `basename` |
|
14 |
# Jul 19, 2006: - added error if exec($ANTS_PERL) fails |
|
3 | 15 |
# Sep 24, 2012: - added support for $ANTSLIB |
20 | 16 |
# Oct 29, 2014: - added $antsLibVersion with compile-time version check (V6.0) |
17 |
# May 17, 2015: - updated to V6.1 |
|
23
a4fef65fd959
V6.2 release candidate
A.M. Thurnherr <athurnherr@yahoo.com>
parents:
20
diff
changeset
|
18 |
# Oct 12, 2015: - updated to V6.2 (for LADCP_w 1.0) |
26 | 19 |
# Mar 8, 2016: - updated to V6.3 (for LADCP_w 1.2beta) |
20 |
# Mar 16, 2016: - updated to V6.4 (for LADCP_w 1.2beta5) |
|
27 | 21 |
# Mar 17, 2016: - updated to V6.5 |
28 | 22 |
# Mar 29, 2016: - updated to V6.6 |
29
f41d125405a6
version after ECOGIG EN586 cruise
A.M. Thurnherr <athurnherr@yahoo.com>
parents:
28
diff
changeset
|
23 |
# Aug 5, 2016: - updated to V6.7 |
30 | 24 |
# Mar 12, 2017: - updated to V6.8 (for LADCP_w 1.3 release) |
33
f891ea33a728
after Hamburg visit
Andreas Thurnherr <ant@ldeo.columbia.edu>
parents:
30
diff
changeset
|
25 |
# Nov 20, 2017: - updated to V6.9 (for DT KVH software) |
35 | 26 |
# Dec 8, 2017: - updated to V7.0 (to avoid absolute-path symlink) |
36 | 27 |
# Nov 27, 2018: - updaetd to V7.1 (for LADCP_w 1.4 release) |
0 | 28 |
|
29 |
exec($ENV{ANTS_PERL},$0,@ARGV),die("$ENV{ANTS_PERL}: $!") |
|
30 |
if (defined($ENV{ANTS_PERL}) && $^X ne $ENV{ANTS_PERL}); |
|
31 |
||
36 | 32 |
$antsLibVersion = 7.1; |
26 | 33 |
|
9
1a7983cbb82a
automatic version checking; abbreviated layout and %PARAM def; ubtest okay
A.M. Thurnherr <athurnherr@yahoo.com>
parents:
8
diff
changeset
|
34 |
die(sprintf("$0: obsolete library V%.1f; V%.1f required\n", |
1a7983cbb82a
automatic version checking; abbreviated layout and %PARAM def; ubtest okay
A.M. Thurnherr <athurnherr@yahoo.com>
parents:
8
diff
changeset
|
35 |
$antsLibVersion,$antsMinLibVersion)) |
1a7983cbb82a
automatic version checking; abbreviated layout and %PARAM def; ubtest okay
A.M. Thurnherr <athurnherr@yahoo.com>
parents:
8
diff
changeset
|
36 |
if (!defined($antsMinLibVersion) || $antsMinLibVersion>$antsLibVersion); |
8 | 37 |
|
3 | 38 |
if (defined($ANTSLIB)) { # new style (V5) |
39 |
require "$ANTSLIB/antsusage.pl"; |
|
40 |
require "$ANTSLIB/antsio.pl"; |
|
41 |
require "$ANTSLIB/antsutils.pl"; |
|
42 |
require "$ANTSLIB/antsexprs.pl"; |
|
43 |
$ANTS = $ANTSLIB; # backward compatibility |
|
44 |
} elsif (defined($ANTS)) { # old style |
|
45 |
require "$ANTS/antsusage.pl"; |
|
46 |
require "$ANTS/antsio.pl"; |
|
47 |
require "$ANTS/antsutils.pl"; |
|
48 |
require "$ANTS/antsexprs.pl"; |
|
49 |
} else { |
|
50 |
die("neither \$ANTS nor \$ANTSLIB defined\n"); |
|
51 |
} |
|
0 | 52 |
|
53 |
1; |