Recent changes to bugs

Building with GTK3

Aupeix Alain — Sat, 17 Oct 2026 07:13:14 -0000

Hi,
Having a graphic crash with Xubuntu 24.04, I updated to 26.04. After solving the problem, I tried to run my Harbour/HwGUI applications build under Xubuntu 16.04.
They didn't work anymore, so I wanted to build them.
It first failed as libgtk+-2.0 wans(t installed.
So I decided to build with GTK3.
I first failed for a few reasons which are explained in foined files.
So I installed libgtk+-2.0 and build
With the help of IA, I correct some errors, but I don't finish the job.

I hope you will solve the problems encountered.

PS: I joint the complete exchange between me and IA (in french), and also a summary of the work done and to do (in english).

Thanks
A+

#207 Bus with printing using a printer script.

Aupeix Alain — Tue, 01 Sep 2026 12:08:23 -0000

Hi, I have found a trick to solve the problem under Linux.
Here is a new Ticket 207 with two outfile samples/

I think it's a bug, but I don't know if it's an OS ou hwgui bug, but with the trick, it works when saving, or when previewing.

A+

#209 and key not work to skip a get -> While use a TAB page in other TAB. page

Aupeix Alain — Sun, 12 Jul 2026 12:37:19 -0000

Hi, having a look to the bug list, I saw it.
I tried with hwgui 2.23.8 r3826, and it works fine.

A+

#208 Warnings Hwgui Windows OS

Wilfried Brunken — Tue, 30 Jun 2026 13:37:21 -0000

Hello Itamar,
you wrote "Disregard this post."
May i close this ticket ?
(Please confirm)

MNI TNX, 73 es 55 de
Wilfried, DF7BE

#182 ownerbutton() don't display image under Linux

Wilfried Brunken — Tue, 30 Jun 2026 13:36:11 -0000

status: open --> closed

#182 ownerbutton() don't display image under Linux

Aupeix Alain — Mon, 29 Jun 2026 19:04:57 -0000

Hi Wilfried,
With you help I have been able to solve the problem.

COORDINATES was missing, ani must use 1,1,80,27 to dispaly correctly the image button.

You can close

Thanks
A+

#182 ownerbutton() don't display image under Linux

Wilfried Brunken — Mon, 29 Jun 2026 13:13:32 -0000

Hello,
sorry for the late response, but i am very busy this time.

The sample program is not compilable,
because of missing include file:

./hwmk.sh ownerbutton-bug.prg
Harbour 3.2.0dev (r2512151010)
Copyright (c) 1999-2025, https://harbour.github.io/
Compiling 'ownerbutton-bug.prg'...
ownerbutton-bug.prg(12) Error F0029 Can't open #include file 'hb_rev.ch'

But i checked the case with my
program "CLLOG":

Look into command documentation of HWGUI:
@ <x>,<y> OWNERBUTTON
...</y></x>

If FLAT or OF ... used on GTK/LINUX, the ownerbuttons or the images are not visible.
Be care of supported image formats, see documentation of HBitmap CLASS.
BITMAP COORDINATES: On GTK/LINUX pass the real size of image:
3rd and 4th parameter
Set 1st and 2nd to centered image in the ownerbutton.
On Windows, the value 0,4,0,0 is OK for all.
...

So remove FLAT and OF and the
image should be displayed.
See editmask.prg (about line 2355)
(coming with next commit):

ifdef PLATFORMWINDOWS

@ 637,95 OWNERBUTTON oOwnBtn1 ;
SIZE 15,23 FLAT ;
BITMAP oResourceBMPcombsel ;
TRANSPARENT COLOR hwg_ColorC2N("#DCDAD5") COORDINATES 0,0,0,0 ;
ON CLICK {|| EDMSK_BUT28() } ;
TOOLTIP cMsgLang("Select Mode from Combobox","W" + CAKUML + "hle Betriebsart in der Combobox")

else

LINUX
@ 645,90 OWNERBUTTON oOwnBtn1 ; && Old: @ 637,95
SIZE 15,23 ; && FLAT
BITMAP oResourceBMPcombsel_n ;
TRANSPARENT COLOR hwg_ColorC2N("#DCDAD5") COORDINATES 0,0,0,0 ;
ON CLICK {|| EDMSK_BUT28() } ;
TOOLTIP cMsgLang("Select Mode from Combobox","W" + CAKUML + "hle Betriebsart in der Combobox")

endif

Checked on Ubuntu LINUX.

I hope, this helps.

MNI TNX, 73 es 55 de
Wilfried, DF7BE

#208 Warnings Hwgui Windows OS

Itamar M. Lins Jr. — Fri, 05 Dec 2025 18:02:41 -0000

Hi!
Disregard this post.
Something went wrong here.

Perhaps a cross-compilation. Now it's okay.

Best regards,
Itamar M. Lins Jr.

and key not work to skip a get -> While use a TAB page in other TAB. page

Itamar M. Lins Jr. — Thu, 04 Dec 2025 20:23:37 -0000

Hi!

The <enter> and <tab> keys do not work when using a TAB object inside another TAB object.</tab></enter>

The example demonstrates the problem.

This behavior is working correctly in Hwgui version 2.17.

#include "hwgui.ch"
FUNCTION main()

  LOCAL oDlg,  oPage1, oPage2, oEdit1, oEdit2, oEdit3, oEdit4

  LOCAL  vEdit1 := "" , vEdit2 := "", vEdit3 := "" , vEdit4 := ""

  INIT DIALOG oDlg TITLE "Form1" AT 0, 0 SIZE 800,600 CLIPPER  NOEXIT

   @ 6,5 TAB oPage1 ITEMS {} SIZE 1479,554
    BEGIN PAGE 'Page 1' OF oPage1

    @ 40,73 GET oEdit1 VAR vEdit1 SIZE 80,24 of oPage1
    @ 47,124 GET oEdit2 VAR vEdit2 SIZE 80,24 of oPage1

    END PAGE OF oPage1

    BEGIN PAGE 'Page 2' OF oPage1
       @ 5,29 TAB oPage2 ITEMS {} SIZE 640,480

       BEGIN PAGE 'Page 1' OF oPage2
       @ 40,73 GET oEdit3 VAR vEdit3 SIZE 80,24 of oPage2
       @ 47,124 GET oEdit4 VAR vEdit4 SIZE 80,24 of oPage2

       END PAGE OF oPage2
    END PAGE OF oPage1

   ACTIVATE DIALOG oDlg

RETURN .T.

Best regards,
Itamar M. Lins Jr.

Warnings Hwgui Windows OS

Itamar M. Lins Jr. — Mon, 01 Dec 2025 17:05:18 -0000

Hi!

Many warnings for freeimage and others, ZIG compiler CLANG compiler.
Compiler: LLVM/Clang C 21.1 (https://github.com/ziglang/zig-bootstrap 1b08653ddc0b2770f51

Harbour 3.2.0dev (r2510231945)
Copyright (c) 1999-2025, https://harbour.github.io/
source/winapi/animat.c:18:11: warning: cast to 'HMENU' (aka 'struct HMENU__ *') from smaller integer type 'LONG'
      (aka 'long') [-Wint-to-pointer-cast]
   18 |    hwnd = Animate_Create( ( HWND ) HB_PARHANDLE( 1 ), ( LONG ) hb_parnl( 2 ),
      |           ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
   19 |          ( LONG ) hb_parnl( 3 ), GetModuleHandle( NULL ) );
      |          ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
C:\dev\zig016\lib\libc\include\any-windows-any/commctrl.h:4426:106: note: expanded from macro 'Animate_Create'
 4426 |   ...CreateWindow(ANIMATE_CLASS,NULL,dwStyle,0,0,0,0,hwndP,(HMENU)(id),hInstance,NULL)
      |      ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^~~~~~~~~~~~~~~~~~~~~~~~~~~
C:\dev\zig016\lib\libc\include\any-windows-any/winuser.h:2206:199: note: expanded from macro 'CreateWindowA'
 2206 |   ...CreateWindowExA((DWORD)0,lpClassName,lpWindowName,dwStyle,x,y,nWidth,nHeight,hWndParent,hMenu,hInstance,lpParam)
      |                                                                                              ^~~~~
1 warning generated.
source/winapi/dialog.c:222:9: warning: cast to smaller integer type 'ULONG' (aka 'unsigned long') from 'LPWORD'
      (aka 'unsigned short *') [-Wpointer-to-int-cast]
  222 |    ul = ( ULONG ) lpIn;
      |         ^~~~~~~~~~~~~~
source/winapi/dialog.c:227:11: warning: cast to 'LPWORD' (aka 'unsigned short *') from smaller integer type 'ULONG'
      (aka 'unsigned long') [-Wint-to-pointer-cast]
  227 |    return ( LPWORD ) ul;
      |           ^~~~~~~~~~~~~
source/winapi/dialog.c:380:14: warning: cast to smaller integer type 'LONG' (aka 'long') from 'LPDLGTEMPLATE'
      (aka 'DLGTEMPLATE *') [-Wpointer-to-int-cast]
  380 |    hb_retnl( ( LONG ) s_CreateDlgTemplate( hb_param( 1, HB_IT_OBJECT ),
      |              ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  381 |                hb_parni( 2 ), hb_parni( 3 ), hb_parni( 4 ), hb_parni( 5 ),
      |                ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  382 |                ( ULONG ) hb_parnd( 6 ) ) );
      |                ~~~~~~~~~~~~~~~~~~~~~~~~~
source/winapi/dialog.c:387:26: warning: cast to 'LPDLGTEMPLATE' (aka 'DLGTEMPLATE *') from smaller integer type 'long'
      [-Wint-to-pointer-cast]
  387 |    s_ReleaseDlgTemplate( ( LPDLGTEMPLATE ) hb_parnl( 1 ) );
      |                          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
source/winapi/dialog.c:415:22: warning: cast from 'LRESULT (*)(HWND, UINT, LPPROPSHEETPAGEA) __attribute__((stdcall))'
      (aka 'long long (*)(struct HWND__ *, unsigned int, struct _PROPSHEETPAGEA *)') to 'LPFNPSPCALLBACKA' (aka
      'unsigned int (*)(struct HWND__ *, unsigned int, struct _PROPSHEETPAGEA *)') converts to incompatible function
      type [-Wcast-function-type-mismatch]
  415 |    psp.pfnCallback = ( LPFNPSPCALLBACK ) s_PSPProcRelease;
      |                      ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
source/winapi/dialog.c:448:22: warning: cast to 'LPDLGTEMPLATE' (aka 'DLGTEMPLATE *') from smaller integer type 'long'
      [-Wint-to-pointer-cast]
  448 |       pdlgtemplate = ( LPDLGTEMPLATE ) hb_parnl( 2 );
      |                      ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
source/winapi/dialog.c:484:16: warning: cast to 'HPROPSHEETPAGE' (aka 'struct _PSP *') from smaller integer type 'long'
      [-Wint-to-pointer-cast]
  484 |       psp[i] = ( HPROPSHEETPAGE ) hb_arrayGetNL( pArr, i + 1 );
      |                ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
: warning: cast to 'LPDLGTEMPLATE' (aka 'DLGTEMPLATE *') from smaller integer type 'long'
      [-Wint-to-pointer-cast]
  520 |       pdlgtemplate = ( LPDLGTEMPLATE ) hb_parnl( 8 );
      |                      ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
8 warnings generated.
source/winapi/draw.c:202:18: warning: cast to smaller integer type 'BOOL' (aka 'int') from 'WINBOOL *' (aka 'int *')
      [-Wpointer-to-int-cast]
  202 |    BOOL fErase = ( BOOL ) ( &pps->fErase );
      |                  ^~~~~~~~~~~~~~~~~~~~~~~~~
source/winapi/draw.c:660:60: warning: cast to 'HBRUSH' (aka 'struct HBRUSH__ *') from smaller integer type 'long'
      [-Wint-to-pointer-cast]
  660 |          HB_ISPOINTER( 6 ) ? ( HBRUSH )HB_PARHANDLE( 6 ) : ( HBRUSH )hb_parnl(6) );
      |                                                            ^~~~~~~~~~~~~~~~~~~~~
source/winapi/draw.c:740:13: warning: cast to 'HBRUSH' (aka 'struct HBRUSH__ *') from smaller integer type 'int'
      [-Wint-to-pointer-cast]
  740 |             ( HBRUSH ) ( ( ( iType & 2 ) ? COLOR_3DSHADOW : COLOR_3DHILIGHT )
      |             ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  741 |                   + 1 ) );
      |                   ~~~~~
source/winapi/draw.c:745:13: warning: cast to 'HBRUSH' (aka 'struct HBRUSH__ *') from smaller integer type 'int'
      [-Wint-to-pointer-cast]
  745 |             ( HBRUSH ) ( ( ( iType & 2 ) ? COLOR_3DHILIGHT : ( iType & 4 ) ?
      |             ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  746 |                         COLOR_3DDKSHADOW : COLOR_3DSHADOW ) + 1 ) );
      |                         ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
source/winapi/draw.c:752:16: warning: cast to 'HBRUSH' (aka 'struct HBRUSH__ *') from smaller integer type 'int'
      [-Wint-to-pointer-cast]
  752 |                ( HBRUSH ) ( ( ( iType & 2 ) ? COLOR_3DSHADOW : COLOR_3DLIGHT )
      |                ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  753 |                      + 1 ) );
      |                      ~~~~~
source/winapi/draw.c:757:16: warning: cast to 'HBRUSH' (aka 'struct HBRUSH__ *') from smaller integer type 'int'
      [-Wint-to-pointer-cast]
  757 |                ( HBRUSH ) ( ( ( iType & 2 ) ? COLOR_3DLIGHT : COLOR_3DSHADOW )
      |                ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  758 |                      + 1 ) );
      |                      ~~~~~
source/winapi/draw.c:812:71: warning: cast to 'HINSTANCE' (aka 'struct HINSTANCE__ *') from smaller integer type 'long'
      [-Wint-to-pointer-cast]
  812 |    HB_RETHANDLE( LoadImage( HB_ISNIL( 1 ) ? GetModuleHandle( NULL ) : ( HINSTANCE ) hb_parnl( 1 ),      // handle o...
      |                                                                       ^~~~~~~~~~~~~~~~~~~~~~~~~~~
include/guilib.h:19:61: note: expanded from macro 'HB_RETHANDLE'
   19 |    #define HB_RETHANDLE( h )        hb_retptr( ( void * ) ( h ) )
      |                                                             ^
source/winapi/draw.c:1163:10: warning: cast to smaller integer type 'long' from 'HANDLE' (aka 'void *')
      [-Wvoid-pointer-to-int-cast]
 1163 |    if( ( ( long int ) hfbm ) <= 0 )
      |          ^~~~~~~~~~~~~~~~~
source/winapi/draw.c:1406:4: warning: cast to 'void *' from smaller integer type 'int' [-Wint-to-void-pointer-cast]
 1406 |    HB_RETHANDLE( ReleaseDC( ( HWND ) HB_PARHANDLE( 1 ),
      |    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
 1407 |                ( HDC ) HB_PARHANDLE( 2 ) ) );
      |                ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
include/guilib.h:19:48: note: expanded from macro 'HB_RETHANDLE'
   19 |    #define HB_RETHANDLE( h )        hb_retptr( ( void * ) ( h ) )
      |                                                ^~~~~~~~~~~~~~~~
source/winapi/draw.c:1445:31: warning: cast to smaller integer type 'LONG' (aka 'long') from 'HWND'
      (aka 'struct HWND__ *') [-Wpointer-to-int-cast]
 1445 |    temp = hb_itemPutNL( NULL, ( LONG ) lpdis->hwndItem );
      |                               ^~~~~~~~~~~~~~~~~~~~~~~~
10 warnings generated.
source/winapi/freeimg.c:242:46: warning: cast from 'FREEIMAGE_UNLOAD' (aka 'void (*)(struct FIBITMAP *)') to 'FARPROC'
      (aka 'long long (*)()') converts to incompatible function type [-Wcast-function-type-mismatch]
  242 |          ( FREEIMAGE_UNLOAD ) s_getFunction( ( FARPROC ) pUnload,
      |                                              ^~~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:246:16: warning: cast to 'FIBITMAP *' (aka 'struct FIBITMAP *') from smaller integer type 'long'
      [-Wint-to-pointer-cast]
  246 |       pUnload( ( FIBITMAP * ) hb_parnl( 1 ) );
      |                ^~~~~~~~~~~~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:252:44: warning: cast from 'FREEIMAGE_LOAD' (aka 'struct FIBITMAP *(*)(int, const char *, int)')
      to 'FARPROC' (aka 'long long (*)()') converts to incompatible function type [-Wcast-function-type-mismatch]
  252 |          ( FREEIMAGE_LOAD ) s_getFunction( ( FARPROC ) pLoad,
      |                                            ^~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:255:58: warning: cast from 'FREEIMAGE_GETFIFFROMFILENAME' (aka 'int (*)(const char *)') to
      'FARPROC' (aka 'long long (*)()') converts to incompatible function type [-Wcast-function-type-mismatch]
  255 |          ( FREEIMAGE_GETFIFFROMFILENAME ) s_getFunction( ( FARPROC )
      |                                                          ^~~~~~~~~~~
  256 |          pGetfiffromfile, "_FreeImage_GetFIFFromFilename@4" );
      |          ~~~~~~~~~~~~~~~
source/winapi/freeimg.c:261:17: warning: cast to smaller integer type 'ULONG' (aka 'unsigned long') from 'FIBITMAP *'
      (aka 'struct FIBITMAP *') [-Wpointer-to-int-cast]
  261 |       hb_retnl( ( ULONG ) pLoad( pGetfiffromfile( name ), name,
      |                 ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  262 |                   ( hb_pcount(  ) > 1 ) ? hb_parni( 2 ) : 0 ) );
      |                   ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:274:44: warning: cast from 'FREEIMAGE_LOAD' (aka 'struct FIBITMAP *(*)(int, const char *, int)')
      to 'FARPROC' (aka 'long long (*)()') converts to incompatible function type [-Wcast-function-type-mismatch]
  274 |          ( FREEIMAGE_LOAD ) s_getFunction( ( FARPROC ) pLoad,
      |                                            ^~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:280:17: warning: cast to smaller integer type 'ULONG' (aka 'unsigned long') from 'FIBITMAP *'
      (aka 'struct FIBITMAP *') [-Wpointer-to-int-cast]
  280 |       hb_retnl( ( ULONG ) pLoad( ( enum FREE_IMAGE_FORMAT ) hb_parni( 1 ),
      |                 ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  281 |                   name, ( hb_pcount(  ) > 2 ) ? hb_parni( 3 ) : 0 ) );
      |                   ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:290:44: warning: cast from 'FREEIMAGE_SAVE' (aka 'int (*)(int, struct FIBITMAP *, const char *,
      int)') to 'FARPROC' (aka 'long long (*)()') converts to incompatible function type [-Wcast-function-type-mismatch]
  290 |          ( FREEIMAGE_SAVE ) s_getFunction( ( FARPROC ) pSave,
      |                                            ^~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:293:58: warning: cast from 'FREEIMAGE_GETFIFFROMFILENAME' (aka 'int (*)(const char *)') to
      'FARPROC' (aka 'long long (*)()') converts to incompatible function type [-Wcast-function-type-mismatch]
  293 |          ( FREEIMAGE_GETFIFFROMFILENAME ) s_getFunction( ( FARPROC )
      |                                                          ^~~~~~~~~~~
  294 |          pGetfiffromfile, "_FreeImage_GetFIFFromFilename@4" );
      |          ~~~~~~~~~~~~~~~
source/winapi/freeimg.c:300:19: warning: cast to 'FIBITMAP *' (aka 'struct FIBITMAP *') from smaller integer type 'long'
      [-Wint-to-pointer-cast]
  300 |                   ( FIBITMAP * ) hb_parnl( 1 ), name,
      |                   ^~~~~~~~~~~~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:313:44: warning: cast from 'FREEIMAGE_SAVE' (aka 'int (*)(int, struct FIBITMAP *, const char *,
      int)') to 'FARPROC' (aka 'long long (*)()') converts to incompatible function type [-Wcast-function-type-mismatch]
  313 |          ( FREEIMAGE_SAVE ) s_getFunction( ( FARPROC ) pSave,
      |                                            ^~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:320:19: warning: cast to 'FIBITMAP *' (aka 'struct FIBITMAP *') from smaller integer type 'long'
      [-Wint-to-pointer-cast]
  320 |                   ( FIBITMAP * ) hb_parnl( 2 ), name,
      |                   ^~~~~~~~~~~~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:330:48: warning: cast from 'FREEIMAGE_GETWIDTH' (aka 'unsigned long (*)(struct FIBITMAP *)') to
      'FARPROC' (aka 'long long (*)()') converts to incompatible function type [-Wcast-function-type-mismatch]
  330 |          ( FREEIMAGE_GETWIDTH ) s_getFunction( ( FARPROC ) pGetwidth,
      |                                                ^~~~~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:333:41: warning: cast to 'FIBITMAP *' (aka 'struct FIBITMAP *') from smaller integer type 'long'
      [-Wint-to-pointer-cast]
  333 |    hb_retnl( ( pGetwidth ) ? pGetwidth( ( FIBITMAP * ) hb_parnl( 1 ) ) : 0 );
      |                                         ^~~~~~~~~~~~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:339:49: warning: cast from 'FREEIMAGE_GETHEIGHT' (aka 'unsigned long (*)(struct FIBITMAP *)') to
      'FARPROC' (aka 'long long (*)()') converts to incompatible function type [-Wcast-function-type-mismatch]
  339 |          ( FREEIMAGE_GETHEIGHT ) s_getFunction( ( FARPROC ) pGetheight,
      |                                                 ^~~~~~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:342:43: warning: cast to 'FIBITMAP *' (aka 'struct FIBITMAP *') from smaller integer type 'long'
      [-Wint-to-pointer-cast]
  342 |    hb_retnl( ( pGetheight ) ? pGetheight( ( FIBITMAP * ) hb_parnl( 1 ) ) :
      |                                           ^~~~~~~~~~~~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:349:46: warning: cast from 'FREEIMAGE_GETBPP' (aka 'unsigned long (*)(struct FIBITMAP *)') to
      'FARPROC' (aka 'long long (*)()') converts to incompatible function type [-Wcast-function-type-mismatch]
  349 |          ( FREEIMAGE_GETBPP ) s_getFunction( ( FARPROC ) pGetBPP,
      |                                              ^~~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:352:37: warning: cast to 'FIBITMAP *' (aka 'struct FIBITMAP *') from smaller integer type 'long'
      [-Wint-to-pointer-cast]
  352 |    hb_retnl( ( pGetBPP ) ? pGetBPP( ( FIBITMAP * ) hb_parnl( 1 ) ) : 0 );
      |                                     ^~~~~~~~~~~~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:358:52: warning: cast from 'FREEIMAGE_GETIMAGETYPE' (aka 'short (*)(struct FIBITMAP *)') to
      'FARPROC' (aka 'long long (*)()') converts to incompatible function type [-Wcast-function-type-mismatch]
  358 |          ( FREEIMAGE_GETIMAGETYPE ) s_getFunction( ( FARPROC ) pGetImageType,
      |                                                    ^~~~~~~~~~~~~~~~~~~~~~~~~
(aka 'struct FIBITMAP *') from smaller integer type 'long' *' [1/1] Linking
      [-Wint-to-pointer-cast]
  361 |    hb_retnl( ( pGetImageType ) ? pGetImageType( ( FIBITMAP * ) hb_parnl( 1 ) )
      |                                                 ^~~~~~~~~~~~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:367:20: warning: cast to 'FIBITMAP *' (aka 'struct FIBITMAP *') from smaller integer type 'long'
      [-Wint-to-pointer-cast]
  367 |    FIBITMAP *dib = ( FIBITMAP * ) hb_parnl( 1 );
      |                    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:371:47: warning: cast from 'FREEIMAGE_GETBITS' (aka 'unsigned char *(*)(struct FIBITMAP *)') to
      'FARPROC' (aka 'long long (*)()') converts to incompatible function type [-Wcast-function-type-mismatch]
  371 |          ( FREEIMAGE_GETBITS ) s_getFunction( ( FARPROC ) pGetbits,
      |                                               ^~~~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:374:47: warning: cast from 'FREEIMAGE_GETINFO' (aka 'struct tagBITMAPINFO *(*)(struct FIBITMAP
      *)') to 'FARPROC' (aka 'long long (*)()') converts to incompatible function type [-Wcast-function-type-mismatch]
  374 |          ( FREEIMAGE_GETINFO ) s_getFunction( ( FARPROC ) pGetinfo,
      |                                               ^~~~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:377:53: warning: cast from 'FREEIMAGE_GETINFOHEADER' (aka 'struct tagBITMAPINFOHEADER
      *(*)(struct FIBITMAP *)') to 'FARPROC' (aka 'long long (*)()') converts to incompatible function type
      [-Wcast-function-type-mismatch]
  377 |          ( FREEIMAGE_GETINFOHEADER ) s_getFunction( ( FARPROC ) pGetinfoHead,
      |                                                     ^~~~~~~~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:380:14: warning: cast to smaller integer type 'LONG' (aka 'long') from 'HBITMAP'
      (aka 'struct HBITMAP__ *') [-Wpointer-to-int-cast]
  380 |    hb_retnl( ( LONG ) CreateDIBitmap( hDC, pGetinfoHead( dib ),
      |              ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  381 |                CBM_INIT, pGetbits( dib ), pGetinfo( dib ), DIB_RGB_COLORS ) );
      |                ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:467:20: warning: cast to 'FIBITMAP *' (aka 'struct FIBITMAP *') from smaller integer type 'long'
      [-Wint-to-pointer-cast]
  467 |    FIBITMAP *dib = ( FIBITMAP * ) hb_parnl( 1 );
      |                    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:471:48: warning: cast from 'FREEIMAGE_GETWIDTH' (aka 'unsigned long (*)(struct FIBITMAP *)') to
      'FARPROC' (aka 'long long (*)()') converts to incompatible function type [-Wcast-function-type-mismatch]
  471 |          ( FREEIMAGE_GETWIDTH ) s_getFunction( ( FARPROC ) pGetwidth,
      |                                                ^~~~~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:474:49: warning: cast from 'FREEIMAGE_GETHEIGHT' (aka 'unsigned long (*)(struct FIBITMAP *)') to
      'FARPROC' (aka 'long long (*)()') converts to incompatible function type [-Wcast-function-type-mismatch]
  474 |          ( FREEIMAGE_GETHEIGHT ) s_getFunction( ( FARPROC ) pGetheight,
      |                                                 ^~~~~~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:477:46: warning: cast from 'FREEIMAGE_GETBPP' (aka 'unsigned long (*)(struct FIBITMAP *)') to
      'FARPROC' (aka 'long long (*)()') converts to incompatible function type [-Wcast-function-type-mismatch]
  477 |          ( FREEIMAGE_GETBPP ) s_getFunction( ( FARPROC ) pGetBPP,
      |                                              ^~~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:480:48: warning: cast from 'FREEIMAGE_GETBPP' (aka 'unsigned long (*)(struct FIBITMAP *)') to
      'FARPROC' (aka 'long long (*)()') converts to incompatible function type [-Wcast-function-type-mismatch]
  480 |          ( FREEIMAGE_GETPITCH ) s_getFunction( ( FARPROC ) pGetBPP,
      |                                                ^~~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:483:47: warning: cast from 'FREEIMAGE_GETBITS' (aka 'unsigned char *(*)(struct FIBITMAP *)') to
      'FARPROC' (aka 'long long (*)()') converts to incompatible function type [-Wcast-function-type-mismatch]
  483 |          ( FREEIMAGE_GETBITS ) s_getFunction( ( FARPROC ) pGetbits,
      |                                               ^~~~~~~~~~~~~~~~~~~~
 (aka 'void *')reeimg.c:496:17: warning: cast to smaller integer type 'LONG' (aka 'long') from 'HANDLE'[1/1] Linking
      [-Wvoid-pointer-to-int-cast]
  496 |       hb_retnl( ( LONG ) hdib );
      |                 ^~~~~~~~~~~~~
source/winapi/freeimg.c:511:52: warning: cast from 'FREEIMAGE_GETIMAGETYPE' (aka 'short (*)(struct FIBITMAP *)') to
      'FARPROC' (aka 'long long (*)()') converts to incompatible function type [-Wcast-function-type-mismatch]
  511 |          ( FREEIMAGE_GETIMAGETYPE ) s_getFunction( ( FARPROC ) pGetImageType,
      |                                                    ^~~~~~~~~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:521:21: warning: cast to 'FIBITMAP *' (aka 'struct FIBITMAP *') from smaller integer type 'long'
      [-Wint-to-pointer-cast]
  521 |    FIBITMAP *_dib = ( FIBITMAP * ) hb_parnl( 1 );
      |                     ^~~~~~~~~~~~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:525:53: warning: cast from 'FREEIMAGE_GETCOLORSUSED' (aka 'unsigned int (*)(struct FIBITMAP *)')
      to 'FARPROC' (aka 'long long (*)()') converts to incompatible function type [-Wcast-function-type-mismatch]
  525 |          ( FREEIMAGE_GETCOLORSUSED ) s_getFunction( ( FARPROC )
      |                                                     ^~~~~~~~~~~
  526 |          pGetColorsUsed, "_FreeImage_GetColorsUsed@4" );
      |          ~~~~~~~~~~~~~~
source/winapi/freeimg.c:528:48: warning: cast from 'FREEIMAGE_GETWIDTH' (aka 'unsigned long (*)(struct FIBITMAP *)') to
      'FARPROC' (aka 'long long (*)()') converts to incompatible function type [-Wcast-function-type-mismatch]
  528 |          ( FREEIMAGE_GETWIDTH ) s_getFunction( ( FARPROC ) pGetwidth,
      |                                                ^~~~~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:531:49: warning: cast from 'FREEIMAGE_GETHEIGHT' (aka 'unsigned long (*)(struct FIBITMAP *)') to
      'FARPROC' (aka 'long long (*)()') converts to incompatible function type [-Wcast-function-type-mismatch]
  531 |          ( FREEIMAGE_GETHEIGHT ) s_getFunction( ( FARPROC ) pGetheight,
      |                                                 ^~~~~~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:534:46: warning: cast from 'FREEIMAGE_GETBPP' (aka 'unsigned long (*)(struct FIBITMAP *)') to
      'FARPROC' (aka 'long long (*)()') converts to incompatible function type [-Wcast-function-type-mismatch]
  534 |          ( FREEIMAGE_GETBPP ) s_getFunction( ( FARPROC ) pGetBPP,
      |                                              ^~~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:537:48: warning: cast from 'FREEIMAGE_GETPITCH' (aka 'unsigned int (*)(struct FIBITMAP *)') to
      'FARPROC' (aka 'long long (*)()') converts to incompatible function type [-Wcast-function-type-mismatch]
  537 |          ( FREEIMAGE_GETPITCH ) s_getFunction( ( FARPROC ) pGetPitch,
      |                                                ^~~~~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:540:53: warning: cast from 'FREEIMAGE_GETINFOHEADER' (aka 'struct tagBITMAPINFOHEADER
      *(*)(struct FIBITMAP *)') to 'FARPROC' (aka 'long long (*)()') converts to incompatible function type
      [-Wcast-function-type-mismatch]
  540 |          ( FREEIMAGE_GETINFOHEADER ) s_getFunction( ( FARPROC ) pGetinfoHead,
      |                                                     ^~~~~~~~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:543:47: warning: cast from 'FREEIMAGE_GETINFO' (aka 'struct tagBITMAPINFO *(*)(struct FIBITMAP
      *)') to 'FARPROC' (aka 'long long (*)()') converts to incompatible function type [-Wcast-function-type-mismatch]
  543 |          ( FREEIMAGE_GETINFO ) s_getFunction( ( FARPROC ) pGetinfo,
      |                                               ^~~~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:546:47: warning: cast from 'FREEIMAGE_GETBITS' (aka 'unsigned char *(*)(struct FIBITMAP *)') to
      'FARPROC' (aka 'long long (*)()') converts to incompatible function type [-Wcast-function-type-mismatch]
  546 |          ( FREEIMAGE_GETBITS ) s_getFunction( ( FARPROC ) pGetbits,
      |                                               ^~~~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:549:50: warning: cast from 'FREEIMAGE_GETPALETTE' (aka 'struct tagRGBQUAD *(*)(struct FIBITMAP
      *)') to 'FARPROC' (aka 'long long (*)()') converts to incompatible function type [-Wcast-function-type-mismatch]
  549 |          ( FREEIMAGE_GETPALETTE ) s_getFunction( ( FARPROC ) pGetPalette,
      |                                                  ^~~~~~~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:552:52: warning: cast from 'FREEIMAGE_GETIMAGETYPE' (aka 'short (*)(struct FIBITMAP *)') to
      'FARPROC' (aka 'long long (*)()') converts to incompatible function type [-Wcast-function-type-mismatch]
pGetImageType,   ( FREEIMAGE_GETIMAGETYPE ) s_getFunction( ( FARPROC ) [1/1] Linking
      |                                                    ^~~~~~~~~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:598:14: warning: cast to smaller integer type 'LONG' (aka 'long') from 'HANDLE' (aka 'void *')
      [-Wvoid-pointer-to-int-cast]
  598 |    hb_retnl( ( LONG ) hMem );
      |              ^~~~~~~~~~~~~
source/winapi/freeimg.c:603:20: warning: cast to 'FIBITMAP *' (aka 'struct FIBITMAP *') from smaller integer type 'long'
      [-Wint-to-pointer-cast]
  603 |    FIBITMAP *dib = ( FIBITMAP * ) hb_parnl( 1 );
      |                    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:633:47: warning: cast from 'FREEIMAGE_GETBITS' (aka 'unsigned char *(*)(struct FIBITMAP *)') to
      'FARPROC' (aka 'long long (*)()') converts to incompatible function type [-Wcast-function-type-mismatch]
  633 |          ( FREEIMAGE_GETBITS ) s_getFunction( ( FARPROC ) pGetbits,
      |                                               ^~~~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:636:47: warning: cast from 'FREEIMAGE_GETINFO' (aka 'struct tagBITMAPINFO *(*)(struct FIBITMAP
      *)') to 'FARPROC' (aka 'long long (*)()') converts to incompatible function type [-Wcast-function-type-mismatch]
  636 |          ( FREEIMAGE_GETINFO ) s_getFunction( ( FARPROC ) pGetinfo,
      |                                               ^~~~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:658:51: warning: cast from 'FREEIMAGE_ALLOCATE' (aka 'struct FIBITMAP *(*)(int, int, int,
      unsigned int, unsigned int, unsigned int)') to 'FARPROC' (aka 'long long (*)()') converts to incompatible function
      type [-Wcast-function-type-mismatch]
  658 |             ( FREEIMAGE_ALLOCATE ) s_getFunction( ( FARPROC ) pAllocate,
      |                                                   ^~~~~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:661:50: warning: cast from 'FREEIMAGE_GETBITS' (aka 'unsigned char *(*)(struct FIBITMAP *)') to
      'FARPROC' (aka 'long long (*)()') converts to incompatible function type [-Wcast-function-type-mismatch]
  661 |             ( FREEIMAGE_GETBITS ) s_getFunction( ( FARPROC ) pGetbits,
      |                                                  ^~~~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:664:50: warning: cast from 'FREEIMAGE_GETINFO' (aka 'struct tagBITMAPINFO *(*)(struct FIBITMAP
      *)') to 'FARPROC' (aka 'long long (*)()') converts to incompatible function type [-Wcast-function-type-mismatch]
  664 |             ( FREEIMAGE_GETINFO ) s_getFunction( ( FARPROC ) pGetinfo,
      |                                                  ^~~~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:667:52: warning: cast from 'FREEIMAGE_GETHEIGHT' (aka 'unsigned long (*)(struct FIBITMAP *)') to
      'FARPROC' (aka 'long long (*)()') converts to incompatible function type [-Wcast-function-type-mismatch]
  667 |             ( FREEIMAGE_GETHEIGHT ) s_getFunction( ( FARPROC ) pGetheight,
      |                                                    ^~~~~~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:679:20: warning: cast to smaller integer type 'LONG' (aka 'long') from 'FIBITMAP *'
      (aka 'struct FIBITMAP *') [-Wpointer-to-int-cast]
  679 |          hb_retnl( ( LONG ) dib );
      |                    ^~~~~~~~~~~~
source/winapi/freeimg.c:729:18: warning: cast to 'HANDLE' (aka 'void *') from smaller integer type 'long'
      [-Wint-to-void-pointer-cast]
  729 |    HANDLE hdib = ( HANDLE ) hb_parnl( 1 );
      |                  ^~~~~~~~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:738:61: warning: cast from 'FREEIMAGE_CONVERTFROMRAWBITS' (aka 'struct FIBITMAP *(*)(unsigned
      char *, int, int, int, unsigned int, unsigned int, unsigned int, unsigned int, int)') to 'FARPROC'
      (aka 'long long (*)()') converts to incompatible function type [-Wcast-function-type-mismatch]
  738 |             ( FREEIMAGE_CONVERTFROMRAWBITS ) s_getFunction( ( FARPROC )
      |                                                             ^~~~~~~~~~~
  739 |             pConvertFromRawBits, "_FreeImage_ConvertFromRawBits@36" );
      |             ~~~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:741:53: warning: cast from 'FREEIMAGE_GETPALETTE' (aka 'struct tagRGBQUAD *(*)(struct FIBITMAP
      *)') to 'FARPROC' (aka 'long long (*)()') converts to incompatible function type [-Wcast-function-type-mismatch]
  741 |             ( FREEIMAGE_GETPALETTE ) s_getFunction( ( FARPROC ) pGetPalette,
      |                                                     ^~~~~~~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:744:49: warning: cast from 'FREEIMAGE_GETBPP' (aka 'unsigned long (*)(struct FIBITMAP *)') to
      'FARPROC' (aka 'long long (*)()') converts to incompatible function type [-Wcast-function-type-mismatch]
  744 |             ( FREEIMAGE_GETBPP ) s_getFunction( ( FARPROC ) pGetBPP,
      |                                                 ^~~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:779:20: warning: cast to smaller integer type 'LONG' (aka 'long') from 'FIBITMAP *'
      (aka 'struct FIBITMAP *') [-Wpointer-to-int-cast]
  779 |          hb_retnl( ( LONG ) dib );
      |                    ^~~~~~~~~~~~
source/winapi/freeimg.c:794:47: warning: cast from 'FREEIMAGE_RESCALE' (aka 'struct FIBITMAP *(*)(struct FIBITMAP *,
      int, int, int)') to 'FARPROC' (aka 'long long (*)()') converts to incompatible function type
      [-Wcast-function-type-mismatch]
  794 |          ( FREEIMAGE_RESCALE ) s_getFunction( ( FARPROC ) pRescale,
      |                                               ^~~~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:797:48: warning: cast to 'FIBITMAP *' (aka 'struct FIBITMAP *') from smaller integer type 'long'
      [-Wint-to-pointer-cast]
  797 |    hb_retnl( ( pRescale ) ? ( LONG ) pRescale( ( FIBITMAP * ) hb_parnl( 1 ),
      |                                                ^~~~~~~~~~~~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:797:29: warning: cast to smaller integer type 'LONG' (aka 'long') from 'FIBITMAP *'
      (aka 'struct FIBITMAP *') [-Wpointer-to-int-cast]
  797 |    hb_retnl( ( pRescale ) ? ( LONG ) pRescale( ( FIBITMAP * ) hb_parnl( 1 ),
      |                             ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  798 |                hb_parnl( 2 ), hb_parnl( 3 ),
      |                ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  799 |                ( FREE_IMAGE_FILTER ) hb_parni( 4 ) ) : 0 );
      |                ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:805:20: warning: cast to 'FIBITMAP *' (aka 'struct FIBITMAP *') from smaller integer type 'long'
      [-Wint-to-pointer-cast]
  805 |    FIBITMAP *dib = ( FIBITMAP * ) hb_parnl( 1 );
      |                    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:809:48: warning: cast from 'FREEIMAGE_ALLOCATE' (aka 'struct FIBITMAP *(*)(int, int, int,
      unsigned int, unsigned int, unsigned int)') to 'FARPROC' (aka 'long long (*)()') converts to incompatible function
      type [-Wcast-function-type-mismatch]
  809 |          ( FREEIMAGE_ALLOCATE ) s_getFunction( ( FARPROC ) pAllocate,
      |                                                ^~~~~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:812:48: warning: cast from 'FREEIMAGE_GETWIDTH' (aka 'unsigned long (*)(struct FIBITMAP *)') to
      'FARPROC' (aka 'long long (*)()') converts to incompatible function type [-Wcast-function-type-mismatch]
  812 |          ( FREEIMAGE_GETWIDTH ) s_getFunction( ( FARPROC ) pGetwidth,
      |                                                ^~~~~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:815:49: warning: cast from 'FREEIMAGE_GETHEIGHT' (aka 'unsigned long (*)(struct FIBITMAP *)') to
      'FARPROC' (aka 'long long (*)()') converts to incompatible function type [-Wcast-function-type-mismatch]
  815 |          ( FREEIMAGE_GETHEIGHT ) s_getFunction( ( FARPROC ) pGetheight,
      |                                                 ^~~~~~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:818:50: warning: cast from 'FREEIMAGE_SETCHANNEL' (aka 'int (*)(struct FIBITMAP *, struct
      FIBITMAP *, int)') to 'FARPROC' (aka 'long long (*)()') converts to incompatible function type
      [-Wcast-function-type-mismatch]
  818 |          ( FREEIMAGE_SETCHANNEL ) s_getFunction( ( FARPROC ) pSetChannel,
      |                                                  ^~~~~~~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:821:46: warning: cast from 'FREEIMAGE_UNLOAD' (aka 'void (*)(struct FIBITMAP *)') to 'FARPROC'
      (aka 'long long (*)()') converts to incompatible function type [-Wcast-function-type-mismatch]
  821 |          ( FREEIMAGE_UNLOAD ) s_getFunction( ( FARPROC ) pUnload,
      |                                              ^~~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:883:13: warning: cast to smaller integer type 'long' from 'fi_handle' (aka 'void *')
[-Wvoid-pointer-to-int-cast]
  883 |    return ( ( long int ) g_load_address - ( long int ) handle );
      |             ^~~~~~~~~~~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:883:43: warning: cast to smaller integer type 'long' from 'fi_handle' (aka 'void *')
      [-Wvoid-pointer-to-int-cast]
  883 |    return ( ( long int ) g_load_address - ( long int ) handle );
      |                                           ^~~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:889:54: warning: cast from 'FREEIMAGE_LOADFROMHANDLE' (aka 'struct FIBITMAP *(*)(int, struct
      FreeImageIO *, void *, int)') to 'FARPROC' (aka 'long long (*)()') converts to incompatible function type
      [-Wcast-function-type-mismatch]
  889 |          ( FREEIMAGE_LOADFROMHANDLE ) s_getFunction( ( FARPROC )
      |                                                      ^~~~~~~~~~~
  890 |          pLoadFromHandle, "_FreeImage_LoadFromHandle@16" );
      |          ~~~~~~~~~~~~~~~
source/winapi/freeimg.c:922:17: warning: cast to smaller integer type 'LONG' (aka 'long') from 'FIBITMAP *'
      (aka 'struct FIBITMAP *') [-Wpointer-to-int-cast]
  922 |       hb_retnl( ( LONG ) pLoadFromHandle( fif, &io, ( fi_handle ) image,
      |                 ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  923 |                   ( hb_pcount(  ) > 2 ) ? hb_parni( 3 ) : 0 ) );
      |                   ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:932:53: warning: cast from 'FREEIMAGE_ROTATECLASSIC' (aka 'struct FIBITMAP *(*)(struct FIBITMAP
      *, double)') to 'FARPROC' (aka 'long long (*)()') converts to incompatible function type
      [-Wcast-function-type-mismatch]
  932 |          ( FREEIMAGE_ROTATECLASSIC ) s_getFunction( ( FARPROC )
      |                                                     ^~~~~~~~~~~
  933 |          pRotateClassic, "_FreeImage_RotateClassic@12" );
      |          ~~~~~~~~~~~~~~
source/winapi/freeimg.c:935:60: warning: cast to 'FIBITMAP *' (aka 'struct FIBITMAP *') from smaller integer type 'long'
      [-Wint-to-pointer-cast]
  935 |    hb_retnl( ( pRotateClassic ) ? ( LONG ) pRotateClassic( ( FIBITMAP * )
      |                                                            ^~~~~~~~~~~~~~
  936 |                hb_parnl( 1 ), hb_parnd( 2 ) ) : 0 );
      |                ~~~~~~~~~~~~~
source/winapi/freeimg.c:935:35: warning: cast to smaller integer type 'LONG' (aka 'long') from 'FIBITMAP *'
      (aka 'struct FIBITMAP *') [-Wpointer-to-int-cast]
  935 |    hb_retnl( ( pRotateClassic ) ? ( LONG ) pRotateClassic( ( FIBITMAP * )
      |                                   ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  936 |                hb_parnl( 1 ), hb_parnd( 2 ) ) : 0 );
      |                ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:942:56: warning: cast from 'FREEIMAGE_GETDOTSPERMETERX' (aka
      'unsigned int (*)(struct FIBITMAP *)') to 'FARPROC' (aka 'long long (*)()') converts to incompatible function type
      [-Wcast-function-type-mismatch]
  942 |          ( FREEIMAGE_GETDOTSPERMETERX ) s_getFunction( ( FARPROC )
      |                                                        ^~~~~~~~~~~
  943 |          pGetDotsPerMeterX, "_FreeImage_GetDotsPerMeterX@4" );
      |          ~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:945:57: warning: cast to 'FIBITMAP *' (aka 'struct FIBITMAP *') from smaller integer type 'long'
      [-Wint-to-pointer-cast]
  945 |    hb_retnl( ( pGetDotsPerMeterX ) ? pGetDotsPerMeterX( ( FIBITMAP * )
      |                                                         ^~~~~~~~~~~~~~
  946 |                hb_parnl( 1 ) ) : 0 );
      |                ~~~~~~~~~~~~~
source/winapi/freeimg.c:952:56: warning: cast from 'FREEIMAGE_GETDOTSPERMETERY' (aka
      'unsigned int (*)(struct FIBITMAP *)') to 'FARPROC' (aka 'long long (*)()') converts to incompatible function type
      [-Wcast-function-type-mismatch]
  952 |          ( FREEIMAGE_GETDOTSPERMETERY ) s_getFunction( ( FARPROC )
      |                                                        ^~~~~~~~~~~
  953 |          pGetDotsPerMeterY, "_FreeImage_GetDotsPerMeterY@4" );
      |          ~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:955:57: warning: cast to 'FIBITMAP *' (aka 'struct FIBITMAP *') from smaller integer type 'long'
      [-Wint-to-pointer-cast]
  955 |    hb_retnl( ( pGetDotsPerMeterY ) ? pGetDotsPerMeterY( ( FIBITMAP * )
      |                                                         ^~~~~~~~~~~~~~
  956 |                hb_parnl( 1 ) ) : 0 );
      |                ~~~~~~~~~~~~~
source/winapi/freeimg.c:962:56: warning: cast from 'FREEIMAGE_SETDOTSPERMETERX' (aka 'void (*)(struct FIBITMAP *,
      unsigned int)') to 'FARPROC' (aka 'long long (*)()') converts to incompatible function type
      [-Wcast-function-type-mismatch]
  962 |          ( FREEIMAGE_SETDOTSPERMETERX ) s_getFunction( ( FARPROC )
      |                                                        ^~~~~~~~~~~
  963 |          pSetDotsPerMeterX, "_FreeImage_SetDotsPerMeterX@8" );
      |          ~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:966:26: warning: cast to 'FIBITMAP *' (aka 'struct FIBITMAP *') from smaller integer type 'long'
      [-Wint-to-pointer-cast]
  966 |       pSetDotsPerMeterX( ( FIBITMAP * ) hb_parnl( 1 ), hb_parnl( 2 ) );
      |                          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:974:56: warning: cast from 'FREEIMAGE_SETDOTSPERMETERY' (aka 'void (*)(struct FIBITMAP *,
      unsigned int)') to 'FARPROC' (aka 'long long (*)()') converts to incompatible function type
      [-Wcast-function-type-mismatch]
  974 |          ( FREEIMAGE_SETDOTSPERMETERY ) s_getFunction( ( FARPROC )
      |                                                        ^~~~~~~~~~~
  975 |          pSetDotsPerMeterY, "_FreeImage_SetDotsPerMeterY@8" );
      |          ~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:978:26: warning: cast to 'FIBITMAP *' (aka 'struct FIBITMAP *') from smaller integer type 'long'
      [-Wint-to-pointer-cast]
  978 |       pSetDotsPerMeterY( ( FIBITMAP * ) hb_parnl( 1 ), hb_parnl( 2 ) );
      |                          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:988:48: warning: cast from 'FREEIMAGE_ALLOCATE' (aka 'struct FIBITMAP *(*)(int, int, int,
      unsigned int, unsigned int, unsigned int)') to 'FARPROC' (aka 'long long (*)()') converts to incompatible function
      type [-Wcast-function-type-mismatch]
  988 |          ( FREEIMAGE_ALLOCATE ) s_getFunction( ( FARPROC ) pAllocate,
      |                                                ^~~~~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:992:14: warning: cast to smaller integer type 'ULONG' (aka 'unsigned long') from 'FIBITMAP *'
      (aka 'struct FIBITMAP *') [-Wpointer-to-int-cast]
  992 |    hb_retnl( ( ULONG ) pAllocate( hb_parnl( 1 ), hb_parnl( 2 ), hb_parnl( 3 ),
      |              ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  993 |                0, 0, 0 ) );
      |                ~~~~~~~~~
source/winapi/freeimg.c:1001:45: warning: cast from 'FREEIMAGE_PASTE' (aka 'int (*)(struct FIBITMAP *, struct FIBITMAP
      *, int, int, int)') to 'FARPROC' (aka 'long long (*)()') converts to incompatible function type
      [-Wcast-function-type-mismatch]
 1001 |          ( FREEIMAGE_PASTE ) s_getFunction( ( FARPROC ) pPaste,
      |                                             ^~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:1004:21: warning: cast to 'FIBITMAP *' (aka 'struct FIBITMAP *') from smaller integer type
      'long' [-Wint-to-pointer-cast]
 1004 |    hb_retl( pPaste( ( FIBITMAP * ) hb_parnl( 1 ),       // dest
      |                     ^~~~~~~~~~~~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:1005:16: warning: cast to 'FIBITMAP *' (aka 'struct FIBITMAP *') from smaller integer type
'long' [-Wint-to-pointer-cast]
 1005 |                ( FIBITMAP * ) hb_parnl( 2 ),    // src
      |                ^~~~~~~~~~~~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:1014:44: warning: cast from 'FREEIMAGE_COPY' (aka 'struct FIBITMAP *(*)(struct FIBITMAP *, int,
      int, int, int)') to 'FARPROC' (aka 'long long (*)()') converts to incompatible function type
      [-Wcast-function-type-mismatch]
 1014 |          ( FREEIMAGE_COPY ) s_getFunction( ( FARPROC ) pCopy,
      |                                            ^~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:1017:31: warning: cast to 'FIBITMAP *' (aka 'struct FIBITMAP *') from smaller integer type
      'long' [-Wint-to-pointer-cast]
 1017 |    hb_retnl( ( ULONG ) pCopy( ( FIBITMAP * ) hb_parnl( 1 ),     // dib
      |                               ^~~~~~~~~~~~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:1017:14: warning: cast to smaller integer type 'ULONG' (aka 'unsigned long') from 'FIBITMAP *'
      (aka 'struct FIBITMAP *') [-Wpointer-to-int-cast]
 1017 |    hb_retnl( ( ULONG ) pCopy( ( FIBITMAP * ) hb_parnl( 1 ),     // dib
      |              ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
 1018 |                hb_parnl( 2 ),   // left
      |                ~~~~~~~~~~~~~~~~~~~~~~~~
 1019 |                hb_parnl( 3 ),   // top
      |                ~~~~~~~~~~~~~~~~~~~~~~~
 1020 |                hb_parnl( 4 ),   // right
      |                ~~~~~~~~~~~~~~~~~~~~~~~~~
 1021 |                hb_parnl( 5 ) ) );       // bottom
      |                ~~~~~~~~~~~~~~~
source/winapi/freeimg.c:1030:58: warning: cast from 'FREEIMAGE_SETBACKGROUNDCOLOR' (aka 'int (*)(struct FIBITMAP *,
      struct tagRGBQUAD *)') to 'FARPROC' (aka 'long long (*)()') converts to incompatible function type
      [-Wcast-function-type-mismatch]
 1030 |          ( FREEIMAGE_SETBACKGROUNDCOLOR ) s_getFunction( ( FARPROC )
      |                                                          ^~~~~~~~~~~
 1031 |          pSetBackgroundColor, "_FreeImage_SetBackgroundColor@8" );
      |          ~~~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:1033:34: warning: cast to 'FIBITMAP *' (aka 'struct FIBITMAP *') from smaller integer type
      'long' [-Wint-to-pointer-cast]
 1033 |    hb_retl( pSetBackgroundColor( ( FIBITMAP * ) hb_parnl( 1 ), &rgbquad ) );
      |                                  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:1039:46: warning: cast from 'FREEIMAGE_INVERT' (aka 'int (*)(struct FIBITMAP *)') to 'FARPROC'
      (aka 'long long (*)()') converts to incompatible function type [-Wcast-function-type-mismatch]
 1039 |          ( FREEIMAGE_INVERT ) s_getFunction( ( FARPROC ) pInvert,
      |                                              ^~~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:1042:22: warning: cast to 'FIBITMAP *' (aka 'struct FIBITMAP *') from smaller integer type
      'long' [-Wint-to-pointer-cast]
 1042 |    hb_retl( pInvert( ( FIBITMAP * ) hb_parnl( 1 ) ) );
      |                      ^~~~~~~~~~~~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:1048:47: warning: cast from 'FREEIMAGE_GETBITS' (aka 'unsigned char *(*)(struct FIBITMAP *)') to
      'FARPROC' (aka 'long long (*)()') converts to incompatible function type [-Wcast-function-type-mismatch]
 1048 |          ( FREEIMAGE_GETBITS ) s_getFunction( ( FARPROC ) pGetbits,
      |                                               ^~~~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:1051:25: warning: cast to 'FIBITMAP *' (aka 'struct FIBITMAP *') from smaller integer type
      'long' [-Wint-to-pointer-cast]
 1051 |    hb_retptr( pGetbits( ( FIBITMAP * ) hb_parnl( 1 ) ) );
      |                         ^~~~~~~~~~~~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:1057:54: warning: cast from 'FREEIMAGE_CONVERTTO8BITS' (aka 'struct FIBITMAP *(*)(struct
      FIBITMAP *)') to 'FARPROC' (aka 'long long (*)()') converts to incompatible function type
      [-Wcast-function-type-mismatch]
 1057 |          ( FREEIMAGE_CONVERTTO8BITS ) s_getFunction( ( FARPROC )
      |                                                      ^~~~~~~~~~~
 1058 |          pConvertTo8Bits, "_FreeImage_ConvertTo8Bits@4" );
      |          ~~~~~~~~~~~~~~~
source/winapi/freeimg.c:1060:40: warning: cast to 'FIBITMAP *' (aka 'struct FIBITMAP *') from smaller integer type
      'long' [-Wint-to-pointer-cast]
 1060 |    hb_retnl( ( LONG ) pConvertTo8Bits( ( FIBITMAP * ) hb_parnl( 1 ) ) );
      |                                        ^~~~~~~~~~~~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:1060:14: warning: cast to smaller integer type 'LONG' (aka 'long') from 'FIBITMAP *'
      (aka 'struct FIBITMAP *') [-Wpointer-to-int-cast]
 1060 |    hb_retnl( ( LONG ) pConvertTo8Bits( ( FIBITMAP * ) hb_parnl( 1 ) ) );
      |              ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:1066:58: warning: cast from 'FREEIMAGE_CONVERTTOGREYSCALE' (aka 'struct FIBITMAP *(*)(struct
      FIBITMAP *)') to 'FARPROC' (aka 'long long (*)()') converts to incompatible function type
      [-Wcast-function-type-mismatch]
 1066 |          ( FREEIMAGE_CONVERTTOGREYSCALE ) s_getFunction( ( FARPROC )
      |                                                          ^~~~~~~~~~~
 1067 |          pConvertToGreyscale, "_FreeImage_ConvertToGreyscale@4" );
      |          ~~~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:1069:44: warning: cast to 'FIBITMAP *' (aka 'struct FIBITMAP *') from smaller integer type
      'long' [-Wint-to-pointer-cast]
 1069 |    hb_retnl( ( LONG ) pConvertToGreyscale( ( FIBITMAP * ) hb_parnl( 1 ) ) );
      |                                            ^~~~~~~~~~~~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:1069:14: warning: cast to smaller integer type 'LONG' (aka 'long') from 'FIBITMAP *'
      (aka 'struct FIBITMAP *') [-Wpointer-to-int-cast]
 1069 |    hb_retnl( ( LONG ) pConvertToGreyscale( ( FIBITMAP * ) hb_parnl( 1 ) ) );
      |              ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:1075:49: warning: cast from 'FREEIMAGE_THRESHOLD' (aka 'struct FIBITMAP *(*)(struct FIBITMAP *,
      unsigned char)') to 'FARPROC' (aka 'long long (*)()') converts to incompatible function type
      [-Wcast-function-type-mismatch]
 1075 |          ( FREEIMAGE_THRESHOLD ) s_getFunction( ( FARPROC ) pThreshold,
      |                                                 ^~~~~~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:1078:35: warning: cast to 'FIBITMAP *' (aka 'struct FIBITMAP *') from smaller integer type
      'long' [-Wint-to-pointer-cast]
 1078 |    hb_retnl( ( LONG ) pThreshold( ( FIBITMAP * ) hb_parnl( 1 ),
      |                                   ^~~~~~~~~~~~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:1078:14: warning: cast to smaller integer type 'LONG' (aka 'long') from 'FIBITMAP *'
      (aka 'struct FIBITMAP *') [-Wpointer-to-int-cast]
 1078 |    hb_retnl( ( LONG ) pThreshold( ( FIBITMAP * ) hb_parnl( 1 ),
      |              ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
 1079 |                ( BYTE ) hb_parnl( 2 ) ) );
      |                ~~~~~~~~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:1085:52: warning: cast from 'FREEIMAGE_FLIPVERTICAL' (aka 'int (*)(struct FIBITMAP *)') to
      'FARPROC' (aka 'long long (*)()') converts to incompatible function type [-Wcast-function-type-mismatch]
 1085 |          ( FREEIMAGE_FLIPVERTICAL ) s_getFunction( ( FARPROC ) pFlipVertical,
      |                                                    ^~~~~~~~~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:1088:28: warning: cast to 'FIBITMAP *' (aka 'struct FIBITMAP *') from smaller integer type
      'long' [-Wint-to-pointer-cast]
 hb_parnl( 1 ) ) ); pFlipVertical( ( FIBITMAP * )[1/1] Linking
      |                            ^~~~~~~~~~~~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:1096:53: warning: cast from 'FREEIMAGE_GETPIXELINDEX' (aka 'int (*)(struct FIBITMAP *, unsigned
      int, unsigned int, unsigned char *)') to 'FARPROC' (aka 'long long (*)()') converts to incompatible function type
      [-Wcast-function-type-mismatch]
 1096 |          ( FREEIMAGE_GETPIXELINDEX ) s_getFunction( ( FARPROC )
      |                                                     ^~~~~~~~~~~
 1097 |          pGetPixelIndex, "_FreeImage_GetPixelIndex@16" );
      |          ~~~~~~~~~~~~~~
source/winapi/freeimg.c:1099:27: warning: cast to 'FIBITMAP *' (aka 'struct FIBITMAP *') from smaller integer type
      'long' [-Wint-to-pointer-cast]
 1099 |    lRes = pGetPixelIndex( ( FIBITMAP * ) hb_parnl( 1 ), hb_parni( 2 ),
      |                           ^~~~~~~~~~~~~~~~~~~~~~~~~~~~
source/winapi/freeimg.c:1112:53: warning: cast from 'FREEIMAGE_SETPIXELINDEX' (aka 'int (*)(struct FIBITMAP *, unsigned
      int, unsigned int, unsigned char *)') to 'FARPROC' (aka 'long long (*)()') converts to incompatible function type
      [-Wcast-function-type-mismatch]
 1112 |          ( FREEIMAGE_SETPIXELINDEX ) s_getFunction( ( FARPROC )
      |                                                     ^~~~~~~~~~~
 1113 |          pSetPixelIndex, "_FreeImage_SetPixelIndex@16" );
      |          ~~~~~~~~~~~~~~
source/winapi/freeimg.c:1115:29: warning: cast to 'FIBITMAP *' (aka 'struct FIBITMAP *') from smaller integer type
      'long' [-Wint-to-pointer-cast]
 1115 |    hb_retl( pSetPixelIndex( ( FIBITMAP * ) hb_parnl( 1 ), hb_parni( 2 ),
      |                             ^~~~~~~~~~~~~~~~~~~~~~~~~~~~
111 warnings generated.
source/winapi/misc.c:73:14: warning: cast to smaller integer type 'LONG' (aka 'long') from 'HWND'
      (aka 'struct HWND__ *') [-Wpointer-to-int-cast]
   73 |    hb_retnl( ( LONG ) SetCapture( ( HWND ) HB_PARHANDLE( 1 ) ) );
      |              ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
source/winapi/misc.c:117:16: warning: cast to 'HWND' (aka 'struct HWND__ *') from smaller integer type 'long'
      [-Wint-to-pointer-cast]
  117 |    HWND hWnd = ( HWND ) hb_parnl( 1 );
      |                ^~~~~~~~~~~~~~~~~~~~~~
source/winapi/misc.c:507:18: warning: cast to smaller integer type 'LONG' (aka 'long') from 'HANDLE' (aka 'void *')
      [-Wvoid-pointer-to-int-cast]
  507 |    HB_RETHANDLE( ( LONG ) ( ( ( HELPINFO FAR * ) HB_PARHANDLE( 1 ) )->hItemHandle ) );
      |    ~~~~~~~~~~~~~~^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
include/guilib.h:19:61: note: expanded from macro 'HB_RETHANDLE'
   19 |    #define HB_RETHANDLE( h )        hb_retptr( ( void * ) ( h ) )
      |                                                             ^
source/winapi/misc.c:507:4: warning: cast to 'void *' from smaller integer type 'LONG' (aka 'long')
      [-Wint-to-void-pointer-cast]
  507 |    HB_RETHANDLE( ( LONG ) ( ( ( HELPINFO FAR * ) HB_PARHANDLE( 1 ) )->hItemHandle ) );
      |    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
include/guilib.h:19:48: note: expanded from macro 'HB_RETHANDLE'
   19 |    #define HB_RETHANDLE( h )        hb_retptr( ( void * ) ( h ) )
      |                                                ^~~~~~~~~~~~~~~~
source/winapi/misc.c:789:17: warning: cast to smaller integer type 'LONG' (aka 'long') from 'HGDIOBJ' (aka 'void *')
      [-Wvoid-pointer-to-int-cast]
  789 |       hb_retnl( ( LONG ) GetStockObject( HOLLOW_BRUSH ) );
      |                 ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
5 warnings generated.
source/winapi/nice.c:172:56: warning: cast to 'HRGN' (aka 'struct HRGN__ *') from smaller integer type 'long'
      [-Wint-to-pointer-cast]
  172 |    hb_retni( SetWindowRgn( ( HWND ) HB_PARHANDLE( 1 ), ( HRGN ) hb_parnl( 2 ),
      |                                                        ^~~~~~~~~~~~~~~~~~~~~~
1 warning generated.
source/winapi/registry.c:11:9: warning: '_WIN32_WINNT' macro redefined [-Wmacro-redefined]
   11 | #define _WIN32_WINNT 0x0400
      |         ^
<command line>:3:9: note: previous definition is here
    3 | #define _WIN32_WINNT 0x0a00
      |         ^
source/winapi/registry.c:32:24: warning: cast to 'HKEY' (aka 'struct HKEY__ *') from smaller integer type 'long'
      [-Wint-to-pointer-cast]
   32 |    if( RegCreateKeyEx( (HKEY) hb_parnl(1), hb_parc(2), 0, NULL, 0, KEY_ALL_ACCESS,
      |                        ^~~~~~~~~~~~~~~~~~
source/winapi/registry.c:35:17: warning: cast to smaller integer type 'ULONG' (aka 'unsigned long') from 'HKEY'
      (aka 'struct HKEY__ *') [-Wpointer-to-int-cast]
   35 |       hb_retnl( (ULONG) hkResult );
      |                 ^~~~~~~~~~~~~~~~
source/winapi/registry.c:49:22: warning: cast to 'HKEY' (aka 'struct HKEY__ *') from smaller integer type 'long'
      [-Wint-to-pointer-cast]
   49 |    if( RegOpenKeyEx( (HKEY)hb_parnl(1), hb_parc(2), 0, KEY_ALL_ACCESS,
      |                      ^~~~~~~~~~~~~~~~~
source/winapi/registry.c:52:17: warning: cast to smaller integer type 'ULONG' (aka 'unsigned long') from 'HKEY'
      (aka 'struct HKEY__ *') [-Wpointer-to-int-cast]
   52 |       hb_retnl( (ULONG) hkResult );
      |                 ^~~~~~~~~~~~~~~~
source/winapi/registry.c:64:21: warning: cast to 'HKEY' (aka 'struct HKEY__ *') from smaller integer type 'long'
      [-Wint-to-pointer-cast]
   64 |    if( RegCloseKey( (HKEY) hb_parnl(1) ) == ERROR_SUCCESS )
      |                     ^~~~~~~~~~~~~~~~~~
source/winapi/registry.c:80:23: warning: cast to 'HKEY' (aka 'struct HKEY__ *') from smaller integer type 'long'
      [-Wint-to-pointer-cast]
   80 |    if( RegSetValueEx( (HKEY)hb_parnl(1), hb_parc(2), 0, REG_SZ,
      |                       ^~~~~~~~~~~~~~~~~
source/winapi/registry.c:89:23: warning: cast to 'HKEY' (aka 'struct HKEY__ *') from smaller integer type 'long'
      [-Wint-to-pointer-cast]
   89 |    if( RegSetValueEx( (HKEY)hb_parnl(1), hb_parc(2), 0, REG_BINARY,
      |                       ^~~~~~~~~~~~~~~~~
source/winapi/registry.c:98:16: warning: cast to 'HKEY' (aka 'struct HKEY__ *') from smaller integer type 'long'
      [-Wint-to-pointer-cast]
   98 |    HKEY hKey = (HKEY)hb_parnl(1);
      |                ^~~~~~~~~~~~~~~~~
9 warnings generated.
source/winapi/resource.c:28:14: warning: cast to smaller integer type 'LONG' (aka 'long') from 'HMODULE'
      (aka 'struct HINSTANCE__ *') [-Wpointer-to-int-cast]
   28 |    hb_retnl( ( LONG ) hModule );
      |              ^~~~~~~~~~~~~~~~
1 warning generated.
source/winapi/richedit.c:520:18: warning: cast to smaller integer type 'DWORD' (aka 'unsigned long') from 'HANDLE'
      (aka 'void *') [-Wvoid-pointer-to-int-cast]
  520 |    es.dwCookie = ( DWORD ) hFile;
      |                  ^~~~~~~~~~~~~~~
1 warning generated.
source/winapi/shellapi.c:158:14: warning: cast to smaller integer type 'LONG' (aka 'long') from 'HINSTANCE'
      (aka 'struct HINSTANCE__ *') [-Wpointer-to-int-cast]
  158 |    hb_retnl( ( LONG ) ShellExecute( GetActiveWindow(  ),
      |              ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  159 |                HB_PARSTRDEF( 2, &hOperation, NULL ),
      |                ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  160 |                HB_PARSTR( 1, &hFile, NULL ),
      |                ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  161 |                HB_PARSTR( 3, &hParameters, NULL ),
      |                ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
SHOWNORMAL ) );        lpDirectory, HB_ISNUM( 5 ) ? hb_parni( 5 ) : SW_[1/1] Linking
      |                ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
1 warning generated.
source/winapi/window.c:122:13: warning: cast to 'HBRUSH' (aka 'struct HBRUSH__ *') from smaller integer type 'long'
      [-Wint-to-pointer-cast]
  122 |             ( HBRUSH ) hb_parnl( 6 ) ) ) : ( HBRUSH ) ( COLOR_WINDOW + 1 );
      |             ^~~~~~~~~~~~~~~~~~~~~~~~
source/winapi/window.c:701:14: warning: cast to smaller integer type 'LONG' (aka 'long') from 'HMODULE'
      (aka 'struct HINSTANCE__ *') [-Wpointer-to-int-cast]
  701 |    hb_retnl( ( LONG ) GetModuleHandle( NULL ) );
      |              ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
2 warnings generated.
source/winapi/wprint.c:448:4: warning: cast to 'void *' from smaller integer type 'LONG' (aka 'long')
      [-Wint-to-void-pointer-cast]
  448 |    HB_RETHANDLE( ( LONG ) DeleteEnhMetaFile( ( HENHMETAFILE )
      |    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  449 |                HB_PARHANDLE( 1 ) ) );
      |                ~~~~~~~~~~~~~~~~~~~~~
include/guilib.h:19:48: note: expanded from macro 'HB_RETHANDLE'
   19 |    #define HB_RETHANDLE( h )        hb_retptr( ( void * ) ( h ) )
      |                                                ^~~~~~~~~~~~~~~~
source/winapi/wprint.c:645:28: warning: cast to smaller integer type 'BOOL' (aka 'int') from 'HDC'
      (aka 'struct HDC__ *') [-Wpointer-to-int-cast]
  645 |                   Result = ( BOOL ) ResetDC( hDC, pDevMode );
      |                            ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
2 warnings generated.

C:\dev\hwgui>hbmk2 procmisc.hbp
hbmk2: Processando opções do ambiente: -LC:\msys64\clang64\lib -comp=zig
       -cpu=x86_64
Harbour 3.2.0dev (r2510231945)
Copyright (c) 1999-2025, https://harbour.github.io/
source/common/editor/hcedit_w.c:58:9: warning: '_WIN32_WINNT' macro redefined [-Wmacro-redefined]
   58 | #define _WIN32_WINNT 0x400
      |         ^
<command line>:3:9: note: previous definition is here
    3 | #define _WIN32_WINNT 0x0a00
      |         ^
1 warning generated.

C:\dev\hwgui>hbmk2 hbxml.hbp
hbmk2: Processando opções do ambiente: -LC:\msys64\clang64\lib -comp=zig
       -cpu=x86_64
Harbour 3.2.0dev (r2510231945)
Copyright (c) 1999-2025, https://harbour.github.io/

C:\dev\hwgui>hbmk2 hwgdebug.hbp
hbmk2: Processando opções do ambiente: -LC:\msys64\clang64\lib -comp=zig
       -cpu=x86_64
Harbour 3.2.0dev (r2510231945)
Copyright (c) 1999-2025, https://harbour.github.io/

C:\dev\hwgui>cd contrib\ext_controls

C:\dev\hwgui\contrib\ext_controls>copy \dev\hbrowsex.prg /y
        1 arquivo(s) copiado(s).

C:\dev\hwgui\contrib\ext_controls>cd ..

C:\dev\hwgui\contrib>hbmk2 hwg_extctrl.hbp
hbmk2: Processando opções do ambiente: -LC:\msys64\clang64\lib -comp=zig
       -cpu=x86_64
hbmk2: Harbour: Compilando módulos...
ext_controls\hbrowsex.prg(3400) Warning W0032  Variable 'NSKIP' is assigned but not used in function 'HBROWSEEX_WHEN(3393)'

No code generated.
hbmk2[hwg_extctrl]: Error: Running Harbour compiler (built-in). 1
(C:\hbzig\bin\harbour.exe) -n1 ext_controls\hbrowsex.prg ext_controls\hcomboex.prg ext_controls\hctrlex.prg ext_controls\hgridex.prg ext_controls\hrectex.prg -n -q0 -w3 -es2 -o..\lib\.hbmk\win\zig\ -iC:\hbzig\include -i..\include

Best regards,
Itamar M. Lins Jr.

Recent changes to bugs

Building with GTK3

#207 Bus with printing using a printer script.

#209 and key not work to skip a get -> While use a TAB page in other TAB. page

#208 Warnings Hwgui Windows OS

#182 ownerbutton() don't display image under Linux

#182 ownerbutton() don't display image under Linux

#182 ownerbutton() don't display image under Linux

ifdef __PLATFORM__WINDOWS

else

endif

#208 Warnings Hwgui Windows OS

and key not work to skip a get -> While use a TAB page in other TAB. page

Warnings Hwgui Windows OS

ifdef PLATFORMWINDOWS