enable trim_trailing_whitespace
This commit is contained in:
1 parent
cd36c03da4
commit
db693d4930
99 files changed
+515
-513
No files matched your search
@@ -97,7 +97,7 @@ foreach $ext ( @ARGV ) {
|
||||
next;
|
||||
}
|
||||
print "Creating template structure "
|
||||
. "for $extname (of type $exttypename)\n" if $Debug;
|
||||
. "for $extname (of type $exttypename)\n" if $Debug;
|
||||
find(\&FCopyTree, "$top/$exttypename/");
|
||||
if ($note) {
|
||||
print "\nNOTE: You must add the line \"DIRS += $extname\" to src/Makefile.\n\n";
|
||||
@@ -146,7 +146,7 @@ sub get_commandline_opts { #no args
|
||||
}
|
||||
close IN;
|
||||
}
|
||||
if("$top" eq "") {
|
||||
if("$top" eq "") {
|
||||
if ($eTOP) { # third choice is $ENV{EPICS_MBE_TEMPL_TOP}
|
||||
$top = UnixPath($eTOP);
|
||||
} else { # use templates from EPICS base
|
||||
@@ -163,7 +163,7 @@ sub get_commandline_opts { #no args
|
||||
|
||||
# Extension template type
|
||||
if ($opt_t) { # first choice is -t type
|
||||
$exttype = $opt_t;
|
||||
$exttype = $opt_t;
|
||||
} elsif ($eEXTTYPE) { # second choice is $ENV{EPICS_DEFAULT_EXT_TYPE}
|
||||
$exttype = $eEXTTYPE;
|
||||
} elsif (-r "$top/defaultExt") {# third choice is (a link) in the $top dir
|
||||
@@ -276,7 +276,7 @@ EPICS_MBE_DEF_EXT_TYPE Ext type you want to use as default
|
||||
EPICS_MBE_TEMPLATE_TOP Template top directory
|
||||
EPICS_MBE_BASE Location of EPICS base
|
||||
|
||||
Example: Create example extension
|
||||
Example: Create example extension
|
||||
|
||||
<base>/bin/<arch>/makeBaseExt.pl -t example example
|
||||
|
||||
|
||||
@@ -6,7 +6,7 @@
|
||||
# Operator of Los Alamos National Laboratory.
|
||||
# SPDX-License-Identifier: EPICS
|
||||
# EPICS Base is distributed subject to a Software License Agreement found
|
||||
# in the file LICENSE that is included with this distribution.
|
||||
# in the file LICENSE that is included with this distribution.
|
||||
#*************************************************************************
|
||||
|
||||
# Find and delete cvs .#* and editor backup *~
|
||||
|
||||
@@ -6,7 +6,7 @@
|
||||
# Operator of Los Alamos National Laboratory.
|
||||
# SPDX-License-Identifier: EPICS
|
||||
# EPICS Base is distributed subject to a Software License Agreement found
|
||||
# in file LICENSE that is included with this distribution.
|
||||
# in file LICENSE that is included with this distribution.
|
||||
#*************************************************************************
|
||||
|
||||
# Converts text file in DOS CR/LF format to unix ISO format
|
||||
|
||||
@@ -6,7 +6,7 @@
|
||||
# Operator of Los Alamos National Laboratory.
|
||||
# SPDX-License-Identifier: EPICS
|
||||
# EPICS BASE is distributed subject to a Software License Agreement found
|
||||
# in file LICENSE that is included with this distribution.
|
||||
# in file LICENSE that is included with this distribution.
|
||||
#*************************************************************************
|
||||
#
|
||||
# InstallEpics.pl
|
||||
|
||||
@@ -6,7 +6,7 @@
|
||||
# Operator of Los Alamos National Laboratory.
|
||||
# SPDX-License-Identifier: EPICS
|
||||
# EPICS Base is distributed subject to a Software License Agreement found
|
||||
# in file LICENSE that is included with this distribution.
|
||||
# in file LICENSE that is included with this distribution.
|
||||
#*************************************************************************
|
||||
#
|
||||
# makeMakefile.pl
|
||||
|
||||
+5
-5
@@ -7,7 +7,7 @@
|
||||
# Operator of Los Alamos National Laboratory.
|
||||
# SPDX-License-Identifier: EPICS
|
||||
# EPICS BASE is distributed subject to a Software License Agreement found
|
||||
# in file LICENSE that is included with this distribution.
|
||||
# in file LICENSE that is included with this distribution.
|
||||
#*************************************************************************
|
||||
#-----------------------------------------------------------------------
|
||||
# mkmf.pl: Perl script to create #include file dependencies
|
||||
@@ -72,9 +72,9 @@ print "\n ALL DONE \n\n" if $debug;
|
||||
|
||||
#----------------------------------------
|
||||
sub printList{
|
||||
my $depFile = shift;
|
||||
my $objFile = shift;
|
||||
my $file;
|
||||
my $depFile = shift;
|
||||
my $objFile = shift;
|
||||
my $file;
|
||||
|
||||
unlink($depFile) or die "Can't delete $depFile: $!\n" if -f $depFile;
|
||||
|
||||
@@ -103,7 +103,7 @@ sub scanFile {
|
||||
foreach $line ( <FILE> ) {
|
||||
$incfile = findNextIncName($line,$file=~/\.substitutions$/);
|
||||
next if !$incfile;
|
||||
next if $output{$incfile};
|
||||
next if $output{$incfile};
|
||||
push @includes,$incfile;
|
||||
$output{$incfile} = 1;
|
||||
}
|
||||
|
||||
+1
-1
@@ -6,7 +6,7 @@
|
||||
# Operator of Los Alamos National Laboratory.
|
||||
# SPDX-License-Identifier: EPICS
|
||||
# EPICS BASE is distributed subject to a Software License Agreement found
|
||||
# in the file LICENSE that is included with this distribution.
|
||||
# in the file LICENSE that is included with this distribution.
|
||||
#*************************************************************************
|
||||
|
||||
use strict;
|
||||
|
||||
@@ -6,7 +6,7 @@
|
||||
# Operator of Los Alamos National Laboratory.
|
||||
# SPDX-License-Identifier: EPICS
|
||||
# EPICS Base is distributed subject to a Software License Agreement found
|
||||
# in file LICENSE that is included with this distribution.
|
||||
# in file LICENSE that is included with this distribution.
|
||||
#*************************************************************************
|
||||
|
||||
# Called from within the object directory
|
||||
|
||||
@@ -57,7 +57,7 @@ will display it (neither has an effect when --puretap is specified).
|
||||
Pod::Usage
|
||||
TAP::Parser
|
||||
Time::HiRes
|
||||
XML::Generator
|
||||
XML::Generator
|
||||
|
||||
=head1 BUGS
|
||||
|
||||
@@ -194,7 +194,7 @@ exit;
|
||||
|
||||
sub _get_junit_xml {
|
||||
my ( $xmlgen, $properties, $test_results ) = @_;
|
||||
my $xml = "<?xml version='1.0' encoding='UTF-8' ?>\n" .
|
||||
my $xml = "<?xml version='1.0' encoding='UTF-8' ?>\n" .
|
||||
$xmlgen->testsuites({
|
||||
name => $suite_name,
|
||||
}, @$test_results);
|
||||
@@ -439,13 +439,13 @@ sub _parse_tests {
|
||||
push @{$ctx->{test_cases}}, $xmlgen->testcase($test_case);
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
$ctx->{sysout} .= $s."\n";
|
||||
}
|
||||
|
||||
if (scalar(@{$ctx->{test_cases}}) == 0 &&
|
||||
scalar(@{$ctx->{testsuites}}) == 0)
|
||||
{
|
||||
{
|
||||
# no tests found! create a <testsuite> block containing *something* at least
|
||||
$ctx->{case_tests}++;
|
||||
my $test_case = {
|
||||
|
||||
Reference in new issue
Block a user