mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-12 04:26:13 +02:00
* Improve win64 support gtk2, step 1: updating ifdefs. Patch by Julian Schutsch, Mantis #20578
git-svn-id: trunk@19874 -
This commit is contained in:
parent
aea30f9bb2
commit
19a7e17361
@ -30,7 +30,7 @@ interface
|
||||
uses glib2;
|
||||
|
||||
const
|
||||
{$ifdef win32}
|
||||
{$ifdef windows}
|
||||
{$define atkwin}
|
||||
atklib = 'libatk-1.0-0.dll';
|
||||
{$IFDEF FPC}
|
||||
|
@ -66,7 +66,7 @@
|
||||
|
||||
{$include gmarshal.inc}
|
||||
|
||||
{$IFDEF win32}
|
||||
{$IFDEF winDOWS}
|
||||
{$include gwin32.inc}
|
||||
{$ENDIF}
|
||||
|
||||
|
@ -194,7 +194,7 @@ function g_io_channel_unix_get_fd(channel:PGIOChannel):gint;cdecl;external glibl
|
||||
{ Hook for GClosure / GSource integration. Don't touch }
|
||||
//GLIB_VAR GSourceFuncs g_io_watch_funcs;
|
||||
|
||||
{$ifdef WIN32}
|
||||
{$ifdef WINDOWS}
|
||||
|
||||
const
|
||||
G_WIN32_MSG_HANDLE = 19981206;
|
||||
|
@ -38,7 +38,7 @@ uses
|
||||
ctypes,SysUtils;
|
||||
|
||||
const
|
||||
{$ifdef win32}
|
||||
{$ifdef windows}
|
||||
{$define gtkwin}
|
||||
gliblib = 'libglib-2.0-0.dll';
|
||||
gthreadlib = 'libgthread-2.0-0.dll';
|
||||
|
@ -102,7 +102,7 @@ const
|
||||
GLIB_SYSDEF_POLLHUP = 16;
|
||||
GLIB_SYSDEF_POLLNVAL = 32;
|
||||
|
||||
{$ifdef win32}
|
||||
{$ifdef windows}
|
||||
G_MODULE_SUFFIX = 'dll';
|
||||
{$else}
|
||||
G_MODULE_SUFFIX = 'so';
|
||||
|
@ -182,7 +182,7 @@ function g_idle_remove_by_data(data:gpointer):gboolean;cdecl;external gliblib na
|
||||
// GLIB_VAR GSourceFuncs g_timeout_funcs;
|
||||
// GLIB_VAR GSourceFuncs g_idle_funcs;
|
||||
|
||||
{$ifdef win32}
|
||||
{$ifdef windows}
|
||||
procedure g_main_poll_win32_msg_add(priority:gint; fd:PGPollFD; hwnd:guint);cdecl;external gliblib name 'g_main_poll_win32_msg_add';
|
||||
{$endif}
|
||||
|
||||
|
@ -52,7 +52,7 @@ function g_mem_is_system_malloc:gboolean; cdecl; external gliblib;
|
||||
{$IFNDEF KYLIX}
|
||||
{ Memory profiler and checker, has to be enabled via g_mem_set_vtable() }
|
||||
var
|
||||
{$IFDEF WIN32}
|
||||
{$IFDEF WINDOWS}
|
||||
glib_mem_profiler_table : PGMemVTable; external gliblib name 'glib_mem_profiler_table';
|
||||
{$ELSE}
|
||||
glib_mem_profiler_table : PGMemVTable;cvar;external;
|
||||
|
@ -92,7 +92,7 @@ function G_THREAD_ERROR: TGQuark;
|
||||
|
||||
{$IFNDEF KYLIX}
|
||||
var
|
||||
{$IFDEF WIN32}
|
||||
{$IFDEF WINDOWS}
|
||||
g_thread_functions_for_glib_use : TGThreadFunctions; external gliblib name 'g_thread_functions_for_glib_use';
|
||||
g_thread_use_default_impl : gboolean; external gliblib name 'g_thread_use_default_impl';
|
||||
g_threads_got_initialized : gboolean; external gliblib name 'g_threads_got_initialized';
|
||||
|
@ -11,7 +11,7 @@
|
||||
//------------------------------------------------------------------------------
|
||||
|
||||
{$IFDEF read_interface_rest}
|
||||
{$ifdef WIN32}
|
||||
{$ifdef WINDOWS}
|
||||
|
||||
{ On native Win32, directory separator is the backslash, and search path
|
||||
separator is the semicolon.
|
||||
|
@ -36,7 +36,7 @@ interface
|
||||
uses glib2;
|
||||
|
||||
const
|
||||
{$ifdef win32}
|
||||
{$ifdef windows}
|
||||
{$define gdkpixbufwin}
|
||||
gdkpixbuflib = 'libgdk_pixbuf-2.0-0.dll';
|
||||
{$IFDEF FPC}
|
||||
@ -77,7 +77,7 @@ const
|
||||
|
||||
{$IFNDEF Kylix}
|
||||
var
|
||||
{$IFDEF WIN32 }
|
||||
{$IFDEF WINDOWS }
|
||||
gdk_pixbuf_major_version: guint; external gdkpixbuflib name 'gdk_pixbuf_major_version';
|
||||
gdk_pixbuf_minor_version: guint; external gdkpixbuflib name 'gdk_pixbuf_minor_version';
|
||||
gdk_pixbuf_micro_version: guint; external gdkpixbuflib name 'gdk_pixbuf_micro_version';
|
||||
|
@ -33,7 +33,7 @@ uses glib2, gdk2pixbuf, pango, cairo;
|
||||
|
||||
const
|
||||
// OS dependent defines
|
||||
{$ifdef win32}
|
||||
{$ifdef windows}
|
||||
{$DEFINE GDK_WINDOWING_WIN32}
|
||||
gdklib = 'libgdk-win32-2.0-0.dll';
|
||||
{$IFDEF FPC}
|
||||
@ -179,7 +179,7 @@ procedure gdk_event_send_clientmessage_toall(event:PGdkEvent); cdecl; external g
|
||||
{$IFNDEF KYLIX}
|
||||
{ Threading }
|
||||
var
|
||||
{$IFDEF WIN32}
|
||||
{$IFDEF WINDOWS}
|
||||
gdk_threads_mutex : PGMutex; external gdklib name 'gdk_threads_mutex';
|
||||
{$ELSE}
|
||||
gdk_threads_mutex : PGMutex; cvar; external;
|
||||
|
@ -72,7 +72,7 @@ uses
|
||||
|
||||
const
|
||||
// OS dependent defines
|
||||
{$ifdef win32}
|
||||
{$ifdef windows}
|
||||
{$DEFINE GTK_WINDOWING_WIN32}
|
||||
gtklib = 'libgtk-win32-2.0-0.dll';
|
||||
{$IFDEF FPC}
|
||||
|
@ -11,7 +11,7 @@
|
||||
container : TGtkContainer;
|
||||
children : PGList;
|
||||
spacing : gint16;
|
||||
flag0 : {$ifdef win32}longint{$else}word{$endif};
|
||||
flag0 : {$ifdef windows}longint{$else}word{$endif};
|
||||
end;
|
||||
|
||||
PGtkBoxClass = ^TGtkBoxClass;
|
||||
|
@ -37,7 +37,7 @@ const
|
||||
{$IFNDEF KYLIX}
|
||||
{ Gtk version. }
|
||||
var
|
||||
{$IFDEF WIN32}
|
||||
{$IFDEF WINDOWS}
|
||||
gtk_major_version : guint;external gtklib name 'gtk_major_version';
|
||||
gtk_minor_version : guint;external gtklib name 'gtk_minor_version';
|
||||
gtk_micro_version : guint;external gtklib name 'gtk_micro_version';
|
||||
|
@ -12,7 +12,7 @@
|
||||
container : TGtkBin;
|
||||
hscrollbar : PGtkWidget;
|
||||
vscrollbar : PGtkWidget;
|
||||
flag0 : {$ifdef win32}longint{$else}word{$endif};
|
||||
flag0 : {$ifdef windows}longint{$else}word{$endif};
|
||||
shadow_type : guint16;
|
||||
end;
|
||||
|
||||
|
@ -132,7 +132,7 @@
|
||||
{$IFDEF read_interface_rest}
|
||||
{$IFNDEF KYLIX}
|
||||
var
|
||||
{$IFDEF WIN32}
|
||||
{$IFDEF WINDOWS}
|
||||
gtk_text_attr_appearance_type : TPangoAttrType; external gtklib name 'gtk_text_attr_appearance_type';
|
||||
{$ELSE}
|
||||
gtk_text_attr_appearance_type : TPangoAttrType;cvar; external;
|
||||
|
@ -31,7 +31,7 @@ uses Glib2, Gdk2;
|
||||
|
||||
const
|
||||
GdkGLExtLib =
|
||||
{$ifdef WIN32} 'libgdkglext-win32-1.0-0.dll'
|
||||
{$ifdef WINDOWS} 'libgdkglext-win32-1.0-0.dll'
|
||||
{$else}
|
||||
{$ifdef DARWIN}
|
||||
'gdkglext-x11-1.0'
|
||||
|
@ -31,7 +31,7 @@ uses Glib2, Gdk2, Gtk2, GdkGLExt;
|
||||
|
||||
const
|
||||
GtkGLExtLib =
|
||||
{$ifdef WIN32} 'libgtkglext-win32-1.0-0.dll'
|
||||
{$ifdef WINDOWS} 'libgtkglext-win32-1.0-0.dll'
|
||||
{$else}
|
||||
{$ifdef DARWIN}
|
||||
'gtkglext-x11-1.0'
|
||||
|
@ -39,7 +39,7 @@ uses
|
||||
const
|
||||
// OS dependent defines
|
||||
// !!!!! Maybe wrong for platforms other than linux !!!!!
|
||||
{$ifdef win32}
|
||||
{$ifdef windows}
|
||||
{$DEFINE GTK_WINDOWING_WIN32}
|
||||
gtkhtmllib = 'libgtkhtml-win32-2.0-0.dll';
|
||||
{$IFDEF FPC}
|
||||
|
@ -34,7 +34,7 @@ uses
|
||||
glib2, gtk2;
|
||||
|
||||
const
|
||||
{$ifdef win32}
|
||||
{$ifdef windows}
|
||||
{$define gtkwin}
|
||||
LibGladeLib = 'libglade-2.0-0.dll';
|
||||
{$IFDEF FPC}
|
||||
|
@ -36,7 +36,7 @@ uses glib2;
|
||||
{$DEFINE PANGO_ENABLE_BACKEND}
|
||||
|
||||
const
|
||||
{$ifdef win32}
|
||||
{$ifdef windows}
|
||||
{$define pangowin}
|
||||
pangolib = 'libpango-1.0-0.dll';
|
||||
{$IFDEF FPC}
|
||||
|
@ -33,7 +33,7 @@ interface
|
||||
uses glib2, pango, cairo;
|
||||
|
||||
const
|
||||
{$ifdef win32}
|
||||
{$ifdef windows}
|
||||
{$define pangowin}
|
||||
pangocairolib = 'libpangocairo-1.0-0.dll';
|
||||
{$IFDEF FPC}
|
||||
|
Loading…
Reference in New Issue
Block a user