This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
In buildtoc, remove whitespace only lines just before output.
[perl5.git] / vms / make_command.com
1 $! MAKE_COMMAND.COM
2 $! Record MM[SK]/Make parameters in configuration report
3 $!
4 $! Author:  Peter Prymmer <pvhp@lns62.lns.cornell.edu>
5 $! Version: 1.0  18-Jan-1996
6 $!
7 $! DCL usage (choose one):
8 $!      @MAKE_COMMAND                      !or
9 $!      @MAKE_COMMAND/OUTPUT=MYCONFIG.OUT
10 $!------------------------------------------------
11 $ $mms = "'"+p1
12 $ $makeline = p2+" "+p3+" "+p4+" "+p5+" "+p6+" "+p7+" "+p8
13 $quotable:
14 $ if f$locate("""",$makeline).lt.f$length($makeline)
15 $   then
16 $   $makeline = $makeline - """"
17 $   goto quotable
18 $ endif
19 $ $makeline = f$edit($makeline,"COMPRESS,TRIM")
20 $ write sys$output " make_cmd=''$mms'"+" ''$makeline''"
21 $!------------------------------------------------