Added TTY and DBG output prefix

This commit is contained in:
Pavel 2023-03-07 14:49:36 +03:00
parent d41be42b84
commit 25a6ad85cb
2 changed files with 8 additions and 5 deletions

View File

@ -113,7 +113,7 @@ end;
procedure ps4_sceKernelDebugOutText(dbg_id:Integer;text:Pchar); SysV_ABI_CDecl;
begin
Writeln(text);
Writeln('[DBG]:',text);
end;
//ps4 neo mode is support? (Ps4 Pro)

View File

@ -506,16 +506,19 @@ begin
Result:=readv(vector,count);
end;
function TDevStd.write (data:Pointer;size:Int64):Int64;
function TDevStd.write(data:Pointer;size:Int64):Int64;
var
S:RawByteString;
begin
CrtOutWriteDirect(WText,data,size);
SetString(S,data,size);
S:='[TTY]:'+S;
CrtOutWriteDirect(WText,PChar(S),Length(S));
Result:=size;
end;
function TDevStd.pwrite(data:Pointer;size,offset:Int64):Int64;
begin
CrtOutWriteDirect(WText,data,size);
Result:=size;
Result:=write(data,size);
end;
function TDevStd.writev(vector:p_iovec;count:Integer):Int64;