unzvmc.exec 1.4 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657
  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 options */
  6. /* "TARGET(COMPAT)" is required for V2.2 compiler */
  7. parms = parms 'TARGET(COMPAT) SOURCE'
  8. say 'Compiling UNZIP C...'
  9. 'cc unzip c 'parms
  10. say 'Compiling CRC32 C...'
  11. 'cc crc32 c 'parms
  12. say 'Compiling CRYPT C...'
  13. 'cc crypt c 'parms
  14. say 'Compiling ENVARGS C...'
  15. 'cc envargs c 'parms
  16. say 'Compiling EXPLODE C...'
  17. 'cc explode c 'parms
  18. say 'Compiling EXTRACT C...'
  19. 'cc extract c 'parms
  20. say 'Compiling FILEIO C...'
  21. 'cc fileio c 'parms
  22. say 'Compiling GLOBALS C...'
  23. 'cc globals c 'parms
  24. say 'Compiling INFLATE C...'
  25. 'cc inflate c 'parms
  26. say 'Compiling PROCESS C...'
  27. 'cc process c 'parms
  28. say 'Compiling LIST C...'
  29. 'cc list c 'parms
  30. say 'Compiling MATCH C...'
  31. 'cc match c 'parms
  32. say 'Compiling TTYIO C...'
  33. 'cc ttyio c 'parms
  34. say 'Compiling UNREDUCE C...'
  35. 'cc unreduce c 'parms
  36. say 'Compiling UNSHRINK C...'
  37. 'cc unshrink c 'parms
  38. say 'Compiling ZIPINFO C...'
  39. 'cc zipinfo c 'parms
  40. say 'Compiling VMMVS C...'
  41. 'cc vmmvs c 'parms
  42. say 'Linking all files...'
  43. 'cmod unzip unzip crc32 crypt envargs explode extract fileio globals',
  44. 'inflate list match process ttyio unreduce unshrink zipinfo vmmvs'
  45. say 'All Done!'
  46. say "To run enter : UNZIP parms"
  47. exit rc
  48. error:
  49. say 'Error during compilation!'
  50. exit rc