home *** CD-ROM | disk | FTP | other *** search
/ Amiga Elysian Archive / AmigaElysianArchive.iso / prog / c / sc6_1.lha / Install-6.1-Patch < prev    next >
Text File  |  1992-11-23  |  55KB  |  1,534 lines
  1. (complete 0)
  2. (set @default-dest "SC:")
  3.  
  4.  
  5. (set answer1
  6.         (askchoice
  7.                 (prompt "Choose where to install 6.1 Patch")
  8.                 (choices "Hard Disk" "Floppy Disk")
  9.                 (help "Selecting Hard Disk will patch the files in SC: by reading "
  10.                       "the original files from the master floppies, and writing "
  11.                       "the new version to its proper place in the SC: directory. "
  12.                       "Selecting Floppy Disk will patch the set of 2 or 3 disks "
  13.                       "created by the Floppy install.\n\n"
  14.                       "Neither of these choices will modify any files on the originals."
  15.                 )
  16.          (default 0)
  17.         )
  18. )
  19.  
  20.  
  21. (makedir "ram:temp_6.1_patch_x12")
  22. (copyfiles (source "spatch") (dest "ram:temp_6.1_patch_x12"))
  23. (copyfiles (source "scompact") (dest "ram:temp_6.1_patch_x12"))
  24. (copyfiles (source "flush") (dest "ram:temp_6.1_patch_x12"))
  25.  
  26.  
  27. (if (= answer1 0)
  28. (
  29.  
  30.    (set answer2
  31.         (askchoice
  32.                 (prompt "Do you want the patched header files compressed?")
  33.                 (choices "Yes" "No")
  34.                 (help "If you originally installed the headers files "
  35.                       "compressed, then you probably want to select "
  36.                       "YES now. Otherwise choose NO"
  37.                 )
  38.          (default 1)
  39.         )
  40.    )
  41.  
  42.    (makedir "ram:temp_6.1_patch_x123")
  43.    (copyfiles (source "read.pch") (dest "ram:temp_6.1_patch_x123"))
  44.    (copyfiles (source "sc.pch") (dest "ram:temp_6.1_patch_x123"))
  45.    (copyfiles (source "smake.pch") (dest "ram:temp_6.1_patch_x123"))
  46.    (copyfiles (source "slink.pch") (dest "ram:temp_6.1_patch_x123"))
  47.    (copyfiles (source "se.pch") (dest "ram:temp_6.1_patch_x123"))
  48.    (copyfiles (source "sedat.pch") (dest "ram:temp_6.1_patch_x123"))
  49.    (copyfiles (source "scopts.pch") (dest "ram:temp_6.1_patch_x123"))
  50.    (copyfiles (source "scmsg.pch") (dest "ram:temp_6.1_patch_x123"))
  51.    (copyfiles (source "sc1.pch") (dest "ram:temp_6.1_patch_x123"))
  52.    (copyfiles (source "sc2.pch") (dest "ram:temp_6.1_patch_x123"))
  53.    (copyfiles (source "scdebug.pch") (dest "ram:temp_6.1_patch_x123"))
  54.  
  55.    (askdisk (assigns) (dest "SASC_6.0_Disk_1")
  56.             (prompt "Please Insert Disk 1 of the SAS/C Development System")
  57.             (help "Insert Disk 1 in any drive. The files will be read from "
  58.                   "Disk 1, and placed in SC:. Nothing on Disk 1 will be "
  59.                   "modified." 
  60.             )
  61.    ) 
  62.  
  63. (copyfiles (source "SASC_6.0_Disk_1:more") (dest "ram:temp_6.1_patch_x12"))
  64.  
  65. (complete 1)
  66.    (if (exists "sc:read.me")
  67.       (
  68.          (working "Patching read.me")
  69.          (run ("ram:temp_6.1_patch_x12/spatch -osc:read.me -pram:temp_6.1_patch_x123/read.pch SASC_6.0_Disk_1:read.me"))
  70.       )
  71.    )
  72.  
  73. (complete 2)
  74.    (if (exists "sc:c/sc")
  75.       (
  76.          (working "Patching sc")
  77.          (run ("ram:temp_6.1_patch_x12/spatch -osc:c/sc -pram:temp_6.1_patch_x123/sc.pch SASC_6.0_Disk_1:compiler/c/sc"))
  78.       )
  79.    )
  80.    
  81. (complete 3)
  82.  
  83.    (if (exists "sc:c/smake")
  84.       (
  85.          (working "Patching smake")
  86.          (run ("ram:temp_6.1_patch_x12/spatch -osc:c/smake -pram:temp_6.1_patch_x123/smake.pch sasc_6.0_Disk_1:compiler/c/smake"))
  87.       )
  88.    )
  89.  
  90. (complete 5)
  91.    (if (exists "sc:c/scopts")
  92.       (
  93.          (working "Patching scopts")
  94.          (run ("ram:temp_6.1_patch_x12/spatch -osc:c/scopts -pram:temp_6.1_patch_x123/scopts.pch sasc_6.0_Disk_1:compiler/c/scopts" ))
  95.       )
  96.    )
  97.    
  98. (complete 6)
  99.    (if (exists "sc:c/scmsg")
  100.       (
  101.          (working "Patching scmsg")
  102.          (run ("ram:temp_6.1_patch_x12/spatch -osc:c/scmsg -pram:temp_6.1_patch_x123/scmsg.pch sasc_6.0_Disk_1:compiler/c/scmsg" ))
  103.       )
  104.    )
  105.    
  106. (complete 8)
  107.    (if (exists "sc:c/slink")
  108.       (
  109.          (working "Patching slink")
  110.          (run ("ram:temp_6.1_patch_x12/spatch -osc:c/slink -pram:temp_6.1_patch_x123/slink.pch SASC_6.0_Disk_1:compiler/c/slink" ))
  111.       )
  112.    )
  113.    
  114.    
  115. (complete 9)
  116.    (if (exists "sc:c/se")
  117.       (
  118.          (working "Patching se")
  119.          (run ("ram:temp_6.1_patch_x12/spatch -osc:c/se -pram:temp_6.1_patch_x123/se.pch sasc_6.0_Disk_1:compiler/c/se" ))
  120.       )
  121.    )
  122.  
  123.    (if (exists "sc:env/se.dat")
  124.       (
  125.          (working "Patching se.dat")
  126.          (run ("ram:temp_6.1_patch_x12/spatch -osc:env/se.dat -pram:temp_6.1_patch_x123/sedat.pch sasc_6.0_Disk_1:compiler/env/se.dat" ))
  127.       )
  128.    )
  129.    
  130.    
  131.    
  132. (complete 11)
  133.    (if (exists "sc:libs/sc1.library")
  134.       (
  135.          (working "Patching sc1.library")
  136.          (run ("ram:temp_6.1_patch_x12/spatch -osc:libs/sc1.library -pram:temp_6.1_patch_x123/sc1.pch sasc_6.0_Disk_1:compiler/libs/sc1.library" ))
  137.       )
  138.    )
  139.    
  140. (complete 13)
  141.    (if (exists "sc:libs/sc2.library")
  142.       (
  143.          (working "Patching sc2.library")
  144.          (run ("ram:temp_6.1_patch_x12/spatch -osc:libs/sc2.library -pram:temp_6.1_patch_x123/sc2.pch sasc_6.0_Disk_1:compiler/libs/sc2.library" ))
  145.       )
  146.    )
  147.    
  148.    (if (exists "sc:libs/scdebug.library")
  149.       (
  150.          (working "Patching scdebug.library")
  151.          (run ("ram:temp_6.1_patch_x12/spatch -osc:libs/scdebug.library -pram:temp_6.1_patch_x123/scdebug.pch sasc_6.0_Disk_1:compiler/libs/scdebug.library" ))
  152.       )
  153.    )
  154.    
  155.  
  156. (run "delete ram:temp_6.1_patch_x123/#? quiet")
  157. (copyfiles (source "sclib.pch") (dest "ram:temp_6.1_patch_x123"))
  158. (copyfiles (source "scs.pch") (dest "ram:temp_6.1_patch_x123"))
  159. (copyfiles (source "scnb.pch") (dest "ram:temp_6.1_patch_x123"))
  160. (copyfiles (source "scsnb.pch") (dest "ram:temp_6.1_patch_x123"))
  161. (copyfiles (source "scm.pch") (dest "ram:temp_6.1_patch_x123"))
  162. (copyfiles (source "scms.pch") (dest "ram:temp_6.1_patch_x123"))
  163. (copyfiles (source "scmieee.pch") (dest "ram:temp_6.1_patch_x123"))
  164. (copyfiles (source "scmffp.pch") (dest "ram:temp_6.1_patch_x123"))
  165. (copyfiles (source "scm881.pch") (dest "ram:temp_6.1_patch_x123"))
  166. (copyfiles (source "c.pch") (dest "ram:temp_6.1_patch_x123"))
  167. (copyfiles (source "cres.pch") (dest "ram:temp_6.1_patch_x123"))
  168. (copyfiles (source "catch.pch") (dest "ram:temp_6.1_patch_x123"))
  169. (copyfiles (source "catchres.pch") (dest "ram:temp_6.1_patch_x123"))
  170. (copyfiles (source "catchresnr.pch") (dest "ram:temp_6.1_patch_x123"))
  171. (copyfiles (source "catchnr.pch") (dest "ram:temp_6.1_patch_x123"))
  172. (copyfiles (source "cback.pch") (dest "ram:temp_6.1_patch_x123"))
  173.  
  174.    
  175.    (askdisk (assigns) (dest "SASC_6.0_Disk_2")
  176.             (prompt "Please Insert Disk 2 of the SAS/C Development System")
  177.             (help "Insert Disk 2 in any drive. The files will be read from "
  178.                   "Disk 2, and placed in SC:. Nothing on Disk 2 will be "
  179.                   "modified." 
  180.             )
  181.    ) 
  182.    
  183. (complete 15)
  184.    (if (exists "sc:lib/sc.lib")
  185.       (
  186.          (working "Patching sc.lib")
  187.          (run ("ram:temp_6.1_patch_x12/spatch -osc:lib/sc.lib -pram:temp_6.1_patch_x123/sclib.pch sasc_6.0_Disk_2:libraries/lib/sc.lib" ))
  188.       )
  189.    )
  190.    
  191. (complete 16)
  192.    (if (exists "sc:lib/scs.lib")
  193.       (
  194.          (working "Patching scs.lib")
  195.          (run ("ram:temp_6.1_patch_x12/spatch -osc:lib/scs.lib -pram:temp_6.1_patch_x123/scs.pch sasc_6.0_Disk_2:libraries/lib/scs.lib" ))
  196.       )
  197.    )
  198.    
  199.    
  200. (complete 17)
  201.    (if (exists "sc:lib/scnb.lib")
  202.       (
  203.          (working "Patching scnb.lib")
  204.          (run ("ram:temp_6.1_patch_x12/spatch -osc:lib/scnb.lib -pram:temp_6.1_patch_x123/scnb.pch sasc_6.0_Disk_2:libraries/lib/scnb.lib" ))
  205.       )
  206.    )
  207.    
  208. (complete 19)
  209.    (if (exists "sc:lib/scsnb.lib")
  210.       (
  211.          (working "Patching scsnb.lib")
  212.          (run ("ram:temp_6.1_patch_x12/spatch -osc:lib/scsnb.lib -pram:temp_6.1_patch_x123/scsnb.pch sasc_6.0_Disk_2:libraries/lib/scsnb.lib" ))
  213.       )
  214.    )
  215.    
  216. (complete 21)
  217.    (if (exists "sc:lib/scm.lib")
  218.       (
  219.          (working "Patching scm.lib")
  220.          (run ("ram:temp_6.1_patch_x12/spatch -osc:lib/scm.lib -pram:temp_6.1_patch_x123/scm.pch sasc_6.0_Disk_2:libraries/lib/scm.lib" ))
  221.       )
  222.    )
  223.    
  224. (complete 22)
  225.    (if (exists "sc:lib/scms.lib")
  226.       (
  227.          (working "Patching scms.lib")
  228.          (run ("ram:temp_6.1_patch_x12/spatch -osc:lib/scms.lib -pram:temp_6.1_patch_x123/scms.pch sasc_6.0_Disk_2:libraries/lib/scms.lib" ))
  229.       )
  230.    )
  231.    
  232. (complete 23)
  233.    (if (exists "sc:lib/scmieee.lib")
  234.       (
  235.          (working "Patching scmieee.lib")
  236.          (run ("ram:temp_6.1_patch_x12/spatch -osc:lib/scmieee.lib -pram:temp_6.1_patch_x123/scmieee.pch sasc_6.0_Disk_2:libraries/lib/scmieee.lib" ))
  237.       )
  238.    )
  239.    
  240. (complete 24)
  241.    (if (exists "sc:lib/scmffp.lib")
  242.       (
  243.          (working "Patching scmffp.lib")
  244.          (run ("ram:temp_6.1_patch_x12/spatch -osc:lib/scmffp.lib -pram:temp_6.1_patch_x123/scmffp.pch sasc_6.0_Disk_2:libraries/lib/scmffp.lib" ))
  245.       )
  246.    )
  247.    
  248. (complete 25)
  249.    (if (exists "sc:lib/scm881.lib")
  250.       (
  251.          (working "Patching scm881.lib")
  252.          (run ("ram:temp_6.1_patch_x12/spatch -osc:lib/scm881.lib -pram:temp_6.1_patch_x123/scm881.pch sasc_6.0_Disk_2:libraries/lib/scm881.lib" ))
  253.       )
  254.    )
  255.  
  256. (complete 26)
  257.    (if (exists "sc:lib/c.o")
  258.       (
  259.          (working "Patching c.o")
  260.          (run ("ram:temp_6.1_patch_x12/spatch -osc:lib/c.o -pram:temp_6.1_patch_x123/c.pch sasc_6.0_Disk_2:libraries/lib/c.o" ))
  261.       )
  262.    )
  263.  
  264. (complete 27)
  265.    (if (exists "sc:lib/cres.o")
  266.       (
  267.          (working "Patching cres.o")
  268.          (run ("ram:temp_6.1_patch_x12/spatch -osc:lib/cres.o -pram:temp_6.1_patch_x123/cres.pch sasc_6.0_Disk_2:libraries/lib/cres.o" ))
  269.       )
  270.    )
  271.  
  272. (complete 28)
  273.    (if (exists "sc:lib/catch.o")
  274.       (
  275.          (working "Patching catch.o")
  276.          (run ("ram:temp_6.1_patch_x12/spatch -osc:lib/catch.o -pram:temp_6.1_patch_x123/catch.pch sasc_6.0_Disk_2:libraries/lib/catch.o" ))
  277.       )
  278.    )
  279.  
  280. (complete 29)
  281.    (if (exists "sc:lib/catchresnr.o")
  282.       (
  283.          (working "Patching catchresnr.o")
  284.          (run ("ram:temp_6.1_patch_x12/spatch -osc:lib/catchresnr.o -pram:temp_6.1_patch_x123/catchresnr.pch sasc_6.0_Disk_2:libraries/lib/catchresnr.o" ))
  285.       )
  286.    )
  287.  
  288. (complete 30)
  289.    (if (exists "sc:lib/catchres.o")
  290.       (
  291.          (working "Patching catchres.o")
  292.          (run ("ram:temp_6.1_patch_x12/spatch -osc:lib/catchres.o -pram:temp_6.1_patch_x123/catchres.pch sasc_6.0_Disk_2:libraries/lib/catchres.o" ))
  293.       )
  294.    )
  295.  
  296. (complete 31)
  297.    (if (exists "sc:lib/catchnr.o")
  298.       (
  299.          (working "Patching catchnr.o")
  300.          (run ("ram:temp_6.1_patch_x12/spatch -osc:lib/catchnr.o -pram:temp_6.1_patch_x123/catchnr.pch sasc_6.0_Disk_2:libraries/lib/catchnr.o" ))
  301.       )
  302.    )
  303.  
  304. (complete 32)
  305.    (if (exists "sc:lib/cback.o")
  306.       (
  307.          (working "Patching cback.o")
  308.          (run ("ram:temp_6.1_patch_x12/spatch -osc:lib/cback.o -pram:temp_6.1_patch_x123/cback.pch sasc_6.0_Disk_2:libraries/lib/cback.o" ))
  309.       )
  310.    )
  311.    
  312. (run "delete ram:temp_6.1_patch_x123/#? quiet")
  313. (copyfiles (source "cpr.pch") (dest "ram:temp_6.1_patch_x123"))
  314. (copyfiles (source "cprx.pch") (dest "ram:temp_6.1_patch_x123"))
  315. (copyfiles (source "cprk.pch") (dest "ram:temp_6.1_patch_x123"))
  316. (copyfiles (source "schi.pch") (dest "ram:temp_6.1_patch_x123"))
  317. (copyfiles (source "scpeep.pch") (dest "ram:temp_6.1_patch_x123"))
  318. (copyfiles (source "fcntl.pch") (dest "ram:temp_6.1_patch_x123"))
  319. (copyfiles (source "stat.pch") (dest "ram:temp_6.1_patch_x123"))
  320. (copyfiles (source "dos.pch") (dest "ram:temp_6.1_patch_x123"))
  321. (copyfiles (source "m68881.pch") (dest "ram:temp_6.1_patch_x123"))
  322. (copyfiles (source "mffp.pch") (dest "ram:temp_6.1_patch_x123"))
  323. (copyfiles (source "mieeedoub.pch") (dest "ram:temp_6.1_patch_x123"))
  324. (copyfiles (source "stdarg.pch") (dest "ram:temp_6.1_patch_x123"))
  325. (copyfiles (source "dir.pch") (dest "ram:temp_6.1_patch_x123"))
  326.  
  327.  
  328.    (askdisk (assigns) (dest "SASC_6.0_Disk_3")
  329.             (prompt "Please Insert Disk 3 of the SAS/C Development System")
  330.             (help "Insert Disk 3 in any drive. The files will be read from "
  331.                   "Disk 3, and placed in SC:. Nothing on Disk 3 will be "
  332.                   "modified." 
  333.             )
  334.    ) 
  335.    
  336. (complete 33)
  337.    (if (exists "sc:c/cpr")
  338.       (
  339.          (working "Patching cpr")
  340.          (run ("ram:temp_6.1_patch_x12/spatch -osc:c/cpr -pram:temp_6.1_patch_x123/cpr.pch sasc_6.0_Disk_3:Debugger/c/cpr" ))
  341.       )
  342.    )
  343.    
  344. (complete 35)
  345.    (if (exists "sc:c/cprx")
  346.       (
  347.          (working "Patching cprx")
  348.          (run ("ram:temp_6.1_patch_x12/spatch -osc:c/cprx -pram:temp_6.1_patch_x123/cprx.pch sasc_6.0_Disk_3:Cross_Debugger/c/cprx" ))
  349.       )
  350.    )
  351.    
  352. (complete 37)
  353.    (if (exists "sc:c/cprk")
  354.       (
  355.          (working "Patching cprk")
  356.          (run ("ram:temp_6.1_patch_x12/spatch -osc:c/cprk -pram:temp_6.1_patch_x123/cprk.pch sasc_6.0_Disk_3:Cross_Debugger/c/cprk" ))
  357.       )
  358.    )
  359.    
  360.    
  361. (complete 40)
  362.    (if (exists "sc:libs/schi.library")
  363.       (
  364.          (working "Patching schi.library")
  365.          (run ("ram:temp_6.1_patch_x12/spatch -osc:libs/schi.library -pram:temp_6.1_patch_x123/schi.pch sasc_6.0_Disk_3:Debugger/libs/schi.library" ))
  366.       )
  367.    )
  368.    
  369.    
  370. (complete 42)
  371.    (if (exists "sc:libs/scpeep.library")
  372.       (
  373.          (working "Patching scpeep.library")
  374.          (run ("ram:temp_6.1_patch_x12/spatch -osc:libs/scpeep.library -pram:temp_6.1_patch_x123/scpeep.pch sasc_6.0_Disk_3:Optimizers/libs/scpeep.library" ))
  375.       )
  376.    )
  377.  
  378.  
  379.  
  380.    (if (AND (= @pretend 0) (exists "sc:c/scompact"))
  381.          (copyfiles (source "ram:temp_6.1_patch_x12/scompact") (dest "sc:c"))
  382.           
  383.    )
  384.  
  385.    
  386. ; must recompact stdio.h and dos/stdio.h if compressed heraders installed
  387.    (if (= answer2 0)
  388.       (
  389.          (if (exists "sc:include/stdio.h")
  390.            (
  391.               (run ("ram:temp_6.1_patch_x12/scompact force SASC_6.0_Disk_3:compiler_headers/include/stdio.h ram:temp_6.1_patch_x12/stdio.h"))
  392.               (if (= 0 @pretend)
  393.                 (
  394.                    (copyfiles (source "ram:temp_6.1_patch_x12/stdio.h") 
  395.                         (dest "sc:include")
  396.                    )
  397.                 )
  398.                 (delete "ram:stdio.h")
  399.               )
  400.            )
  401.          )
  402.       )
  403.    )
  404.  
  405. (complete 45)
  406.    (if (exists "sc:include/fcntl.h")
  407.       (
  408.          (working "Patching fcntl.h")
  409.          (run ("ram:temp_6.1_patch_x12/spatch -osc:include/fcntl.h -pram:temp_6.1_patch_x123/fcntl.pch sasc_6.0_Disk_3:compiler_headers/include/fcntl.h" ))
  410.          (if (= answer2 0)
  411.           (
  412.            (run ("ram:temp_6.1_patch_x12/scompact force sc:include/fcntl.h ram:temp_6.1_patch_x12/fcntl.h"))
  413.            (if (= 0 @pretend)
  414.             (
  415.              (copyfiles (source "ram:temp_6.1_patch_x12/fcntl.h") 
  416.                         (dest "sc:include")
  417.              )
  418.              (delete "ram:temp_6.1_patch_x12/fcntl.h")
  419.             )
  420.            )
  421.           )
  422.          )
  423.       )
  424.    )
  425.    
  426.  
  427. (complete 46)
  428.    (if (exists "sc:include/stat.h")
  429.       (
  430.          (working "Patching stat.h")
  431.          (run ("ram:temp_6.1_patch_x12/spatch -osc:include/stat.h -pram:temp_6.1_patch_x123/stat.pch sasc_6.0_Disk_3:compiler_headers/include/stat.h" ))
  432.          (if (= answer2 0)
  433.           (
  434.            (run ("ram:temp_6.1_patch_x12/scompact force sc:include/stat.h ram:temp_6.1_patch_x12/stat.h"))
  435.            (if (= 0 @pretend)
  436.             (
  437.              (copyfiles (source "ram:temp_6.1_patch_x12/stat.h") 
  438.                         (dest "sc:include")
  439.              )
  440.              (delete "ram:temp_6.1_patch_x12/stat.h")
  441.             )
  442.            )
  443.           )
  444.          )
  445.       )
  446.    )
  447.  
  448. (complete 47)
  449.    (if (exists "sc:include/dos.h")
  450.       (
  451.          (working "Patching dos.h")
  452.          (run ("ram:temp_6.1_patch_x12/spatch -osc:include/dos.h -pram:temp_6.1_patch_x123/dos.pch sasc_6.0_Disk_3:compiler_headers/include/dos.h" ))
  453.          (if (= answer2 0)
  454.           (
  455.            (run ("ram:temp_6.1_patch_x12/scompact force sc:include/dos.h ram:temp_6.1_patch_x12/dos.h"))
  456.            (if (= 0 @pretend)
  457.             (
  458.              (copyfiles (source "ram:temp_6.1_patch_x12/dos.h") 
  459.                         (dest "sc:include")
  460.              )
  461.              (delete "ram:temp_6.1_patch_x12/dos.h")
  462.             )
  463.            )
  464.           )
  465.          )
  466.       )
  467.    )
  468.  
  469. (complete 48)
  470.    (if (exists "sc:include/m68881.h")
  471.       (
  472.          (working "Patching m68881.h")
  473.          (run ("ram:temp_6.1_patch_x12/spatch -osc:include/m68881.h -pram:temp_6.1_patch_x123/m68881.pch sasc_6.0_Disk_3:compiler_headers/include/m68881.h" ))
  474.          (if (= answer2 0)
  475.           (
  476.            (run ("ram:temp_6.1_patch_x12/scompact force sc:include/m68881.h ram:temp_6.1_patch_x12/m68881.h"))
  477.            (if (= 0 @pretend)
  478.             (
  479.              (copyfiles (source "ram:temp_6.1_patch_x12/m68881.h") 
  480.                         (dest "sc:include")
  481.              )
  482.              (delete "ram:temp_6.1_patch_x12/m68881.h")
  483.             )
  484.            )
  485.           )
  486.          )
  487.       )
  488.    )
  489.    (if (exists "sc:include/mffp.h")
  490.       (
  491.          (working "Patching mffp.h")
  492.          (run ("ram:temp_6.1_patch_x12/spatch -osc:include/mffp.h -pram:temp_6.1_patch_x123/mffp.pch sasc_6.0_Disk_3:compiler_headers/include/mffp.h" ))
  493.          (if (= answer2 0)
  494.           (
  495.            (run ("ram:temp_6.1_patch_x12/scompact force sc:include/mffp.h ram:temp_6.1_patch_x12/mffp.h"))
  496.            (if (= 0 @pretend)
  497.             (
  498.              (copyfiles (source "ram:temp_6.1_patch_x12/mffp.h") 
  499.                         (dest "sc:include")
  500.              )
  501.              (delete "ram:temp_6.1_patch_x12/mffp.h")
  502.             )
  503.            )
  504.           )
  505.          )
  506.       )
  507.    )
  508.  
  509.    (if (exists "sc:include/mieeedoub.h")
  510.       (
  511.          (working "Patching mieeedoub.h")
  512.          (run ("ram:temp_6.1_patch_x12/spatch -osc:include/mieeedoub.h -pram:temp_6.1_patch_x123/mieeedoub.pch sasc_6.0_Disk_3:compiler_headers/include/mieeedoub.h" ))
  513.          (if (= answer2 0)
  514.           (
  515.            (run ("ram:temp_6.1_patch_x12/scompact force sc:include/mieeedoub.h ram:temp_6.1_patch_x12/mieeedoub.h"))
  516.            (if (= 0 @pretend)
  517.             (
  518.              (copyfiles (source "ram:temp_6.1_patch_x12/mieeedoub.h") 
  519.                         (dest "sc:include")
  520.              )
  521.              (delete "ram:temp_6.1_patch_x12/mieeedoub.h")
  522.             )
  523.            )
  524.           )
  525.          )
  526.       )
  527.    )
  528.  
  529. (complete 49)
  530.    (if (exists "sc:include/stdarg.h")
  531.       (
  532.          (working "Patching stdarg.h")
  533.          (run ("ram:temp_6.1_patch_x12/spatch -osc:include/stdarg.h -pram:temp_6.1_patch_x123/stdarg.pch sasc_6.0_Disk_3:compiler_headers/include/stdarg.h" ))
  534.          (if (= answer2 0)
  535.           (
  536.            (run ("ram:temp_6.1_patch_x12/scompact force sc:include/stdarg.h ram:temp_6.1_patch_x12/stdarg.h"))
  537.            (if (= 0 @pretend)
  538.             (
  539.              (copyfiles (source "ram:temp_6.1_patch_x12/stdarg.h") 
  540.                         (dest "sc:include")
  541.              )
  542.              (delete "ram:temp_6.1_patch_x12/stdarg.h")
  543.             )
  544.            )
  545.           )
  546.          )
  547.       )
  548.    )
  549.  
  550. (complete 50)
  551.    (if (exists "sc:include/sys/dir.h")
  552.       (
  553.          (working "Patching sys/dir.h")
  554.          (run ("ram:temp_6.1_patch_x12/spatch -osc:include/sys/dir.h -pram:temp_6.1_patch_x123/dir.pch sasc_6.0_Disk_3:compiler_headers/include/sys/dir.h" ))
  555.          (if (= answer2 0)
  556.           (
  557.            (run ("ram:temp_6.1_patch_x12/scompact force sc:include/sys/dir.h ram:temp_6.1_patch_x12/dir.h"))
  558.            (if (= 0 @pretend)
  559.             (
  560.              (copyfiles (source "ram:temp_6.1_patch_x12/dir.h") 
  561.                         (dest "sc:include/sys")
  562.              )
  563.              (delete "ram:temp_6.1_patch_x12/dir.h")
  564.             )
  565.            )
  566.           )
  567.          )
  568.       )
  569.    )
  570.    
  571.  
  572. (run "delete ram:temp_6.1_patch_x123/#? quiet")
  573. (copyfiles (source "all.pch") (dest "ram:temp_6.1_patch_x123"))
  574. (copyfiles (source "layers.pch") (dest "ram:temp_6.1_patch_x123"))
  575. (copyfiles (source "intuition_pragmas.pch") (dest "ram:temp_6.1_patch_x123"))
  576.  
  577.  
  578.    (askdisk (assigns) (dest "SASC_6.0_Disk_4")
  579.             (prompt "Please Insert Disk 4 of the SAS/C Development System")
  580.             (help "Insert Disk 4 in any drive. The files will be read from "
  581.                   "Disk 4, and placed in SC:. Nothing on Disk 4 will be "
  582.                   "modified." 
  583.             )
  584.    ) 
  585.  
  586.  
  587.  
  588.  
  589.    (if (= answer2 0)
  590.       (
  591.          (if (exists "sc:include/dos/stdio.h")
  592.            (
  593.               (run ("ram:temp_6.1_patch_x12/scompact force SASC_6.0_Disk_4:compiler_headers/include/dos/stdio.h ram:temp_6.1_patch_x12/stdio.h"))
  594.               (if (= 0 @pretend)
  595.                 (
  596.                    (copyfiles (source "ram:temp_6.1_patch_x12/stdio.h") 
  597.                         (dest "sc:include/dos")
  598.                    )
  599.                 )
  600.                 (delete "ram:temp_6.1_patch_x12/stdio.h")
  601.               )
  602.            )
  603.          )
  604.       )
  605.    )
  606.  
  607.  
  608.  
  609.  
  610.  
  611. (complete 51)
  612.    (if (exists "sc:include/proto/all.h")
  613.       (
  614.          (working "Patching proto/all.h")
  615.          (run ("ram:temp_6.1_patch_x12/spatch -osc:include/proto/all.h -pram:temp_6.1_patch_x123/all.pch sasc_6.0_Disk_4:compiler_headers/include/proto/all.h" ))
  616.          (if (= answer2 0)
  617.           (
  618.            (run ("ram:temp_6.1_patch_x12/scompact force sc:include/proto/all.h ram:temp_6.1_patch_x12/all.h"))
  619.            (if (= 0 @pretend)
  620.             (
  621.              (copyfiles (source "ram:temp_6.1_patch_x12/all.h") 
  622.                         (dest "sc:include/proto")
  623.              )
  624.              (delete "ram:temp_6.1_patch_x12/all.h")
  625.             )
  626.            )
  627.           )
  628.          )
  629.       )
  630.    )
  631.  
  632. (complete 52)
  633.    (if (exists "sc:include/proto/layers.h")
  634.       (
  635.          (working "Patching proto/layers.h")
  636.          (run ("ram:temp_6.1_patch_x12/spatch -osc:include/proto/layers.h -pram:temp_6.1_patch_x123/layers.pch sasc_6.0_Disk_4:compiler_headers/include/proto/layers.h" ))
  637.          (if (= answer2 0)
  638.           (
  639.            (run ("ram:temp_6.1_patch_x12/scompact force sc:include/proto/layers.h ram:temp_6.1_patch_x12/layers.h"))
  640.            (if (= 0 @pretend)
  641.             (
  642.              (copyfiles (source "ram:temp_6.1_patch_x12/layers.h") 
  643.                         (dest "sc:include/proto")
  644.              )
  645.              (delete "ram:temp_6.1_patch_x12/layers.h")
  646.             )
  647.            )
  648.           )
  649.          )
  650.       )
  651.    )
  652.  
  653. (complete 53)
  654.    (if (exists "sc:include/pragmas/intuition_pragmas.h")
  655.       (
  656.          (working "Patching pragmas/intuition_pragmas.h")
  657.          (run ("ram:temp_6.1_patch_x12/spatch -osc:include/pragmas/intuition_pragmas.h -pram:temp_6.1_patch_x123/intuition_pragmas.pch sasc_6.0_Disk_4:compiler_headers/include/pragmas/intuition_pragmas.h" ))
  658.          (if (= answer2 0)
  659.           (
  660.            (run ("ram:temp_6.1_patch_x12/scompact force sc:include/pragmas/intuition_pragmas.h ram:temp_6.1_patch_x12/intuition_pragmas.h"))
  661.            (if (= 0 @pretend)
  662.             (
  663.              (copyfiles (source "ram:temp_6.1_patch_x12/intuition_pragmas.h") 
  664.                         (dest "sc:include/pragmas")
  665.              )
  666.              (delete "ram:temp_6.1_patch_x12/.h")
  667.             )
  668.            )
  669.           )
  670.          )
  671.       )
  672.    )
  673.  
  674.  
  675.  
  676.  
  677.    
  678. (run "delete ram:temp_6.1_patch_x123/#? quiet")
  679. (copyfiles (source "sclist.pch") (dest "ram:temp_6.1_patch_x123"))
  680. (copyfiles (source "sekeymap.pch") (dest "ram:temp_6.1_patch_x123"))
  681. (copyfiles (source "asm.pch") (dest "ram:temp_6.1_patch_x123"))
  682. (copyfiles (source "dumpobj.pch") (dest "ram:temp_6.1_patch_x123"))
  683. (copyfiles (source "omd.pch") (dest "ram:temp_6.1_patch_x123"))
  684. (copyfiles (source "hypergst.pch") (dest "ram:temp_6.1_patch_x123"))
  685.  
  686.  
  687.    (askdisk (assigns) (dest "SASC_6.0_Disk_5")
  688.             (prompt "Please Insert Disk 5 of the SAS/C Development System")
  689.             (help "Insert Disk 5 in any drive. The files will be read from "
  690.                   "Disk 5, and placed in SC:. Nothing on Disk 5 will be "
  691.                   "modified." 
  692.             )
  693.    )
  694.     
  695. (complete 54)
  696.    (if (exists "sc:libs/sekeymap.library")
  697.       (
  698.          (working "Patching sekeymap.library")
  699.          (run ("ram:temp_6.1_patch_x12/spatch -osc:libs/sekeymap.library -pram:temp_6.1_patch_x123/sekeymap.pch sasc_6.0_Disk_5:Extra_Utilities/libs/sekeymap.library" ))
  700.       )
  701.    )
  702.  
  703.    (if (exists "sc:libs/sclist.library")
  704.       (
  705.          (working "Patching sclist.library")
  706.          (run ("ram:temp_6.1_patch_x12/spatch -osc:libs/sclist.library -pram:temp_6.1_patch_x123/sclist.pch sasc_6.0_Disk_5:Extra_Utilities/libs/sclist.library" ))
  707.       )
  708.    )
  709.    
  710. (complete 56)
  711.    (if (exists "sc:c/asm")
  712.       (
  713.          (working "Patching asm")
  714.          (run ("ram:temp_6.1_patch_x12/spatch -osc:c/asm -pram:temp_6.1_patch_x123/asm.pch sasc_6.0_Disk_5:Assembler/c/asm" ))
  715.       )
  716.    )
  717.  
  718. (complete 58)
  719.    (if (exists "sc:c/dumpobj")
  720.       (
  721.          (working "Patching dumpobj")
  722.          (run ("ram:temp_6.1_patch_x12/spatch -osc:c/dumpobj -pram:temp_6.1_patch_x123/dumpobj.pch sasc_6.0_Disk_5:Extra_Utilities/c/dumpobj" ))
  723.       )
  724.    )
  725.  
  726. (complete 59)
  727.    (if (exists "sc:c/omd")
  728.       (
  729.          (working "Patching omd")
  730.          (run ("ram:temp_6.1_patch_x12/spatch -osc:c/omd -pram:temp_6.1_patch_x123/omd.pch sasc_6.0_Disk_5:Extra_Utilities/c/omd" ))
  731.       )
  732.    )
  733.  
  734. (complete 61)
  735.    (if (exists "sc:c/hypergst")
  736.       (
  737.          (working "Patching hypergst")
  738.          (run ("ram:temp_6.1_patch_x12/spatch -osc:c/hypergst -pram:temp_6.1_patch_x123/hypergst.pch sasc_6.0_Disk_5:Extra_Utilities/c/hypergst" ))
  739.       )
  740.    )
  741.    
  742. (run "delete ram:temp_6.1_patch_x123/#? quiet")
  743. (copyfiles (source "oml.pch") (dest "ram:temp_6.1_patch_x123"))
  744. (copyfiles (source "lstat.pch") (dest "ram:temp_6.1_patch_x123"))
  745. (copyfiles (source "lprof.pch") (dest "ram:temp_6.1_patch_x123"))
  746. (copyfiles (source "sc5.pch") (dest "ram:temp_6.1_patch_x123"))
  747. (copyfiles (source "tb.pch") (dest "ram:temp_6.1_patch_x123"))
  748. (copyfiles (source "lctosc.pch") (dest "ram:temp_6.1_patch_x123"))
  749. (copyfiles (source "findsym.pch") (dest "ram:temp_6.1_patch_x123"))
  750. (copyfiles (source "showcli.pch") (dest "ram:temp_6.1_patch_x123"))
  751. (copyfiles (source "showprocess.pch") (dest "ram:temp_6.1_patch_x123"))
  752. (copyfiles (source "sc_lib.pch") (dest "ram:temp_6.1_patch_x123"))
  753. (copyfiles (source "sc_prob.pch") (dest "ram:temp_6.1_patch_x123"))
  754. (copyfiles (source "sc_change.pch") (dest "ram:temp_6.1_patch_x123"))
  755. (copyfiles (source "cprguide.pch") (dest "ram:temp_6.1_patch_x123"))
  756.  
  757.    (askdisk (assigns) (dest "SASC_6.0_Disk_6")
  758.             (prompt "Please Insert Disk 6 of the SAS/C Development System")
  759.             (help "Insert Disk 6 in any drive. The files will be read from "
  760.                   "Disk 6, and placed in SC:. Nothing on Disk 6 will be "
  761.                   "modified." 
  762.             )
  763.    ) 
  764.    
  765.  
  766. (complete 63)
  767.    (if (exists "sc:c/oml")
  768.       (
  769.          (working "Patching oml")
  770.          (run ("ram:temp_6.1_patch_x12/spatch -osc:c/oml -pram:temp_6.1_patch_x123/oml.pch sasc_6.0_Disk_6:Extra_Utilities/c/oml" ))
  771.       )
  772.    )
  773.    
  774. (complete 64)
  775.    (if (exists "sc:c/lstat")
  776.       (
  777.          (working "Patching lstat")
  778.          (run ("ram:temp_6.1_patch_x12/spatch -osc:c/lstat -pram:temp_6.1_patch_x123/lstat.pch sasc_6.0_Disk_6:Extra_Utilities/c/lstat" ))
  779.       )
  780.    )
  781.    
  782. (complete 66)
  783.    (if (exists "sc:c/lprof")
  784.       (
  785.          (working "Patching lprof")
  786.          (run ("ram:temp_6.1_patch_x12/spatch -osc:c/lprof -pram:temp_6.1_patch_x123/lprof.pch sasc_6.0_Disk_6:Extra_Utilities/c/lprof" ))
  787.       )
  788.    )
  789.    
  790. (complete 68)
  791.    (if (exists "sc:c/sc5")
  792.       (
  793.          (working "Patching sc5")
  794.          (run ("ram:temp_6.1_patch_x12/spatch -osc:c/sc5 -pram:temp_6.1_patch_x123/sc5.pch sasc_6.0_Disk_6:Extra_Utilities/c/sc5" ))
  795.       )
  796.    )
  797. (complete 70)
  798.    (if (exists "sc:c/tb")
  799.       (
  800.          (working "Patching tb")
  801.          (run ("ram:temp_6.1_patch_x12/spatch -osc:c/tb -pram:temp_6.1_patch_x123/tb.pch sasc_6.0_Disk_6:Extra_Utilities/c/tb" ))
  802.       )
  803.    )
  804. (complete 72)
  805.    (if (exists "sc:c/lctosc")
  806.       (
  807.          (working "Patching lctosc")
  808.          (run ("ram:temp_6.1_patch_x12/spatch -osc:c/lctosc -pram:temp_6.1_patch_x123/lctosc.pch sasc_6.0_Disk_6:Extra_Utilities/c/lctosc" ))
  809.       )
  810.    )
  811.    
  812. (complete 74)
  813.    (if (exists "sc:rexx/findsym.se")
  814.       (
  815.          (working "Patching findsym.se")
  816.          (run ("ram:temp_6.1_patch_x12/spatch -osc:rexx/findsym.se -pram:temp_6.1_patch_x123/findsym.pch sasc_6.0_Disk_6:Extra_Utilities/rexx/findsym.se" ))
  817.       )
  818.    )
  819. (complete 75)
  820.    (if (exists "sc:rexx/showprocess.cpr")
  821.       (
  822.          (working "Patching showprocess.cpr")
  823.          (run ("ram:temp_6.1_patch_x12/spatch -osc:rexx/showprocess.cpr -pram:temp_6.1_patch_x123/showprocess.pch sasc_6.0_Disk_6:Extra_Utilities/rexx/showprocess.cpr" ))
  824.       )
  825.    )
  826. (complete 76)
  827.    (if (exists "sc:rexx/showcli.cpr")
  828.       (
  829.          (working "Patching showcli.cpr")
  830.          (run ("ram:temp_6.1_patch_x12/spatch -osc:rexx/showcli.cpr -pram:temp_6.1_patch_x123/showcli.pch sasc_6.0_Disk_6:Extra_Utilities/rexx/showcli.cpr" ))
  831.       )
  832.    )
  833.  
  834. (complete 77)
  835.    (if (exists "sc:help/sc_lib.guide")
  836.       (
  837.          (working "Patching sc_lib.guide")
  838.          (run ("ram:temp_6.1_patch_x12/spatch -osc:help/sc_lib.guide -pram:temp_6.1_patch_x123/sc_lib.pch sasc_6.0_Disk_6:Online_help/help/sc_lib.guide" ))
  839.       )
  840.    )
  841.  
  842. (complete 79)
  843.    (if (exists "sc:help/sc_prob.guide")
  844.       (
  845.          (working "Patching sc_prob.guide")
  846.          (run ("ram:temp_6.1_patch_x12/spatch -osc:help/sc_prob.guide -pram:temp_6.1_patch_x123/sc_prob.pch sasc_6.0_Disk_6:Online_help/help/sc_prob.guide" ))
  847.       )
  848.    )
  849.  
  850.    (if (exists "sc:help/sc_change.guide")
  851.       (
  852.          (working "Patching sc_change.guide")
  853.          (run ("ram:temp_6.1_patch_x12/spatch -osc:help/sc_change.guide -pram:temp_6.1_patch_x123/sc_change.pch sasc_6.0_Disk_6:Online_help/help/sc_change.guide" ))
  854.       )
  855.    )
  856.  
  857. (complete 80)
  858.    (if (exists "sc:help/cpr.guide")
  859.       (
  860.          (working "Patching cpr.guide")
  861.          (run ("ram:temp_6.1_patch_x12/spatch -osc:help/cpr.guide -pram:temp_6.1_patch_x123/cprguide.pch sasc_6.0_Disk_6:Online_help/help/cpr.guide" ))
  862.       )
  863.    )
  864.  
  865.  
  866.    
  867. (run "delete ram:temp_6.1_patch_x123/#? quiet")
  868. (copyfiles (source "autoopenfail.pch") (dest "ram:temp_6.1_patch_x123"))
  869. (copyfiles (source "_main.pch") (dest "ram:temp_6.1_patch_x123"))
  870. (copyfiles (source "_oserr.pch") (dest "ram:temp_6.1_patch_x123"))
  871. (copyfiles (source "ca.pch") (dest "ram:temp_6.1_patch_x123"))
  872. (copyfiles (source "_cxferr.pch") (dest "ram:temp_6.1_patch_x123"))
  873. (copyfiles (source "intuitlib.pch") (dest "ram:temp_6.1_patch_x123"))
  874. (copyfiles (source "cbacka.pch") (dest "ram:temp_6.1_patch_x123"))
  875. (copyfiles (source "instructions.pch") (dest "ram:temp_6.1_patch_x123"))
  876. (copyfiles (source "compile.pch") (dest "ram:temp_6.1_patch_x123"))
  877. (copyfiles (source "scmsgguide.pch") (dest "ram:temp_6.1_patch_x123"))
  878. (copyfiles (source "sc_util.pch") (dest "ram:temp_6.1_patch_x123"))
  879. (copyfiles (source "scguide.pch") (dest "ram:temp_6.1_patch_x123"))
  880. (copyfiles (source "test.pch") (dest "ram:temp_6.1_patch_x123"))
  881. (copyfiles (source "readme.pch") (dest "ram:temp_6.1_patch_x123"))
  882.  
  883.    (askdisk (assigns) (dest "SASC_6.0_Disk_7")
  884.             (prompt "Please Insert Disk 7 of the SAS/C Development System")
  885.             (help "Insert Disk 7 in any drive. The files will be read from "
  886.                   "Disk 7, and placed in SC:. Nothing on Disk 7 will be "
  887.                   "modified." 
  888.             )
  889.    ) 
  890.    
  891. (complete 81)
  892.    (if (exists "sc:source/autoopenfail.c")
  893.       (
  894.          (working "Patching autoopenfail.c")
  895.          (run ("ram:temp_6.1_patch_x12/spatch -osc:source/autoopenfail.c -pram:temp_6.1_patch_x123/autoopenfail.pch sasc_6.0_Disk_7:Source_And_Examples/source/autoopenfail.c" ))
  896.       )
  897.    )
  898. (complete 82)
  899.    (if (exists "sc:source/_main.c")
  900.       (
  901.          (working "Patching _main.c")
  902.          (run ("ram:temp_6.1_patch_x12/spatch -osc:source/_main.c -pram:temp_6.1_patch_x123/_main.pch sasc_6.0_Disk_7:Source_And_Examples/source/_main.c" ))
  903.       )
  904.    )
  905. (complete 83)
  906.    (if (exists "sc:source/_oserr.c")
  907.       (
  908.          (working "Patching _oserr.c")
  909.          (run ("ram:temp_6.1_patch_x12/spatch -osc:source/_oserr.c -pram:temp_6.1_patch_x123/_oserr.pch sasc_6.0_Disk_7:Source_And_Examples/source/_oserr.c" ))
  910.       )
  911.    )
  912. (complete 84)
  913.    (if (exists "sc:source/intuitlib.c")
  914.       (
  915.          (working "Patching intuitlib.c")
  916.          (run ("ram:temp_6.1_patch_x12/spatch -osc:source/intuitlib.c -pram:temp_6.1_patch_x123/intuitlib.pch sasc_6.0_Disk_7:Source_And_Examples/source/intuitlib.c" ))
  917.       )
  918.    )
  919. (complete 85)
  920.    (if (exists "sc:source/c.a")
  921.       (
  922.          (working "Patching c.a")
  923.          (run ("ram:temp_6.1_patch_x12/spatch -osc:source/c.a -pram:temp_6.1_patch_x123/ca.pch sasc_6.0_Disk_7:Source_And_Examples/source/c.a" ))
  924.       )
  925.    )
  926.  
  927. (complete 87)
  928.    (if (exists "sc:source/cback.a")
  929.       (
  930.          (working "Patching cback.a")
  931.          (run ("ram:temp_6.1_patch_x12/spatch -osc:source/cback.a -pram:temp_6.1_patch_x123/cbacka.pch sasc_6.0_Disk_7:Source_And_Examples/source/cback.a" ))
  932.       )
  933.    )
  934. (complete 89)
  935.    (if (exists "sc:source/_cxferr.c")
  936.       (
  937.          (working "Patching _cxferr.c")
  938.          (run ("ram:temp_6.1_patch_x12/spatch -osc:source/_cxferr.c -pram:temp_6.1_patch_x123/_cxferr.pch sasc_6.0_Disk_7:Source_And_Examples/source/_cxferr.c" ))
  939.       )
  940.    )
  941. (complete 91)
  942.    (if (exists "sc:help/scmsg.guide")
  943.       (
  944.          (working "Patching scmsg.guide")
  945.          (run ("ram:temp_6.1_patch_x12/spatch -osc:help/scmsg.guide -pram:temp_6.1_patch_x123/scmsgguide.pch sasc_6.0_Disk_7:Online_help/help/scmsg.guide" ))
  946.       )
  947.    )
  948. (complete 93)
  949.    (if (exists "sc:help/sc_util.guide")
  950.       (
  951.          (working "Patching sc_util.guide")
  952.          (run ("ram:temp_6.1_patch_x12/spatch -osc:help/sc_util.guide -pram:temp_6.1_patch_x123/sc_util.pch sasc_6.0_Disk_7:Online_help/help/sc_util.guide" ))
  953.       )
  954.    )
  955. (complete 95)
  956.    (if (exists "sc:help/sc.guide")
  957.       (
  958.          (working "Patching sc.guide")
  959.          (run ("ram:temp_6.1_patch_x12/spatch -osc:help/sc.guide -pram:temp_6.1_patch_x123/scguide.pch sasc_6.0_Disk_7:Online_help/help/sc.guide" ))
  960.       )
  961.    )
  962.    
  963. (complete 97)
  964.  
  965.    (if (exists "sc:extras/TTX/instructions")
  966.       (
  967.          (working "Patching ttx/instructions")
  968.          (run ("ram:temp_6.1_patch_x12/spatch -osc:extras/TTX/instructions -pram:temp_6.1_patch_x123/instructions.pch sasc_6.0_Disk_7:Source_And_Examples/extras/TTX/instructions" ))
  969.       )
  970.    )
  971.  
  972.    (if (exists "sc:extras/CED/rexx/ced/compile.ced")
  973.       (
  974.          (working "Patching ced/rexx/ced/compile.ced")
  975.          (run ("ram:temp_6.1_patch_x12/spatch -osc:extras/ced/rexx/ced/compile.ced -pram:temp_6.1_patch_x123/compile.pch sasc_6.0_Disk_7:Source_And_Examples/extras/ced/rexx/ced/compile.ced" ))
  976.       )
  977.    )
  978.  
  979. (complete 98)
  980.    (if (and (exists "sc:extras/TTX/rexx") (not (exists "sc:extras/TTX/TTX_SASC")))
  981.       (
  982.          (rename "sc:extras/TTX/rexx" "sc:extras/TTX/TTX_SASC")
  983.       )
  984.    )
  985.  
  986.    (if (exists "sc:examples/samplelib/test.fd.info")
  987.       (
  988.          (working "Patching examples/samplelib/test.fd.info")
  989.          (run ("ram:temp_6.1_patch_x12/spatch -osc:examples/samplelib/test.fd.info -pram:temp_6.1_patch_x123/test.pch sasc_6.0_Disk_7:Source_And_Examples/examples/samplelib/test.fd.info" ))
  990.       )
  991.    )
  992.  
  993.    (if (exists "sc:examples/samplelib/readme.info")
  994.       (
  995.          (working "Patching examples/samplelib/readme.info")
  996.          (run ("ram:temp_6.1_patch_x12/spatch -osc:examples/samplelib/readme.info -pram:temp_6.1_patch_x123/readme.pch sasc_6.0_Disk_7:Source_And_Examples/examples/samplelib/readme.info" ))
  997.       )
  998.    )
  999.  
  1000.    
  1001.    (copyfiles (source "readme_6.1") (dest "sc:"))
  1002.  
  1003.    (if (exists "sc:help")
  1004.     (
  1005.      (copyfiles (source "sc_6.1.guide") 
  1006.                 (dest "sc:help")
  1007.      )
  1008.      (copyfiles (source "sc_6.1.guide.inf") 
  1009.                 (dest "sc:help") 
  1010.                 (newname "sc_6.1.guide.info")
  1011.      )
  1012.     )
  1013.    ) 
  1014.  
  1015.    (copyfiles (source "readme_6.1.inf") 
  1016.               (dest "sc:")
  1017.               (newname "ReadMe_6.1.info")
  1018.    )
  1019.    
  1020.    (if (and (exists "sc:c/amigaguide") (exists "sc:help/sc_6.1.guide"))
  1021.      (run "run sc:c/amigaguide sc:help/sc_6.1.guide")
  1022.      (run "run ram:temp_6.1_patch_x12/more sc:readme_6.1")
  1023.    )
  1024.    
  1025.  
  1026. (complete 99)
  1027.  
  1028.  
  1029. (run "ram:temp_6.1_patch_x12/flush")
  1030. (run "delete ram:temp_6.1_patch_x12 all quiet")
  1031. (run "delete ram:temp_6.1_patch_x123 all quiet")
  1032.  
  1033.  
  1034. (complete 100)
  1035.  
  1036. )
  1037. ; else do floppy install
  1038. (
  1039.    
  1040.    (set @default-dest "")
  1041.    (copyfiles (source "c:delete") (dest "ram:temp_6.1_patch_x12"))
  1042.    (set thirddisk (askbool
  1043.                    (prompt "This procedure will patch the 2 or 3 disk set "
  1044.                            "created by the Floppy install from the compiler "
  1045.                            "installation. Did you create the 3 disk set?"
  1046.                    ) 
  1047.                    (help "Click Yes to patch the 3 disk set, or No for the "
  1048.                          "2 disk set."
  1049.                    )
  1050.                   )
  1051.    )
  1052.  
  1053. (makedir "ram:temp_6.1_patch_x123")
  1054. (makedir "ram:temp_6.1_patch_x12")
  1055. (copyfiles (source "sc.pch") (dest "ram:temp_6.1_patch_x123"))
  1056. (copyfiles (source "smake.pch") (dest "ram:temp_6.1_patch_x123"))
  1057. (copyfiles (source "slink.pch") (dest "ram:temp_6.1_patch_x123"))
  1058. (copyfiles (source "se.pch") (dest "ram:temp_6.1_patch_x123"))
  1059. (copyfiles (source "sedat.pch") (dest "ram:temp_6.1_patch_x123"))
  1060. (copyfiles (source "scopts.pch") (dest "ram:temp_6.1_patch_x123"))
  1061. (copyfiles (source "scmsg.pch") (dest "ram:temp_6.1_patch_x123"))
  1062. (copyfiles (source "sc1.pch") (dest "ram:temp_6.1_patch_x123"))
  1063. (copyfiles (source "sc2.pch") (dest "ram:temp_6.1_patch_x123"))
  1064. (copyfiles (source "scdebug.pch") (dest "ram:temp_6.1_patch_x123"))
  1065. (copyfiles (source "schi.pch") (dest "ram:temp_6.1_patch_x123"))
  1066.  
  1067. (copyfiles (source "SASC_6.0_Disk_1:more") (dest "ram:temp_6.1_patch_x12"))
  1068.  
  1069.  
  1070.  
  1071. ; need to make some room, since the patch increases the size of things
  1072. (if (exists "SAS_1:l/queue-handler")
  1073.     
  1074.     (delete "SAS_1:l/queue-handler") ; 2.0 has this
  1075.     
  1076.     (
  1077.       ; delete these under 1.3
  1078.       (if (exists "SAS_1:c/avail")
  1079.           (delete "SAS_1:c/avail")
  1080.       )
  1081.       (if (exists "SAS_1:c/setclock")
  1082.           (delete "SAS_1:c/setclock")
  1083.       )
  1084.     )
  1085. )
  1086.  
  1087.  
  1088. (complete 1)
  1089.    (if (exists "SAS_1:sc/c/sc")
  1090.      (
  1091.       (working "Patching sc")
  1092.       (run ("ram:temp_6.1_patch_x12/spatch -oSAS_1:sc/c/sc -pram:temp_6.1_patch_x123/sc.pch SASC_6.0_Disk_1:compiler/c/sc"))
  1093.      )
  1094.    )
  1095.  
  1096. (complete 5)
  1097.    (if (exists "SAS_1:sc/c/se")
  1098.      (
  1099.       (working "Patching se")
  1100.       (run ("ram:temp_6.1_patch_x12/spatch -oSAS_1:sc/c/se -pram:temp_6.1_patch_x123/se.pch SASC_6.0_Disk_1:compiler/c/se"))
  1101.      )
  1102.    )
  1103.  
  1104. (complete 8)
  1105.    (if (exists "SAS_1:sc/env/se.dat")
  1106.      (
  1107.       (working "Patching se.dat")
  1108.       (run ("ram:temp_6.1_patch_x12/spatch -oSAS_1:sc/env/se.dat -pram:temp_6.1_patch_x123/sedat.pch SASC_6.0_Disk_1:compiler/env/se.dat"))
  1109.      )
  1110.    )
  1111.    
  1112. (complete 12)
  1113.    (if (exists "SAS_1:sc/c/slink")
  1114.      (
  1115.       (working "Patching slink")
  1116.       (run ("ram:temp_6.1_patch_x12/spatch -oSAS_1:sc/c/slink -pram:temp_6.1_patch_x123/slink.pch SASC_6.0_Disk_1:compiler/c/slink"))
  1117.      )
  1118.    )
  1119.  
  1120. (complete 15)
  1121.    (if (exists "SAS_1:sc/c/smake")
  1122.      (
  1123.       (working "Patching smake")
  1124.       (run ("ram:temp_6.1_patch_x12/spatch -oSAS_1:sc/c/smake -pram:temp_6.1_patch_x123/smake.pch SASC_6.0_Disk_1:compiler/c/smake"))
  1125.      )
  1126.    )
  1127.  
  1128. (complete 18)
  1129.    (if (exists "SAS_1:sc/c/scopts")
  1130.      (
  1131.       (working "Patching scopts")
  1132.       (run ("ram:temp_6.1_patch_x12/spatch -oSAS_1:sc/c/scopts -pram:temp_6.1_patch_x123/scopts.pch SASC_6.0_Disk_1:compiler/c/scopts"))
  1133.      )
  1134.    )
  1135.    
  1136. (complete 21)
  1137.    (if (exists "SAS_1:sc/c/scmsg")
  1138.      (
  1139.       (working "Patching scmsg")
  1140.       (run ("ram:temp_6.1_patch_x12/spatch -oSAS_1:sc/c/scmsg -pram:temp_6.1_patch_x123/scmsg.pch SASC_6.0_Disk_1:compiler/c/scmsg"))
  1141.      )
  1142.    )
  1143.  
  1144. (complete 25)
  1145.    (if (exists "SAS_1:sc/libs/sc1.library")
  1146.      (
  1147.       (working "Patching sc1.library")
  1148.       (run ("ram:temp_6.1_patch_x12/spatch -oSAS_1:sc/libs/sc1.library -pram:temp_6.1_patch_x123/sc1.pch SASC_6.0_Disk_1:compiler/libs/sc1.library"))
  1149.      )
  1150.    )
  1151.  
  1152. (complete 29)
  1153.    (if (exists "SAS_1:sc/libs/sc2.library")
  1154.      (
  1155.       (working "Patching sc2.library")
  1156.       (run ("ram:temp_6.1_patch_x12/spatch -oSAS_1:sc/libs/sc2.library -pram:temp_6.1_patch_x123/sc2.pch SASC_6.0_Disk_1:compiler/libs/sc2.library"))
  1157.      )
  1158.    )
  1159.  
  1160.    (if (exists "SAS_1:sc/libs/scdebug.library")
  1161.      (
  1162.       (working "Patching scdebug.library")
  1163.       (run ("ram:temp_6.1_patch_x12/spatch -oSAS_1:sc/libs/scdebug.library -pram:temp_6.1_patch_x123/scdebug.pch SASC_6.0_Disk_1:compiler/libs/scdebug.library"))
  1164.      )
  1165.    )
  1166.  
  1167. (complete 33)
  1168.    (if (exists "SAS_1:sc/libs/schi.library")
  1169.      (
  1170.       (working "Patching schi.library")
  1171.       (run ("ram:temp_6.1_patch_x12/spatch -oSAS_1:sc/libs/schi.library -pram:temp_6.1_patch_x123/schi.pch SASC_6.0_Disk_3:debugger/libs/schi.library"))
  1172.      )
  1173.    )
  1174.  
  1175. (run "ram:temp_6.1_patch_x12/delete ram:temp_6.1_patch_x123/#? quiet")
  1176. (copyfiles (source "sclib.pch") (dest "ram:temp_6.1_patch_x123"))
  1177. (copyfiles (source "scm.pch") (dest "ram:temp_6.1_patch_x123"))
  1178. (copyfiles (source "c.pch") (dest "ram:temp_6.1_patch_x123"))
  1179. (copyfiles (source "cres.pch") (dest "ram:temp_6.1_patch_x123"))
  1180. (copyfiles (source "catch.pch") (dest "ram:temp_6.1_patch_x123"))
  1181. (copyfiles (source "catchres.pch") (dest "ram:temp_6.1_patch_x123"))
  1182. (copyfiles (source "catchresnr.pch") (dest "ram:temp_6.1_patch_x123"))
  1183. (copyfiles (source "catchnr.pch") (dest "ram:temp_6.1_patch_x123"))
  1184. (copyfiles (source "cback.pch") (dest "ram:temp_6.1_patch_x123"))
  1185. (copyfiles (source "cpr.pch") (dest "ram:temp_6.1_patch_x123"))
  1186. (copyfiles (source "fcntl.pch") (dest "ram:temp_6.1_patch_x123"))
  1187. (copyfiles (source "stat.pch") (dest "ram:temp_6.1_patch_x123"))
  1188. (copyfiles (source "dos.pch") (dest "ram:temp_6.1_patch_x123"))
  1189. (copyfiles (source "m68881.pch") (dest "ram:temp_6.1_patch_x123"))
  1190. (copyfiles (source "mffp.pch") (dest "ram:temp_6.1_patch_x123"))
  1191. (copyfiles (source "mieeedoub.pch") (dest "ram:temp_6.1_patch_x123"))
  1192. (copyfiles (source "stdarg.pch") (dest "ram:temp_6.1_patch_x123"))
  1193. (copyfiles (source "dir.pch") (dest "ram:temp_6.1_patch_x123"))
  1194. (copyfiles (source "all.pch") (dest "ram:temp_6.1_patch_x123"))
  1195. (copyfiles (source "layers.pch") (dest "ram:temp_6.1_patch_x123"))
  1196. (copyfiles (source "intuition_pragmas.pch") (dest "ram:temp_6.1_patch_x123"))
  1197.  
  1198. (complete 38)
  1199.    (if (exists "SAS_2:sc/lib/sc.lib")
  1200.      (
  1201.       (working "Patching sc.lib")
  1202.       (run ("ram:temp_6.1_patch_x12/spatch -oSAS_2:sc/lib/sc.lib -pram:temp_6.1_patch_x123/sclib.pch SASC_6.0_Disk_2:libraries/lib/sc.lib"))
  1203.      )
  1204.    )
  1205.  
  1206. (complete 42)
  1207.    (if (exists "SAS_2:sc/lib/scm.lib")
  1208.      (
  1209.       (working "Patching scm.lib")
  1210.       (run ("ram:temp_6.1_patch_x12/spatch -oSAS_2:sc/lib/scm.lib -pram:temp_6.1_patch_x123/scm.pch SASC_6.0_Disk_2:libraries/lib/scm.lib"))
  1211.      )
  1212.    )
  1213.  
  1214. (complete 45)
  1215.    (if (exists "SAS_2:sc/lib/c.o")
  1216.       (
  1217.          (working "Patching c.o")
  1218.          (run ("ram:temp_6.1_patch_x12/spatch -oSAS_2:sc/lib/c.o -pram:temp_6.1_patch_x123/c.pch sasc_6.0_Disk_2:libraries/lib/c.o" ))
  1219.       )
  1220.    )
  1221. (complete 47)
  1222.    (if (exists "SAS_2:sc/lib/cres.o")
  1223.       (
  1224.          (working "Patching cres.o")
  1225.          (run ("ram:temp_6.1_patch_x12/spatch -oSAS_2:sc/lib/cres.o -pram:temp_6.1_patch_x123/cres.pch sasc_6.0_Disk_2:libraries/lib/cres.o" ))
  1226.       )
  1227.    )
  1228. (complete 49)
  1229.    (if (exists "SAS_2:sc/lib/catch.o")
  1230.       (
  1231.          (working "Patching catch.o")
  1232.          (run ("ram:temp_6.1_patch_x12/spatch -oSAS_2:sc/lib/catch.o -pram:temp_6.1_patch_x123/catch.pch sasc_6.0_Disk_2:libraries/lib/catch.o" ))
  1233.       )
  1234.    )
  1235. (complete 53)
  1236.    (if (exists "SAS_2:sc/lib/catchresnr.o")
  1237.       (
  1238.          (working "Patching catchresnr.o")
  1239.          (run ("ram:temp_6.1_patch_x12/spatch -oSAS_2:sc/lib/catchresnr.o -pram:temp_6.1_patch_x123/catchresnr.pch sasc_6.0_Disk_2:libraries/lib/catchresnr.o" ))
  1240.       )
  1241.    )
  1242. (complete 56)
  1243.    (if (exists "SAS_2:sc/lib/catchres.o")
  1244.       (
  1245.          (working "Patching catchres.o")
  1246.          (run ("ram:temp_6.1_patch_x12/spatch -oSAS_2:sc/lib/catchres.o -pram:temp_6.1_patch_x123/catchres.pch sasc_6.0_Disk_2:libraries/lib/catchres.o" ))
  1247.       )
  1248.    )
  1249. (complete 59)
  1250.    (if (exists "SAS_2:sc/lib/catchnr.o")
  1251.       (
  1252.          (working "Patching catchnr.o")
  1253.          (run ("ram:temp_6.1_patch_x12/spatch -oSAS_2:sc/lib/catchnr.o -pram:temp_6.1_patch_x123/catchnr.pch sasc_6.0_Disk_2:libraries/lib/catchnr.o" ))
  1254.       )
  1255.    )
  1256. (complete 61)
  1257.    (if (exists "SAS_2:sc/lib/cback.o")
  1258.       (
  1259.          (working "Patching cback.o")
  1260.          (run ("ram:temp_6.1_patch_x12/spatch -oSAS_2:sc/lib/cback.o -pram:temp_6.1_patch_x123/cback.pch sasc_6.0_Disk_2:libraries/lib/cback.o" ))
  1261.       )
  1262.    )
  1263. (complete 63)
  1264.    (if (exists "SAS_2:sc/c/cpr")
  1265.      (
  1266.       (working "Patching cpr")
  1267.       (run ("ram:temp_6.1_patch_x12/spatch -oSAS_2:sc/c/cpr -pram:temp_6.1_patch_x123/cpr.pch SASC_6.0_Disk_3:debugger/c/cpr"))
  1268.      )
  1269.    )
  1270.  
  1271.  
  1272. (complete 67)
  1273.    (if (exists "SAS_2:sc/include/fcntl.h")
  1274.      (
  1275.        (working "Patching fcntl.h")
  1276.        (run ("ram:temp_6.1_patch_x12/spatch -oram:temp_header.h -pram:temp_6.1_patch_x123/fcntl.pch SASC_6.0_Disk_3:Compiler_headers/include/fcntl.h"))
  1277.        (run ("ram:temp_6.1_patch_x12/scompact force ram:temp_header.h SAS_2:sc/include/fcntl.h"))
  1278.      )
  1279.    )
  1280.    
  1281. (complete 69)
  1282.    (if (exists "SAS_2:sc/include/stat.h")
  1283.      (
  1284.        (working "Patching stat.h")
  1285.        (run ("ram:temp_6.1_patch_x12/spatch -oram:temp_header.h -pram:temp_6.1_patch_x123/stat.pch SASC_6.0_Disk_3:Compiler_headers/include/stat.h"))
  1286.        (run ("ram:temp_6.1_patch_x12/scompact force ram:temp_header.h SAS_2:sc/include/stat.h"))
  1287.      )
  1288.    )
  1289.    
  1290. (complete 70)
  1291.    (if (exists "SAS_2:sc/include/dos.h")
  1292.      (
  1293.        (working "Patching dos.h")
  1294.        (run ("ram:temp_6.1_patch_x12/spatch -oram:temp_header.h -pram:temp_6.1_patch_x123/dos.pch SASC_6.0_Disk_3:Compiler_headers/include/dos.h"))
  1295.        (run ("ram:temp_6.1_patch_x12/scompact force ram:temp_header.h SAS_2:sc/include/dos.h"))
  1296.      )
  1297.    )
  1298.    
  1299. (complete 71)
  1300.    (if (exists "SAS_2:sc/include/m68881.h")
  1301.      (
  1302.        (working "Patching m68881.h")
  1303.        (run ("ram:temp_6.1_patch_x12/spatch -oram:temp_header.h -pram:temp_6.1_patch_x123/m68881.pch SASC_6.0_Disk_3:Compiler_headers/include/m68881.h"))
  1304.        (run ("ram:temp_6.1_patch_x12/scompact force ram:temp_header.h SAS_2:sc/include/m68881.h"))
  1305.      )
  1306.    )
  1307.    (if (exists "SAS_2:sc/include/mffp.h")
  1308.      (
  1309.        (working "Patching mffp.h")
  1310.        (run ("ram:temp_6.1_patch_x12/spatch -oram:temp_header.h -pram:temp_6.1_patch_x123/mffp.pch SASC_6.0_Disk_3:Compiler_headers/include/mffp.h"))
  1311.        (run ("ram:temp_6.1_patch_x12/scompact force ram:temp_header.h SAS_2:sc/include/mffp.h"))
  1312.      )
  1313.    )
  1314.    (if (exists "SAS_2:sc/include/mieeedoub.h")
  1315.      (
  1316.        (working "Patching mieeedoub.h")
  1317.        (run ("ram:temp_6.1_patch_x12/spatch -oram:temp_header.h -pram:temp_6.1_patch_x123/mieeedoub.pch SASC_6.0_Disk_3:Compiler_headers/include/mieeedoub.h"))
  1318.        (run ("ram:temp_6.1_patch_x12/scompact force ram:temp_header.h SAS_2:sc/include/mieeedoub.h"))
  1319.      )
  1320.    )
  1321.  
  1322. (complete 72)
  1323.    (if (exists "SAS_2:sc/include/stdarg.h")
  1324.      (
  1325.        (working "Patching stdarg.h")
  1326.        (run ("ram:temp_6.1_patch_x12/spatch -oram:temp_header.h -pram:temp_6.1_patch_x123/stdarg.pch SASC_6.0_Disk_3:Compiler_headers/include/stdarg.h"))
  1327.        (run ("ram:temp_6.1_patch_x12/scompact force ram:temp_header.h SAS_2:sc/include/stdarg.h"))
  1328.      )
  1329.    )
  1330.    
  1331.  
  1332. (complete 73)
  1333.    (if (exists "SAS_2:sc/include/sys/dir.h")
  1334.      (
  1335.        (working "Patching sys/dir.h")
  1336.        (run ("ram:temp_6.1_patch_x12/spatch -oram:temp_header.h -pram:temp_6.1_patch_x123/dir.pch SASC_6.0_Disk_3:Compiler_headers/include/sys/dir.h"))
  1337.        (run ("ram:temp_6.1_patch_x12/scompact force ram:temp_header.h SAS_2:sc/include/sys/dir.h"))
  1338.      )
  1339.    )
  1340.    
  1341.  
  1342. ; do the 2 that just need to be recompressed
  1343.  
  1344. (complete 74)
  1345.    (if (exists "SAS_2:sc/include/stdio.h")
  1346.      (
  1347.        (working "Patching stdio.h")
  1348.        (copyfiles 
  1349.           (source "SASC_6.0_Disk_3:Compiler_headers/include/stdio.h")
  1350.           (dest "ram:temp_6.1_patch_x123")
  1351.        )
  1352.        (run ("ram:temp_6.1_patch_x12/scompact force ram:temp_6.1_patch_x123/stdio.h SAS_2:sc/include/stdio.h"))
  1353.      )
  1354.    )
  1355.  
  1356. (complete 75)
  1357.    (if (exists "SAS_2:sc/include/dos/stdio.h")
  1358.      (
  1359.        (working "Patching dos/stdio.h")
  1360.        (copyfiles 
  1361.           (source "SASC_6.0_Disk_4:Compiler_headers/include/dos/stdio.h")
  1362.           (dest "ram:temp_6.1_patch_x123")
  1363.        )
  1364.        (run ("ram:temp_6.1_patch_x12/scompact force ram:temp_6.1_patch_x123/stdio.h SAS_2:sc/include/dos/stdio.h"))
  1365.      )
  1366.    )
  1367.  
  1368. (complete 76)
  1369.    (if (exists "SAS_2:sc/include/proto/all.h")
  1370.      (
  1371.        (working "Patching proto/all.h")
  1372.        (run ("ram:temp_6.1_patch_x12/spatch -oram:temp_header.h -pram:temp_6.1_patch_x123/all.pch SASC_6.0_Disk_4:Compiler_headers/include/proto/all.h"))
  1373.        (run ("ram:temp_6.1_patch_x12/scompact force ram:temp_header.h SAS_2:sc/include/proto/all.h"))
  1374.      )
  1375.    )
  1376.    
  1377. (complete 77)
  1378.    (if (exists "SAS_2:sc/include/proto/layers.h")
  1379.      (
  1380.        (working "Patching proto/layers.h")
  1381.        (run ("ram:temp_6.1_patch_x12/spatch -oram:temp_header.h -pram:temp_6.1_patch_x123/layers.pch SASC_6.0_Disk_4:Compiler_headers/include/proto/layers.h"))
  1382.        (run ("ram:temp_6.1_patch_x12/scompact force ram:temp_header.h SAS_2:sc/include/proto/layers.h"))
  1383.      )
  1384.    )
  1385.    
  1386. (complete 78)
  1387.    (if (exists "SAS_2:sc/include/pragmas/intuition_pragmas.h")
  1388.      (
  1389.        (working "Patching pragmas/intuition.h")
  1390.        (run ("ram:temp_6.1_patch_x12/spatch -oram:temp_header.h -pram:temp_6.1_patch_x123/intuition_pragmas.pch SASC_6.0_Disk_4:Compiler_headers/include/pragmas/intuition_pragmas.h"))
  1391.        (run ("ram:temp_6.1_patch_x12/scompact force ram:temp_header.h SAS_2:sc/include/pragmas/intuition_pragmas.h"))
  1392.      )
  1393.    )
  1394.    
  1395.  
  1396.    (if (= 1 thirddisk)
  1397.      (
  1398.  
  1399. (run "ram:temp_6.1_patch_x12/delete ram:temp_6.1_patch_x123/#? quiet")
  1400. (copyfiles (source "scpeep.pch") (dest "ram:temp_6.1_patch_x123"))
  1401. (copyfiles (source "sekeymap.pch") (dest "ram:temp_6.1_patch_x123"))
  1402. (copyfiles (source "sclist.pch") (dest "ram:temp_6.1_patch_x123"))
  1403. (copyfiles (source "oml.pch") (dest "ram:temp_6.1_patch_x123"))
  1404. (copyfiles (source "omd.pch") (dest "ram:temp_6.1_patch_x123"))
  1405. (copyfiles (source "hypergst.pch") (dest "ram:temp_6.1_patch_x123"))
  1406. (copyfiles (source "dumpobj.pch") (dest "ram:temp_6.1_patch_x123"))
  1407. (copyfiles (source "lstat.pch") (dest "ram:temp_6.1_patch_x123"))
  1408. (copyfiles (source "lprof.pch") (dest "ram:temp_6.1_patch_x123"))
  1409. (copyfiles (source "sc5.pch") (dest "ram:temp_6.1_patch_x123"))
  1410. (copyfiles (source "tb.pch") (dest "ram:temp_6.1_patch_x123"))
  1411. (copyfiles (source "lctosc.pch") (dest "ram:temp_6.1_patch_x123"))
  1412.  
  1413. (complete 79)
  1414.         (if (exists "SAS_3:sc/c/scompact")
  1415.           (
  1416.              (copyfiles (source "ram:temp_6.1_patch_x12/scompact")
  1417.                         (dest "SAS_3:sc/c")
  1418.              )
  1419.           )
  1420.         )
  1421.  
  1422. (complete 81)
  1423.         (if (exists "SAS_3:sc/libs/scpeep.library")
  1424.           (
  1425.             (working "Patching scpeep.library")
  1426.             (run ("ram:temp_6.1_patch_x12/spatch -oSAS_3:sc/libs/scpeep.library -pram:temp_6.1_patch_x123/scpeep.pch sasc_6.0_Disk_3:Optimizers/libs/scpeep.library" ))
  1427.           )
  1428.         )
  1429.         
  1430. (complete 83)
  1431.         (if (exists "SAS_3:sc/libs/sekeymap.library")
  1432.           (
  1433.             (working "Patching sekeymap.library")
  1434.             (run ("ram:temp_6.1_patch_x12/spatch -oSAS_3:sc/libs/sekeymap.library -pram:temp_6.1_patch_x123/sekeymap.pch sasc_6.0_Disk_5:Extra_Utilities/libs/sekeymap.library" ))
  1435.           )
  1436.         )
  1437.         
  1438.         (if (exists "SAS_3:sc/libs/sclist.library")
  1439.           (
  1440.             (working "Patching sclist.library")
  1441.             (run ("ram:temp_6.1_patch_x12/spatch -oSAS_3:sc/libs/sclist.library -pram:temp_6.1_patch_x123/sclist.pch sasc_6.0_Disk_5:Extra_Utilities/libs/sclist.library" ))
  1442.           )
  1443.         )
  1444.         
  1445. (complete 85)
  1446.         (if (exists "SAS_3:sc/c/dumpobj")
  1447.           (
  1448.             (working "Patching dumpobj")
  1449.             (run ("ram:temp_6.1_patch_x12/spatch -oSAS_3:sc/c/dumpobj -pram:temp_6.1_patch_x123/dumpobj.pch sasc_6.0_Disk_5:Extra_Utilities/c/dumpobj" ))
  1450.           )
  1451.         )
  1452.  
  1453. (complete 86)
  1454.         (if (exists "SAS_3:sc/c/omd")
  1455.           (
  1456.             (working "Patching omd")
  1457.             (run ("ram:temp_6.1_patch_x12/spatch -oSAS_3:sc/c/omd -pram:temp_6.1_patch_x123/omd.pch sasc_6.0_Disk_5:Extra_Utilities/c/omd" ))
  1458.           )
  1459.         )
  1460.  
  1461. (complete 87)
  1462.         (if (exists "SAS_3:sc/c/hypergst")
  1463.           (
  1464.             (working "Patching hypergst")
  1465.             (run ("ram:temp_6.1_patch_x12/spatch -oSAS_3:sc/c/hypergst -pram:temp_6.1_patch_x123/hypergst.pch sasc_6.0_Disk_5:Extra_Utilities/c/hypergst" ))
  1466.           )
  1467.         )
  1468.    
  1469. (complete 88)
  1470.         (if (exists "SAS_3:sc/c/oml")
  1471.           (
  1472.             (working "Patching oml")
  1473.             (run ("ram:temp_6.1_patch_x12/spatch -oSAS_3:sc/c/oml -pram:temp_6.1_patch_x123/oml.pch sasc_6.0_Disk_6:Extra_Utilities/c/oml" ))
  1474.           )
  1475.         )
  1476.         
  1477. (complete 90)
  1478.         (if (exists "SAS_3:sc/c/lstat")
  1479.           (
  1480.             (working "Patching lstat")
  1481.             (run ("ram:temp_6.1_patch_x12/spatch -oSAS_3:sc/c/lstat -pram:temp_6.1_patch_x123/lstat.pch sasc_6.0_Disk_6:Extra_Utilities/c/lstat" ))
  1482.           )
  1483.         )
  1484.    
  1485. (complete 92)
  1486.         (if (exists "SAS_3:sc/c/lprof")
  1487.           (
  1488.             (working "Patching lprof")
  1489.             (run ("ram:temp_6.1_patch_x12/spatch -oSAS_3:sc/c/lprof -pram:temp_6.1_patch_x123/lprof.pch sasc_6.0_Disk_6:Extra_Utilities/c/lprof" ))
  1490.           )
  1491.         )
  1492.    
  1493. (complete 94)
  1494.         (if (exists "SAS_3:sc/c/sc5")
  1495.           (
  1496.             (working "Patching sc5")
  1497.             (run ("ram:temp_6.1_patch_x12/spatch -oSAS_3:sc/c/sc5 -pram:temp_6.1_patch_x123/sc5.pch sasc_6.0_Disk_6:Extra_Utilities/c/sc5" ))
  1498.           )
  1499.         )
  1500.  
  1501. (complete 96)
  1502.         (if (exists "SAS_3:sc/c/tb")
  1503.           (
  1504.             (working "Patching tb")
  1505.             (run ("ram:temp_6.1_patch_x12/spatch -oSAS_3:sc/c/tb -pram:temp_6.1_patch_x123/tb.pch sasc_6.0_Disk_6:Extra_Utilities/c/tb" ))
  1506.           )
  1507.         )
  1508.  
  1509. (complete 98)
  1510.         (if (exists "SAS_3:sc/c/lctosc")
  1511.           (
  1512.             (working "Patching lctosc")
  1513.             (run ("ram:temp_6.1_patch_x12/spatch -oSAS_3:sc/c/lctosc -pram:temp_6.1_patch_x123/lctosc.pch sasc_6.0_Disk_6:Extra_Utilities/c/lctosc" ))
  1514.           )
  1515.         )
  1516.  
  1517.       )
  1518.    )
  1519.  
  1520.  
  1521. (run "run ram:temp_6.1_patch_x12/more readme_6.1")
  1522.  
  1523. (complete 99)
  1524. (run "ram:temp_6.1_patch_x12/flush")
  1525. (run "ram:temp_6.1_patch_x12/delete ram:temp_6.1_patch_x123 all quiet")
  1526. (run "ram:temp_6.1_patch_x12/delete ram:temp_6.1_patch_x12 all quiet")
  1527.  
  1528.  
  1529. (complete 100)
  1530. )
  1531. )
  1532.    
  1533.    
  1534.