File: make_command.com

package info (click to toggle)
perl 5.8.4-8sarge6
  • links: PTS
  • area: main
  • in suites: sarge
  • size: 58,128 kB
  • ctags: 31,422
  • sloc: perl: 224,262; ansic: 155,398; sh: 32,253; pascal: 7,747; lisp: 6,121; makefile: 2,341; cpp: 2,035; yacc: 1,019; java: 23
file content (21 lines) | stat: -rw-r--r-- 696 bytes parent folder | download | duplicates (17) 
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''"
$!------------------------------------------------