fpc/install/macos/prepare

# MPW script to  prepare an installation package
# Precondition: fpc:install:macos is current dir.
# Parameter: version number, e. g. 1.9.6


If {1} == ''
  Echo '#ERROR FPC version must be given as parameter (e. g. 1.9.6)'
  Exit 1
Else
	Set fpcversion "{1}"
End

Set compilerdir :::compiler:
Set rtlunitsdir :::rtl:units:powerpc-macos:

Set units "charset cmem dos getopts heaptrc macostp macpas macutils matrix objects objpas strings system unixutil"

#Obtain path to compression program
Set -e stuffapp `getFileName -m 'Tell me where the DroppStuff application is'`
Set stuffolder ":fpc-{fpcversion}.powerpc-macos:"

Set Exit 0
Delete -y "{stuffolder}"  ³ Dev:Null
Set Exit 1
NewFolder "{stuffolder}"

maccopy ::doc:readme.txt "{stuffolder}README" 1 1
maccopy :"Installer README" "{stuffolder}README MacOS" 1 2
maccopy :Install "{stuffolder}INSTALL" 1 3
SetFile -c 'MPSX' -t 'TEXT' "{stuffolder}INSTALL"

NewFolder "{stuffolder}FreePascal"
NewFolder "{stuffolder}FreePascal:bin"
Duplicate "{compilerdir}"ppcppc  "{stuffolder}FreePascal:bin"
maccopy "{compilerdir}"utils:fpc.mpw  "{stuffolder}FreePascal:bin:fpc"

NewFolder "{stuffolder}FreePascal:docs"
maccopy ::doc:readme.txt "{stuffolder}FreePascal:docs:README" 1 1
maccopy :"Installer README" "{stuffolder}FreePascal:docs:README MacOS" 1 2
maccopy ::doc:whatsnew.txt "{stuffolder}FreePascal:docs:Whatsnew" 2 1
maccopy ::doc:copying.fpc "{stuffolder}FreePascal:docs:Copying.fpc" 2 2
maccopy ::doc:copying "{stuffolder}FreePascal:docs:Copying" 2 3
maccopy ::doc:faq.txt "{stuffolder}FreePascal:docs:FAQ" 3 1
maccopy ::doc:faq.htm "{stuffolder}FreePascal:docs:FAQ.htm" 3 2
SetFile -c 'MSIE' -t 'TEXT' "{stuffolder}FreePascal:docs:FAQ.htm"

NewFolder "{stuffolder}FreePascal:units"
NewFolder "{stuffolder}FreePascal:units:rtl"
For unit In {units}
  Duplicate "{rtlunitsdir}"{unit}.ppu  "{stuffolder}FreePascal:units:rtl"
  Duplicate "{rtlunitsdir}"{unit}.o  "{stuffolder}FreePascal:units:rtl"
End

If "{stuffapp}" != ""
  "{stuffapp}" "{stuffolder}"
End