zipvmc.exec 1.1 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748
  1. /* VMCOMPIL EXEC Unzip compile for VM/CMS */
  2. /* Author : George Petrov, 11 Apr 1995 */
  3. signal on error
  4. parms = '(long def(VM_CMS)'
  5. /* Add local parms */
  6. parms = parms 'TARGET(COMPAT) SOURCE'
  7. say 'Compiling TREES C...'
  8. 'cc trees c 'parms
  9. say 'Compiling CRYPT C...'
  10. 'cc crypt c 'parms
  11. say 'Compiling TTYIO C...'
  12. 'cc ttyio c 'parms
  13. say 'Compiling DEFLATE C...'
  14. 'cc deflate c 'parms
  15. say 'Compiling FILEIO C...'
  16. 'cc fileio c 'parms
  17. say 'Compiling GLOBALS C...'
  18. 'cc globals c 'parms
  19. say 'Compiling ZIP C...'
  20. 'cc zip c 'parms
  21. say 'Compiling UTIL C...'
  22. 'cc util c 'parms
  23. say 'Compiling CRC32 C...'
  24. 'cc crc32 c 'parms
  25. say 'Compiling ZIPFILE C...'
  26. 'cc zipfile c 'parms
  27. say 'Compiling ZIPUP C...'
  28. 'cc zipup c 'parms
  29. say 'Compiling CMSMVS C...'
  30. 'cc cmsmvs c 'parms
  31. say 'Compiling CMS C...'
  32. 'cc cms c 'parms
  33. say 'Linking all files...'
  34. 'cmod zip zip trees crypt deflate fileio globals ttyio',
  35. 'util crc32 zipfile zipup cmsmvs cms'
  36. say 'All Done!'
  37. say "To run enter : ZIP parms"
  38. exit rc
  39. error:
  40. say 'Error durring compilation!'
  41. exit rc