xref: /openbsd/gnu/usr.bin/perl/vms/make_command.com (revision 4a4f25f9)
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$!------------------------------------------------
22