File: make_command.com

package info (click to toggle)
perl 5.14.2-21%2Bdeb7u3
  • links: PTS, VCS
  • area: main
  • in suites: wheezy
  • size: 89,728 kB
  • sloc: perl: 421,086; ansic: 195,186; sh: 37,852; pascal: 8,746; cpp: 3,893; makefile: 2,346; xml: 1,972; yacc: 1,602
file content (21 lines) | stat: -rw-r--r-- 696 bytes parent folder | download | duplicates (18)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
$! MAKE_COMMAND.COM
$! Record MM[SK]/Make parameters in configuration report
$!
$! Author:  Peter Prymmer <pvhp@lns62.lns.cornell.edu>
$! Version: 1.0  18-Jan-1996
$!
$! DCL usage (choose one):
$!      @MAKE_COMMAND                      !or
$!      @MAKE_COMMAND/OUTPUT=MYCONFIG.OUT
$!------------------------------------------------
$ $mms = "'"+p1
$ $makeline = p2+" "+p3+" "+p4+" "+p5+" "+p6+" "+p7+" "+p8
$quotable:
$ if f$locate("""",$makeline).lt.f$length($makeline)
$   then
$   $makeline = $makeline - """"
$   goto quotable
$ endif
$ $makeline = f$edit($makeline,"COMPRESS,TRIM")
$ write sys$output " make_cmd=''$mms'"+" ''$makeline''"
$!------------------------------------------------