From 414cf076582df55cd384c7f96718725ff7949b5d Mon Sep 17 00:00:00 2001 From: Pavel <68122101+red-prig@users.noreply.github.com> Date: Fri, 28 Apr 2023 10:04:45 +0300 Subject: [PATCH] + --- sys/kern/kern_thr.pas | 8 ++++---- sys/vm/vm_pmap.pas | 19 ++++++++++--------- 2 files changed, 14 insertions(+), 13 deletions(-) diff --git a/sys/kern/kern_thr.pas b/sys/kern/kern_thr.pas index 05bf8c2f..0d0c7082 100644 --- a/sys/kern/kern_thr.pas +++ b/sys/kern/kern_thr.pas @@ -203,8 +203,8 @@ procedure TD_SET_RUNNING(td:p_kthread); procedure TD_SET_RUNQ(td:p_kthread); procedure TD_SET_CAN_RUN(td:p_kthread); -function curthread_pflags_set(flags:Integer):Integer; inline; -procedure curthread_pflags_restore(save:Integer); inline; +function curthread_pflags_set(flags:Integer):Integer; +procedure curthread_pflags_restore(save:Integer); procedure PROC_LOCK; procedure PROC_UNLOCK; @@ -376,7 +376,7 @@ end; // -function curthread_pflags_set(flags:Integer):Integer; inline; +function curthread_pflags_set(flags:Integer):Integer; var td:p_kthread; begin @@ -385,7 +385,7 @@ begin td^.td_pflags:=td^.td_pflags or flags; end; -procedure curthread_pflags_restore(save:Integer); inline; +procedure curthread_pflags_restore(save:Integer); begin curkthread^.td_pflags:=curkthread^.td_pflags and save; end; diff --git a/sys/vm/vm_pmap.pas b/sys/vm/vm_pmap.pas index e4ed09e1..5bb885d6 100644 --- a/sys/vm/vm_pmap.pas +++ b/sys/vm/vm_pmap.pas @@ -96,7 +96,8 @@ begin if (r<>0) then begin - Writeln('failed NtAllocateVirtualMemory:',r); + Writeln('failed NtAllocateVirtualMemory:',HexStr(r,8)); + //STATUS_COMMITMENT_LIMIT = $C000012D Assert(false,'pmap_init'); end; end; @@ -183,7 +184,7 @@ begin if (r<>0) then begin - Writeln('failed NtAllocateVirtualMemory:',r); + Writeln('failed NtAllocateVirtualMemory:',HexStr(r,8)); Assert(false,'pmap_enter_object'); end; end; @@ -233,7 +234,7 @@ begin if (r<>0) then begin - Writeln('failed NtProtectVirtualMemory:',r); + Writeln('failed NtProtectVirtualMemory:',HexStr(r,8)); Assert(false,'pmap_protect'); end; @@ -249,7 +250,7 @@ begin if (r<>0) then begin - Writeln('failed NtAllocateVirtualMemory:',r); + Writeln('failed NtAllocateVirtualMemory:',HexStr(r,8)); Assert(false,'pmap_protect'); end; @@ -269,7 +270,7 @@ begin if (r<>0) then begin - Writeln('failed NtProtectVirtualMemory:',r); + Writeln('failed NtProtectVirtualMemory:',HexStr(r,8)); Assert(false,'pmap_protect'); end; end; @@ -284,7 +285,7 @@ begin if (r<>0) then begin - Writeln('failed NtFreeVirtualMemory:',r); + Writeln('failed NtFreeVirtualMemory:',HexStr(r,8)); Assert(false,'pmap_protect'); end; @@ -300,7 +301,7 @@ begin if (r<>0) then begin - Writeln('failed NtProtectVirtualMemory:',r); + Writeln('failed NtProtectVirtualMemory:',HexStr(r,8)); Assert(false,'pmap_protect'); end; end; @@ -334,7 +335,7 @@ begin if (r<>0) then begin - Writeln('failed NtAllocateVirtualMemory:',r); + Writeln('failed NtAllocateVirtualMemory:',HexStr(r,8)); Assert(false,'pmap_madv_free'); end; end; @@ -368,7 +369,7 @@ begin if (r<>0) then begin - Writeln('failed NtFreeVirtualMemory:',r); + Writeln('failed NtFreeVirtualMemory:',HexStr(r,8)); Assert(false,'pmap_remove'); end; end;