This commit is contained in:
red-prig 2023-03-12 17:01:30 +03:00
parent d9d8eef529
commit fef3d27572
2 changed files with 13 additions and 2 deletions

View File

@ -94,7 +94,9 @@ Const
procedure ps4_stack_chk_fail; SysV_ABI_CDecl; procedure ps4_stack_chk_fail; SysV_ABI_CDecl;
begin begin
Writeln(StdErr,GetCurrentThreadId,':Stack overflow detected! Aborting program.'); Writeln(StdErr,GetCurrentThreadId,':Stack overflow detected! Aborting program.');
Halt; asm
ud2
end;
end; end;
{$I StopNotificationReason.inc} {$I StopNotificationReason.inc}
@ -103,7 +105,9 @@ end;
procedure ps4_sceKernelDebugRaiseException(dwStopReason,dwStopId:DWORD); SysV_ABI_CDecl; procedure ps4_sceKernelDebugRaiseException(dwStopReason,dwStopId:DWORD); SysV_ABI_CDecl;
begin begin
Writeln(StdErr,'RaiseException:',HexStr(dwStopReason,8),':',HexStr(dwStopId,8),':',GetStopReasonInfo(dwStopReason)); Writeln(StdErr,'RaiseException:',HexStr(dwStopReason,8),':',HexStr(dwStopId,8),':',GetStopReasonInfo(dwStopReason));
Halt; asm
ud2
end;
end; end;
procedure ps4_sceKernelDebugRaiseExceptionOnReleaseMode(dwStopReason,dwStopId:DWORD); SysV_ABI_CDecl; procedure ps4_sceKernelDebugRaiseExceptionOnReleaseMode(dwStopReason,dwStopId:DWORD); SysV_ABI_CDecl;

View File

@ -533,6 +533,13 @@ begin
end; end;
end; end;
r:='';
if (MountMiscConcat('mnt','',r)=PT_FILE) then
if DirectoryExists(r) then
begin
add_dir('mnt');
end;
For i:=0 to 1 do For i:=0 to 1 do
begin begin
r:=''; r:='';