|
@@ -122,6 +122,7 @@ begin
|
|
Inc(Pointer(POSMem),lBlockSize);
|
|
Inc(Pointer(POSMem),lBlockSize);
|
|
end;
|
|
end;
|
|
AllocateOSInfoBlock:=PMIB;
|
|
AllocateOSInfoBlock:=PMIB;
|
|
|
|
+ {$IFDEF DEBUGWASMTHREADS}DebugWriteln('AllocateOSInfoBlock done');{$ENDIF}
|
|
end;
|
|
end;
|
|
|
|
|
|
Function FindFreeOSBlock(aInfo: POSMemInfoBlock) : POSMemBlock;
|
|
Function FindFreeOSBlock(aInfo: POSMemInfoBlock) : POSMemBlock;
|