home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga Elysian Archive
/
AmigaElysianArchive.iso
/
prog
/
c
/
sc6_1.lha
/
Install-6.1-Patch
< prev
next >
Wrap
Text File
|
1992-11-23
|
55KB
|
1,534 lines
(complete 0)
(set @default-dest "SC:")
(set answer1
(askchoice
(prompt "Choose where to install 6.1 Patch")
(choices "Hard Disk" "Floppy Disk")
(help "Selecting Hard Disk will patch the files in SC: by reading "
"the original files from the master floppies, and writing "
"the new version to its proper place in the SC: directory. "
"Selecting Floppy Disk will patch the set of 2 or 3 disks "
"created by the Floppy install.\n\n"
"Neither of these choices will modify any files on the originals."
)
(default 0)
)
)
(makedir "ram:temp_6.1_patch_x12")
(copyfiles (source "spatch") (dest "ram:temp_6.1_patch_x12"))
(copyfiles (source "scompact") (dest "ram:temp_6.1_patch_x12"))
(copyfiles (source "flush") (dest "ram:temp_6.1_patch_x12"))
(if (= answer1 0)
(
(set answer2
(askchoice
(prompt "Do you want the patched header files compressed?")
(choices "Yes" "No")
(help "If you originally installed the headers files "
"compressed, then you probably want to select "
"YES now. Otherwise choose NO"
)
(default 1)
)
)
(makedir "ram:temp_6.1_patch_x123")
(copyfiles (source "read.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "sc.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "smake.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "slink.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "se.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "sedat.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "scopts.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "scmsg.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "sc1.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "sc2.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "scdebug.pch") (dest "ram:temp_6.1_patch_x123"))
(askdisk (assigns) (dest "SASC_6.0_Disk_1")
(prompt "Please Insert Disk 1 of the SAS/C Development System")
(help "Insert Disk 1 in any drive. The files will be read from "
"Disk 1, and placed in SC:. Nothing on Disk 1 will be "
"modified."
)
)
(copyfiles (source "SASC_6.0_Disk_1:more") (dest "ram:temp_6.1_patch_x12"))
(complete 1)
(if (exists "sc:read.me")
(
(working "Patching read.me")
(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"))
)
)
(complete 2)
(if (exists "sc:c/sc")
(
(working "Patching sc")
(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"))
)
)
(complete 3)
(if (exists "sc:c/smake")
(
(working "Patching smake")
(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"))
)
)
(complete 5)
(if (exists "sc:c/scopts")
(
(working "Patching scopts")
(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" ))
)
)
(complete 6)
(if (exists "sc:c/scmsg")
(
(working "Patching scmsg")
(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" ))
)
)
(complete 8)
(if (exists "sc:c/slink")
(
(working "Patching slink")
(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" ))
)
)
(complete 9)
(if (exists "sc:c/se")
(
(working "Patching se")
(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" ))
)
)
(if (exists "sc:env/se.dat")
(
(working "Patching se.dat")
(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" ))
)
)
(complete 11)
(if (exists "sc:libs/sc1.library")
(
(working "Patching sc1.library")
(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" ))
)
)
(complete 13)
(if (exists "sc:libs/sc2.library")
(
(working "Patching sc2.library")
(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" ))
)
)
(if (exists "sc:libs/scdebug.library")
(
(working "Patching scdebug.library")
(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" ))
)
)
(run "delete ram:temp_6.1_patch_x123/#? quiet")
(copyfiles (source "sclib.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "scs.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "scnb.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "scsnb.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "scm.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "scms.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "scmieee.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "scmffp.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "scm881.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "c.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "cres.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "catch.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "catchres.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "catchresnr.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "catchnr.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "cback.pch") (dest "ram:temp_6.1_patch_x123"))
(askdisk (assigns) (dest "SASC_6.0_Disk_2")
(prompt "Please Insert Disk 2 of the SAS/C Development System")
(help "Insert Disk 2 in any drive. The files will be read from "
"Disk 2, and placed in SC:. Nothing on Disk 2 will be "
"modified."
)
)
(complete 15)
(if (exists "sc:lib/sc.lib")
(
(working "Patching sc.lib")
(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" ))
)
)
(complete 16)
(if (exists "sc:lib/scs.lib")
(
(working "Patching scs.lib")
(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" ))
)
)
(complete 17)
(if (exists "sc:lib/scnb.lib")
(
(working "Patching scnb.lib")
(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" ))
)
)
(complete 19)
(if (exists "sc:lib/scsnb.lib")
(
(working "Patching scsnb.lib")
(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" ))
)
)
(complete 21)
(if (exists "sc:lib/scm.lib")
(
(working "Patching scm.lib")
(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" ))
)
)
(complete 22)
(if (exists "sc:lib/scms.lib")
(
(working "Patching scms.lib")
(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" ))
)
)
(complete 23)
(if (exists "sc:lib/scmieee.lib")
(
(working "Patching scmieee.lib")
(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" ))
)
)
(complete 24)
(if (exists "sc:lib/scmffp.lib")
(
(working "Patching scmffp.lib")
(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" ))
)
)
(complete 25)
(if (exists "sc:lib/scm881.lib")
(
(working "Patching scm881.lib")
(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" ))
)
)
(complete 26)
(if (exists "sc:lib/c.o")
(
(working "Patching c.o")
(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" ))
)
)
(complete 27)
(if (exists "sc:lib/cres.o")
(
(working "Patching cres.o")
(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" ))
)
)
(complete 28)
(if (exists "sc:lib/catch.o")
(
(working "Patching catch.o")
(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" ))
)
)
(complete 29)
(if (exists "sc:lib/catchresnr.o")
(
(working "Patching catchresnr.o")
(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" ))
)
)
(complete 30)
(if (exists "sc:lib/catchres.o")
(
(working "Patching catchres.o")
(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" ))
)
)
(complete 31)
(if (exists "sc:lib/catchnr.o")
(
(working "Patching catchnr.o")
(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" ))
)
)
(complete 32)
(if (exists "sc:lib/cback.o")
(
(working "Patching cback.o")
(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" ))
)
)
(run "delete ram:temp_6.1_patch_x123/#? quiet")
(copyfiles (source "cpr.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "cprx.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "cprk.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "schi.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "scpeep.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "fcntl.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "stat.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "dos.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "m68881.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "mffp.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "mieeedoub.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "stdarg.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "dir.pch") (dest "ram:temp_6.1_patch_x123"))
(askdisk (assigns) (dest "SASC_6.0_Disk_3")
(prompt "Please Insert Disk 3 of the SAS/C Development System")
(help "Insert Disk 3 in any drive. The files will be read from "
"Disk 3, and placed in SC:. Nothing on Disk 3 will be "
"modified."
)
)
(complete 33)
(if (exists "sc:c/cpr")
(
(working "Patching cpr")
(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" ))
)
)
(complete 35)
(if (exists "sc:c/cprx")
(
(working "Patching cprx")
(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" ))
)
)
(complete 37)
(if (exists "sc:c/cprk")
(
(working "Patching cprk")
(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" ))
)
)
(complete 40)
(if (exists "sc:libs/schi.library")
(
(working "Patching schi.library")
(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" ))
)
)
(complete 42)
(if (exists "sc:libs/scpeep.library")
(
(working "Patching scpeep.library")
(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" ))
)
)
(if (AND (= @pretend 0) (exists "sc:c/scompact"))
(copyfiles (source "ram:temp_6.1_patch_x12/scompact") (dest "sc:c"))
)
; must recompact stdio.h and dos/stdio.h if compressed heraders installed
(if (= answer2 0)
(
(if (exists "sc:include/stdio.h")
(
(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"))
(if (= 0 @pretend)
(
(copyfiles (source "ram:temp_6.1_patch_x12/stdio.h")
(dest "sc:include")
)
)
(delete "ram:stdio.h")
)
)
)
)
)
(complete 45)
(if (exists "sc:include/fcntl.h")
(
(working "Patching fcntl.h")
(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" ))
(if (= answer2 0)
(
(run ("ram:temp_6.1_patch_x12/scompact force sc:include/fcntl.h ram:temp_6.1_patch_x12/fcntl.h"))
(if (= 0 @pretend)
(
(copyfiles (source "ram:temp_6.1_patch_x12/fcntl.h")
(dest "sc:include")
)
(delete "ram:temp_6.1_patch_x12/fcntl.h")
)
)
)
)
)
)
(complete 46)
(if (exists "sc:include/stat.h")
(
(working "Patching stat.h")
(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" ))
(if (= answer2 0)
(
(run ("ram:temp_6.1_patch_x12/scompact force sc:include/stat.h ram:temp_6.1_patch_x12/stat.h"))
(if (= 0 @pretend)
(
(copyfiles (source "ram:temp_6.1_patch_x12/stat.h")
(dest "sc:include")
)
(delete "ram:temp_6.1_patch_x12/stat.h")
)
)
)
)
)
)
(complete 47)
(if (exists "sc:include/dos.h")
(
(working "Patching dos.h")
(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" ))
(if (= answer2 0)
(
(run ("ram:temp_6.1_patch_x12/scompact force sc:include/dos.h ram:temp_6.1_patch_x12/dos.h"))
(if (= 0 @pretend)
(
(copyfiles (source "ram:temp_6.1_patch_x12/dos.h")
(dest "sc:include")
)
(delete "ram:temp_6.1_patch_x12/dos.h")
)
)
)
)
)
)
(complete 48)
(if (exists "sc:include/m68881.h")
(
(working "Patching m68881.h")
(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" ))
(if (= answer2 0)
(
(run ("ram:temp_6.1_patch_x12/scompact force sc:include/m68881.h ram:temp_6.1_patch_x12/m68881.h"))
(if (= 0 @pretend)
(
(copyfiles (source "ram:temp_6.1_patch_x12/m68881.h")
(dest "sc:include")
)
(delete "ram:temp_6.1_patch_x12/m68881.h")
)
)
)
)
)
)
(if (exists "sc:include/mffp.h")
(
(working "Patching mffp.h")
(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" ))
(if (= answer2 0)
(
(run ("ram:temp_6.1_patch_x12/scompact force sc:include/mffp.h ram:temp_6.1_patch_x12/mffp.h"))
(if (= 0 @pretend)
(
(copyfiles (source "ram:temp_6.1_patch_x12/mffp.h")
(dest "sc:include")
)
(delete "ram:temp_6.1_patch_x12/mffp.h")
)
)
)
)
)
)
(if (exists "sc:include/mieeedoub.h")
(
(working "Patching mieeedoub.h")
(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" ))
(if (= answer2 0)
(
(run ("ram:temp_6.1_patch_x12/scompact force sc:include/mieeedoub.h ram:temp_6.1_patch_x12/mieeedoub.h"))
(if (= 0 @pretend)
(
(copyfiles (source "ram:temp_6.1_patch_x12/mieeedoub.h")
(dest "sc:include")
)
(delete "ram:temp_6.1_patch_x12/mieeedoub.h")
)
)
)
)
)
)
(complete 49)
(if (exists "sc:include/stdarg.h")
(
(working "Patching stdarg.h")
(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" ))
(if (= answer2 0)
(
(run ("ram:temp_6.1_patch_x12/scompact force sc:include/stdarg.h ram:temp_6.1_patch_x12/stdarg.h"))
(if (= 0 @pretend)
(
(copyfiles (source "ram:temp_6.1_patch_x12/stdarg.h")
(dest "sc:include")
)
(delete "ram:temp_6.1_patch_x12/stdarg.h")
)
)
)
)
)
)
(complete 50)
(if (exists "sc:include/sys/dir.h")
(
(working "Patching sys/dir.h")
(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" ))
(if (= answer2 0)
(
(run ("ram:temp_6.1_patch_x12/scompact force sc:include/sys/dir.h ram:temp_6.1_patch_x12/dir.h"))
(if (= 0 @pretend)
(
(copyfiles (source "ram:temp_6.1_patch_x12/dir.h")
(dest "sc:include/sys")
)
(delete "ram:temp_6.1_patch_x12/dir.h")
)
)
)
)
)
)
(run "delete ram:temp_6.1_patch_x123/#? quiet")
(copyfiles (source "all.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "layers.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "intuition_pragmas.pch") (dest "ram:temp_6.1_patch_x123"))
(askdisk (assigns) (dest "SASC_6.0_Disk_4")
(prompt "Please Insert Disk 4 of the SAS/C Development System")
(help "Insert Disk 4 in any drive. The files will be read from "
"Disk 4, and placed in SC:. Nothing on Disk 4 will be "
"modified."
)
)
(if (= answer2 0)
(
(if (exists "sc:include/dos/stdio.h")
(
(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"))
(if (= 0 @pretend)
(
(copyfiles (source "ram:temp_6.1_patch_x12/stdio.h")
(dest "sc:include/dos")
)
)
(delete "ram:temp_6.1_patch_x12/stdio.h")
)
)
)
)
)
(complete 51)
(if (exists "sc:include/proto/all.h")
(
(working "Patching proto/all.h")
(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" ))
(if (= answer2 0)
(
(run ("ram:temp_6.1_patch_x12/scompact force sc:include/proto/all.h ram:temp_6.1_patch_x12/all.h"))
(if (= 0 @pretend)
(
(copyfiles (source "ram:temp_6.1_patch_x12/all.h")
(dest "sc:include/proto")
)
(delete "ram:temp_6.1_patch_x12/all.h")
)
)
)
)
)
)
(complete 52)
(if (exists "sc:include/proto/layers.h")
(
(working "Patching proto/layers.h")
(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" ))
(if (= answer2 0)
(
(run ("ram:temp_6.1_patch_x12/scompact force sc:include/proto/layers.h ram:temp_6.1_patch_x12/layers.h"))
(if (= 0 @pretend)
(
(copyfiles (source "ram:temp_6.1_patch_x12/layers.h")
(dest "sc:include/proto")
)
(delete "ram:temp_6.1_patch_x12/layers.h")
)
)
)
)
)
)
(complete 53)
(if (exists "sc:include/pragmas/intuition_pragmas.h")
(
(working "Patching pragmas/intuition_pragmas.h")
(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" ))
(if (= answer2 0)
(
(run ("ram:temp_6.1_patch_x12/scompact force sc:include/pragmas/intuition_pragmas.h ram:temp_6.1_patch_x12/intuition_pragmas.h"))
(if (= 0 @pretend)
(
(copyfiles (source "ram:temp_6.1_patch_x12/intuition_pragmas.h")
(dest "sc:include/pragmas")
)
(delete "ram:temp_6.1_patch_x12/.h")
)
)
)
)
)
)
(run "delete ram:temp_6.1_patch_x123/#? quiet")
(copyfiles (source "sclist.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "sekeymap.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "asm.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "dumpobj.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "omd.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "hypergst.pch") (dest "ram:temp_6.1_patch_x123"))
(askdisk (assigns) (dest "SASC_6.0_Disk_5")
(prompt "Please Insert Disk 5 of the SAS/C Development System")
(help "Insert Disk 5 in any drive. The files will be read from "
"Disk 5, and placed in SC:. Nothing on Disk 5 will be "
"modified."
)
)
(complete 54)
(if (exists "sc:libs/sekeymap.library")
(
(working "Patching sekeymap.library")
(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" ))
)
)
(if (exists "sc:libs/sclist.library")
(
(working "Patching sclist.library")
(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" ))
)
)
(complete 56)
(if (exists "sc:c/asm")
(
(working "Patching asm")
(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" ))
)
)
(complete 58)
(if (exists "sc:c/dumpobj")
(
(working "Patching dumpobj")
(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" ))
)
)
(complete 59)
(if (exists "sc:c/omd")
(
(working "Patching omd")
(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" ))
)
)
(complete 61)
(if (exists "sc:c/hypergst")
(
(working "Patching hypergst")
(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" ))
)
)
(run "delete ram:temp_6.1_patch_x123/#? quiet")
(copyfiles (source "oml.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "lstat.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "lprof.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "sc5.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "tb.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "lctosc.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "findsym.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "showcli.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "showprocess.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "sc_lib.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "sc_prob.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "sc_change.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "cprguide.pch") (dest "ram:temp_6.1_patch_x123"))
(askdisk (assigns) (dest "SASC_6.0_Disk_6")
(prompt "Please Insert Disk 6 of the SAS/C Development System")
(help "Insert Disk 6 in any drive. The files will be read from "
"Disk 6, and placed in SC:. Nothing on Disk 6 will be "
"modified."
)
)
(complete 63)
(if (exists "sc:c/oml")
(
(working "Patching oml")
(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" ))
)
)
(complete 64)
(if (exists "sc:c/lstat")
(
(working "Patching lstat")
(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" ))
)
)
(complete 66)
(if (exists "sc:c/lprof")
(
(working "Patching lprof")
(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" ))
)
)
(complete 68)
(if (exists "sc:c/sc5")
(
(working "Patching sc5")
(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" ))
)
)
(complete 70)
(if (exists "sc:c/tb")
(
(working "Patching tb")
(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" ))
)
)
(complete 72)
(if (exists "sc:c/lctosc")
(
(working "Patching lctosc")
(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" ))
)
)
(complete 74)
(if (exists "sc:rexx/findsym.se")
(
(working "Patching findsym.se")
(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" ))
)
)
(complete 75)
(if (exists "sc:rexx/showprocess.cpr")
(
(working "Patching showprocess.cpr")
(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" ))
)
)
(complete 76)
(if (exists "sc:rexx/showcli.cpr")
(
(working "Patching showcli.cpr")
(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" ))
)
)
(complete 77)
(if (exists "sc:help/sc_lib.guide")
(
(working "Patching sc_lib.guide")
(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" ))
)
)
(complete 79)
(if (exists "sc:help/sc_prob.guide")
(
(working "Patching sc_prob.guide")
(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" ))
)
)
(if (exists "sc:help/sc_change.guide")
(
(working "Patching sc_change.guide")
(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" ))
)
)
(complete 80)
(if (exists "sc:help/cpr.guide")
(
(working "Patching cpr.guide")
(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" ))
)
)
(run "delete ram:temp_6.1_patch_x123/#? quiet")
(copyfiles (source "autoopenfail.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "_main.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "_oserr.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "ca.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "_cxferr.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "intuitlib.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "cbacka.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "instructions.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "compile.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "scmsgguide.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "sc_util.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "scguide.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "test.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "readme.pch") (dest "ram:temp_6.1_patch_x123"))
(askdisk (assigns) (dest "SASC_6.0_Disk_7")
(prompt "Please Insert Disk 7 of the SAS/C Development System")
(help "Insert Disk 7 in any drive. The files will be read from "
"Disk 7, and placed in SC:. Nothing on Disk 7 will be "
"modified."
)
)
(complete 81)
(if (exists "sc:source/autoopenfail.c")
(
(working "Patching autoopenfail.c")
(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" ))
)
)
(complete 82)
(if (exists "sc:source/_main.c")
(
(working "Patching _main.c")
(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" ))
)
)
(complete 83)
(if (exists "sc:source/_oserr.c")
(
(working "Patching _oserr.c")
(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" ))
)
)
(complete 84)
(if (exists "sc:source/intuitlib.c")
(
(working "Patching intuitlib.c")
(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" ))
)
)
(complete 85)
(if (exists "sc:source/c.a")
(
(working "Patching c.a")
(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" ))
)
)
(complete 87)
(if (exists "sc:source/cback.a")
(
(working "Patching cback.a")
(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" ))
)
)
(complete 89)
(if (exists "sc:source/_cxferr.c")
(
(working "Patching _cxferr.c")
(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" ))
)
)
(complete 91)
(if (exists "sc:help/scmsg.guide")
(
(working "Patching scmsg.guide")
(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" ))
)
)
(complete 93)
(if (exists "sc:help/sc_util.guide")
(
(working "Patching sc_util.guide")
(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" ))
)
)
(complete 95)
(if (exists "sc:help/sc.guide")
(
(working "Patching sc.guide")
(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" ))
)
)
(complete 97)
(if (exists "sc:extras/TTX/instructions")
(
(working "Patching ttx/instructions")
(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" ))
)
)
(if (exists "sc:extras/CED/rexx/ced/compile.ced")
(
(working "Patching ced/rexx/ced/compile.ced")
(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" ))
)
)
(complete 98)
(if (and (exists "sc:extras/TTX/rexx") (not (exists "sc:extras/TTX/TTX_SASC")))
(
(rename "sc:extras/TTX/rexx" "sc:extras/TTX/TTX_SASC")
)
)
(if (exists "sc:examples/samplelib/test.fd.info")
(
(working "Patching examples/samplelib/test.fd.info")
(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" ))
)
)
(if (exists "sc:examples/samplelib/readme.info")
(
(working "Patching examples/samplelib/readme.info")
(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" ))
)
)
(copyfiles (source "readme_6.1") (dest "sc:"))
(if (exists "sc:help")
(
(copyfiles (source "sc_6.1.guide")
(dest "sc:help")
)
(copyfiles (source "sc_6.1.guide.inf")
(dest "sc:help")
(newname "sc_6.1.guide.info")
)
)
)
(copyfiles (source "readme_6.1.inf")
(dest "sc:")
(newname "ReadMe_6.1.info")
)
(if (and (exists "sc:c/amigaguide") (exists "sc:help/sc_6.1.guide"))
(run "run sc:c/amigaguide sc:help/sc_6.1.guide")
(run "run ram:temp_6.1_patch_x12/more sc:readme_6.1")
)
(complete 99)
(run "ram:temp_6.1_patch_x12/flush")
(run "delete ram:temp_6.1_patch_x12 all quiet")
(run "delete ram:temp_6.1_patch_x123 all quiet")
(complete 100)
)
; else do floppy install
(
(set @default-dest "")
(copyfiles (source "c:delete") (dest "ram:temp_6.1_patch_x12"))
(set thirddisk (askbool
(prompt "This procedure will patch the 2 or 3 disk set "
"created by the Floppy install from the compiler "
"installation. Did you create the 3 disk set?"
)
(help "Click Yes to patch the 3 disk set, or No for the "
"2 disk set."
)
)
)
(makedir "ram:temp_6.1_patch_x123")
(makedir "ram:temp_6.1_patch_x12")
(copyfiles (source "sc.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "smake.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "slink.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "se.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "sedat.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "scopts.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "scmsg.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "sc1.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "sc2.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "scdebug.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "schi.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "SASC_6.0_Disk_1:more") (dest "ram:temp_6.1_patch_x12"))
; need to make some room, since the patch increases the size of things
(if (exists "SAS_1:l/queue-handler")
(delete "SAS_1:l/queue-handler") ; 2.0 has this
(
; delete these under 1.3
(if (exists "SAS_1:c/avail")
(delete "SAS_1:c/avail")
)
(if (exists "SAS_1:c/setclock")
(delete "SAS_1:c/setclock")
)
)
)
(complete 1)
(if (exists "SAS_1:sc/c/sc")
(
(working "Patching sc")
(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"))
)
)
(complete 5)
(if (exists "SAS_1:sc/c/se")
(
(working "Patching se")
(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"))
)
)
(complete 8)
(if (exists "SAS_1:sc/env/se.dat")
(
(working "Patching se.dat")
(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"))
)
)
(complete 12)
(if (exists "SAS_1:sc/c/slink")
(
(working "Patching slink")
(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"))
)
)
(complete 15)
(if (exists "SAS_1:sc/c/smake")
(
(working "Patching smake")
(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"))
)
)
(complete 18)
(if (exists "SAS_1:sc/c/scopts")
(
(working "Patching scopts")
(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"))
)
)
(complete 21)
(if (exists "SAS_1:sc/c/scmsg")
(
(working "Patching scmsg")
(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"))
)
)
(complete 25)
(if (exists "SAS_1:sc/libs/sc1.library")
(
(working "Patching sc1.library")
(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"))
)
)
(complete 29)
(if (exists "SAS_1:sc/libs/sc2.library")
(
(working "Patching sc2.library")
(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"))
)
)
(if (exists "SAS_1:sc/libs/scdebug.library")
(
(working "Patching scdebug.library")
(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"))
)
)
(complete 33)
(if (exists "SAS_1:sc/libs/schi.library")
(
(working "Patching schi.library")
(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"))
)
)
(run "ram:temp_6.1_patch_x12/delete ram:temp_6.1_patch_x123/#? quiet")
(copyfiles (source "sclib.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "scm.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "c.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "cres.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "catch.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "catchres.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "catchresnr.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "catchnr.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "cback.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "cpr.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "fcntl.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "stat.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "dos.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "m68881.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "mffp.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "mieeedoub.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "stdarg.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "dir.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "all.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "layers.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "intuition_pragmas.pch") (dest "ram:temp_6.1_patch_x123"))
(complete 38)
(if (exists "SAS_2:sc/lib/sc.lib")
(
(working "Patching sc.lib")
(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"))
)
)
(complete 42)
(if (exists "SAS_2:sc/lib/scm.lib")
(
(working "Patching scm.lib")
(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"))
)
)
(complete 45)
(if (exists "SAS_2:sc/lib/c.o")
(
(working "Patching c.o")
(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" ))
)
)
(complete 47)
(if (exists "SAS_2:sc/lib/cres.o")
(
(working "Patching cres.o")
(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" ))
)
)
(complete 49)
(if (exists "SAS_2:sc/lib/catch.o")
(
(working "Patching catch.o")
(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" ))
)
)
(complete 53)
(if (exists "SAS_2:sc/lib/catchresnr.o")
(
(working "Patching catchresnr.o")
(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" ))
)
)
(complete 56)
(if (exists "SAS_2:sc/lib/catchres.o")
(
(working "Patching catchres.o")
(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" ))
)
)
(complete 59)
(if (exists "SAS_2:sc/lib/catchnr.o")
(
(working "Patching catchnr.o")
(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" ))
)
)
(complete 61)
(if (exists "SAS_2:sc/lib/cback.o")
(
(working "Patching cback.o")
(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" ))
)
)
(complete 63)
(if (exists "SAS_2:sc/c/cpr")
(
(working "Patching cpr")
(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"))
)
)
(complete 67)
(if (exists "SAS_2:sc/include/fcntl.h")
(
(working "Patching fcntl.h")
(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"))
(run ("ram:temp_6.1_patch_x12/scompact force ram:temp_header.h SAS_2:sc/include/fcntl.h"))
)
)
(complete 69)
(if (exists "SAS_2:sc/include/stat.h")
(
(working "Patching stat.h")
(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"))
(run ("ram:temp_6.1_patch_x12/scompact force ram:temp_header.h SAS_2:sc/include/stat.h"))
)
)
(complete 70)
(if (exists "SAS_2:sc/include/dos.h")
(
(working "Patching dos.h")
(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"))
(run ("ram:temp_6.1_patch_x12/scompact force ram:temp_header.h SAS_2:sc/include/dos.h"))
)
)
(complete 71)
(if (exists "SAS_2:sc/include/m68881.h")
(
(working "Patching m68881.h")
(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"))
(run ("ram:temp_6.1_patch_x12/scompact force ram:temp_header.h SAS_2:sc/include/m68881.h"))
)
)
(if (exists "SAS_2:sc/include/mffp.h")
(
(working "Patching mffp.h")
(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"))
(run ("ram:temp_6.1_patch_x12/scompact force ram:temp_header.h SAS_2:sc/include/mffp.h"))
)
)
(if (exists "SAS_2:sc/include/mieeedoub.h")
(
(working "Patching mieeedoub.h")
(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"))
(run ("ram:temp_6.1_patch_x12/scompact force ram:temp_header.h SAS_2:sc/include/mieeedoub.h"))
)
)
(complete 72)
(if (exists "SAS_2:sc/include/stdarg.h")
(
(working "Patching stdarg.h")
(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"))
(run ("ram:temp_6.1_patch_x12/scompact force ram:temp_header.h SAS_2:sc/include/stdarg.h"))
)
)
(complete 73)
(if (exists "SAS_2:sc/include/sys/dir.h")
(
(working "Patching sys/dir.h")
(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"))
(run ("ram:temp_6.1_patch_x12/scompact force ram:temp_header.h SAS_2:sc/include/sys/dir.h"))
)
)
; do the 2 that just need to be recompressed
(complete 74)
(if (exists "SAS_2:sc/include/stdio.h")
(
(working "Patching stdio.h")
(copyfiles
(source "SASC_6.0_Disk_3:Compiler_headers/include/stdio.h")
(dest "ram:temp_6.1_patch_x123")
)
(run ("ram:temp_6.1_patch_x12/scompact force ram:temp_6.1_patch_x123/stdio.h SAS_2:sc/include/stdio.h"))
)
)
(complete 75)
(if (exists "SAS_2:sc/include/dos/stdio.h")
(
(working "Patching dos/stdio.h")
(copyfiles
(source "SASC_6.0_Disk_4:Compiler_headers/include/dos/stdio.h")
(dest "ram:temp_6.1_patch_x123")
)
(run ("ram:temp_6.1_patch_x12/scompact force ram:temp_6.1_patch_x123/stdio.h SAS_2:sc/include/dos/stdio.h"))
)
)
(complete 76)
(if (exists "SAS_2:sc/include/proto/all.h")
(
(working "Patching proto/all.h")
(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"))
(run ("ram:temp_6.1_patch_x12/scompact force ram:temp_header.h SAS_2:sc/include/proto/all.h"))
)
)
(complete 77)
(if (exists "SAS_2:sc/include/proto/layers.h")
(
(working "Patching proto/layers.h")
(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"))
(run ("ram:temp_6.1_patch_x12/scompact force ram:temp_header.h SAS_2:sc/include/proto/layers.h"))
)
)
(complete 78)
(if (exists "SAS_2:sc/include/pragmas/intuition_pragmas.h")
(
(working "Patching pragmas/intuition.h")
(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"))
(run ("ram:temp_6.1_patch_x12/scompact force ram:temp_header.h SAS_2:sc/include/pragmas/intuition_pragmas.h"))
)
)
(if (= 1 thirddisk)
(
(run "ram:temp_6.1_patch_x12/delete ram:temp_6.1_patch_x123/#? quiet")
(copyfiles (source "scpeep.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "sekeymap.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "sclist.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "oml.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "omd.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "hypergst.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "dumpobj.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "lstat.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "lprof.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "sc5.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "tb.pch") (dest "ram:temp_6.1_patch_x123"))
(copyfiles (source "lctosc.pch") (dest "ram:temp_6.1_patch_x123"))
(complete 79)
(if (exists "SAS_3:sc/c/scompact")
(
(copyfiles (source "ram:temp_6.1_patch_x12/scompact")
(dest "SAS_3:sc/c")
)
)
)
(complete 81)
(if (exists "SAS_3:sc/libs/scpeep.library")
(
(working "Patching scpeep.library")
(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" ))
)
)
(complete 83)
(if (exists "SAS_3:sc/libs/sekeymap.library")
(
(working "Patching sekeymap.library")
(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" ))
)
)
(if (exists "SAS_3:sc/libs/sclist.library")
(
(working "Patching sclist.library")
(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" ))
)
)
(complete 85)
(if (exists "SAS_3:sc/c/dumpobj")
(
(working "Patching dumpobj")
(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" ))
)
)
(complete 86)
(if (exists "SAS_3:sc/c/omd")
(
(working "Patching omd")
(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" ))
)
)
(complete 87)
(if (exists "SAS_3:sc/c/hypergst")
(
(working "Patching hypergst")
(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" ))
)
)
(complete 88)
(if (exists "SAS_3:sc/c/oml")
(
(working "Patching oml")
(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" ))
)
)
(complete 90)
(if (exists "SAS_3:sc/c/lstat")
(
(working "Patching lstat")
(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" ))
)
)
(complete 92)
(if (exists "SAS_3:sc/c/lprof")
(
(working "Patching lprof")
(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" ))
)
)
(complete 94)
(if (exists "SAS_3:sc/c/sc5")
(
(working "Patching sc5")
(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" ))
)
)
(complete 96)
(if (exists "SAS_3:sc/c/tb")
(
(working "Patching tb")
(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" ))
)
)
(complete 98)
(if (exists "SAS_3:sc/c/lctosc")
(
(working "Patching lctosc")
(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" ))
)
)
)
)
(run "run ram:temp_6.1_patch_x12/more readme_6.1")
(complete 99)
(run "ram:temp_6.1_patch_x12/flush")
(run "ram:temp_6.1_patch_x12/delete ram:temp_6.1_patch_x123 all quiet")
(run "ram:temp_6.1_patch_x12/delete ram:temp_6.1_patch_x12 all quiet")
(complete 100)
)
)