Commit 87dbaa9a authored by Ulrich Weigand's avatar Ulrich Weigand Committed by Alexandre Julliard

Implemented GdiFreeResources (GDI.609).

parent b9950124
...@@ -378,7 +378,7 @@ file gdi.exe ...@@ -378,7 +378,7 @@ file gdi.exe
606 pascal16 SetMagicColors(word long word) SetMagicColors16 606 pascal16 SetMagicColors(word long word) SetMagicColors16
607 pascal GetRegionData(word long ptr) GetRegionData16 607 pascal GetRegionData(word long ptr) GetRegionData16
608 stub ExtCreateRegion 608 stub ExtCreateRegion
609 stub GDIFreeResources 609 pascal16 GdiFreeResources(long) GdiFreeResources
610 stub GDISignalProc32 610 stub GDISignalProc32
611 stub GetRandomRgn 611 stub GetRandomRgn
612 pascal16 GetTextCharset(word) GetTextCharset16 612 pascal16 GetTextCharset(word) GetTextCharset16
......
...@@ -948,6 +948,15 @@ DWORD WINAPI GdiSeeGdiDo( WORD wReqType, WORD wParam1, WORD wParam2, ...@@ -948,6 +948,15 @@ DWORD WINAPI GdiSeeGdiDo( WORD wReqType, WORD wParam1, WORD wParam2,
} }
/*********************************************************************** /***********************************************************************
* GdiFreeResources (GDI.609)
*/
WORD WINAPI GdiFreeResources( DWORD reserve )
{
return (WORD)( (int)LOCAL_CountFree( GDI_HeapSel ) * 100 /
(int)LOCAL_HeapSize( GDI_HeapSel ) );
}
/***********************************************************************
* MulDiv16 (GDI.128) * MulDiv16 (GDI.128)
*/ */
INT16 WINAPI MulDiv16( INT16 foo, INT16 bar, INT16 baz ) INT16 WINAPI MulDiv16( INT16 foo, INT16 bar, INT16 baz )
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment