home *** CD-ROM | disk | FTP | other *** search
/ Geek Gadgets 1 / ADE-1.bin / ade-dist / perl-5.003-src.tgz / tar.out / fsf / perl / vms / make_command.com < prev    next >
Text File  |  1996-09-28  |  696b  |  22 lines
  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.