diff --git a/compiler/systems/t_macos.pas b/compiler/systems/t_macos.pas index 2fc877f593..7071e985fb 100644 --- a/compiler/systems/t_macos.pas +++ b/compiler/systems/t_macos.pas @@ -109,7 +109,7 @@ end; Function TLinkerMPW.WriteResponseFile(isdll:boolean) : Boolean; Var linkres : TLinkRes; - s: string; + s,heapsizestr: string; begin WriteResponseFile:=False; @@ -154,10 +154,24 @@ begin Add('Exit If "{Status}" != 0'); + if heapsize = 0 then + heapsizestr:= HexStr(384000, 8) + else + heapsizestr:= HexStr(heapsize, 8); + + {Add a SIZE resource on the fly. It controls: + * backgrounding is enabled, to facilitate debuging with Power Mac Debugger + * it is signaled it is a 32 bit app. (perhaps not nessecary on PowerPC) + * heapsize } + if apptype <> app_tool then + Add('Echo "data ''SIZE'' (-1) '#182'{ $'#182'"1080 ' + heapsizestr + ' ' + heapsizestr + + #182'" '#182'};" | Rez -a -o ' + ScriptFixFileName(current_module.exefilename^)); + Add('Exit If "{Status}" != 0'); + {Add mac resources} if apptype = app_cui then begin - Add('Rez -append "{RIncludes}"SIOW.r -o ' + ScriptFixFileName(current_module.exefilename^)); + Add('Rez -a "{RIncludes}"SIOW.r -o ' + ScriptFixFileName(current_module.exefilename^)); Add('Exit If "{Status}" != 0'); end; @@ -165,9 +179,9 @@ begin begin s := Current_module.ResourceFiles.GetFirst; if Copy(s,Length(s)-1,Length(s)) = '.r' then - Add('Rez -append ' + s + ' -o ' + ScriptFixFileName(current_module.exefilename^)) + Add('Rez -a ' + s + ' -o ' + ScriptFixFileName(current_module.exefilename^)) else - Add('DeRez ' + s + ' | Rez -append -o ' + ScriptFixFileName(current_module.exefilename^)); + Add('DeRez ' + s + ' | Rez -a -o ' + ScriptFixFileName(current_module.exefilename^)); Add('Exit If "{Status}" != 0'); end; @@ -258,7 +272,10 @@ initialization end. { $Log$ - Revision 1.19 2005-01-24 17:53:12 olle + Revision 1.20 2005-02-08 22:30:32 olle + + added SIZE resource facilities + + Revision 1.19 2005/01/24 17:53:12 olle + Mac style resource files can now be included in MacOS Revision 1.18 2005/01/09 16:35:41 olle