paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-05 09:18:15 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Dotted filenames for package gtk1

Browse Source
This commit is contained in:
Michaël Van Canneyt 2023-03-06 14:58:04 +01:00
parent 6b308b9416
commit 22d290491e
13 changed files with 80 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
packages/gtk1/namespaced/Api.Gtk1.Gdk.pp Normal file
View File

@ -0,0 +1,3 @@
unit Api.Gtk1.Gdk;
{$DEFINE FPC_DOTTEDUNITS}
{$i gdk.pp}

3
packages/gtk1/namespaced/Api.Gtk1.Gdkpixbuf.pp Normal file
View File

@ -0,0 +1,3 @@
unit Api.Gtk1.Gdkpixbuf;
{$DEFINE FPC_DOTTEDUNITS}
{$i gdkpixbuf.pp}

3
packages/gtk1/namespaced/Api.Gtk1.Glib.pp Normal file
View File

@ -0,0 +1,3 @@
unit Api.Gtk1.Glib;
{$DEFINE FPC_DOTTEDUNITS}
{$i glib.pp}

3
packages/gtk1/namespaced/Api.Gtk1.Gmodule.pp Normal file
View File

@ -0,0 +1,3 @@
unit Api.Gtk1.Gmodule;
{$DEFINE FPC_DOTTEDUNITS}
{$i gmodule.pp}

3
packages/gtk1/namespaced/Api.Gtk1.Gtk.pp Normal file
View File

@ -0,0 +1,3 @@
unit Api.Gtk1.Gtk;
{$DEFINE FPC_DOTTEDUNITS}
{$i gtk.pp}

3
packages/gtk1/namespaced/Api.Gtk1.Gtkglarea.pp Normal file
View File

@ -0,0 +1,3 @@
unit Api.Gtk1.Gtkglarea;
{$DEFINE FPC_DOTTEDUNITS}
{$i gtkglarea.pp}

14
packages/gtk1/namespaces.lst Normal file
View File

@ -0,0 +1,14 @@
src/gtkgl/gtkglarea.pp=namespaced/Api.Gtk1.Gtkglarea.pp
{s*:src/gtkgl/}=namespaced/
{i+:src/gtkgl/}
src/gtk/gtk.pp=namespaced/Api.Gtk1.Gtk.pp
{s*:src/gtk/}=namespaced/
{i+:src/gtk/}
src/glib/gmodule.pp=namespaced/Api.Gtk1.Gmodule.pp
{s*:src/glib/}=namespaced/
{i+:src/glib/}
src/glib/glib.pp=namespaced/Api.Gtk1.Glib.pp
src/gdk/gdkpixbuf.pp=namespaced/Api.Gtk1.Gdkpixbuf.pp
{s*:src/gdk/}=namespaced/
{i+:src/gdk/}
src/gdk/gdk.pp=namespaced/Api.Gtk1.Gdk.pp

7
packages/gtk1/src/gdk/gdk.pp
View File

@ -19,7 +19,9 @@
Boston, MA 02111-1301, USA.
**********************************************************************}
{$IFNDEF FPC_DOTTEDUNITS}
unit gdk;
{$ENDIF FPC_DOTTEDUNITS}
interface
{$mode objfpc} { needed for array of const }
@ -32,8 +34,13 @@ interface
{$endif}
{$endif}
{$IFDEF FPC_DOTTEDUNITS}
uses
Api.Gtk1.Glib;
{$ELSE FPC_DOTTEDUNITS}
uses
glib;
{$ENDIF FPC_DOTTEDUNITS}
{$ifdef win32}
const

18
packages/gtk1/src/gdk/gdkpixbuf.pp
View File

@ -25,7 +25,9 @@
Boston, MA 02111-1301, USA.
**********************************************************************}
{$IFNDEF FPC_DOTTEDUNITS}
unit gdkpixbuf;
{$ENDIF FPC_DOTTEDUNITS}
interface
{$ifndef os2}
@ -59,6 +61,21 @@ interface
{$EndIf}
{$IFDEF FPC_DOTTEDUNITS}
Uses
Api.Gtk1.Glib,
{$IFDef XLIB_SUPPORT}
Api.X11.Xlib,
{$Else}
Api.Gtk1.Gdk
{$IFDef GTK_SUPPORT}
,Api.Gtk1.Gtk
{$IfDef GNOME_SUPPORT}
,GNOME
{$ENDIF}
{$ENDIF}
{$ENDIF};
{$ELSE FPC_DOTTEDUNITS}
Uses
GLIB,
{$IFDef XLIB_SUPPORT}
@ -72,6 +89,7 @@ Uses
{$ENDIF}
{$ENDIF}
{$ENDIF};
{$ENDIF FPC_DOTTEDUNITS}
{$IFDef XLIB_SUPPORT}

2
packages/gtk1/src/glib/glib.pp
View File

@ -18,7 +18,9 @@
Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
Boston, MA 02110-1301, USA.
}
{$IFNDEF FPC_DOTTEDUNITS}
unit glib;
{$ENDIF FPC_DOTTEDUNITS}
interface
{$mode objfpc}

7
packages/gtk1/src/glib/gmodule.pp
View File

@ -18,7 +18,9 @@
Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
Boston, MA 02110-1301, USA.
}
{$IFNDEF FPC_DOTTEDUNITS}
unit gmodule;
{$ENDIF FPC_DOTTEDUNITS}
interface
{$mode objfpc}
@ -31,8 +33,13 @@ interface
{$endif}
{$endif}
{$IFDEF FPC_DOTTEDUNITS}
uses
Api.Gtk1.Glib;
{$ELSE FPC_DOTTEDUNITS}
uses
glib;
{$ENDIF FPC_DOTTEDUNITS}
{$ifdef win32}
const

7
packages/gtk1/src/gtk/gtk.pp
View File

@ -19,7 +19,9 @@
Boston, MA 02110-1301, USA.
**********************************************************************}
{$IFNDEF FPC_DOTTEDUNITS}
unit gtk;
{$ENDIF FPC_DOTTEDUNITS}
interface
{ Always use smartlinking for win32, this solves some undefined functions
@ -32,8 +34,13 @@ interface
{$mode objfpc} { needed for array of const }
{$IFDEF FPC_DOTTEDUNITS}
uses
Api.Gtk1.Glib,Api.Gtk1.Gdk;
{$ELSE FPC_DOTTEDUNITS}
uses
glib,gdk;
{$ENDIF FPC_DOTTEDUNITS}
{$ifdef win32}
const

7
packages/gtk1/src/gtkgl/gtkglarea.pp
View File

@ -22,7 +22,9 @@
* Software Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
}
{$IFNDEF FPC_DOTTEDUNITS}
unit gtkglarea;
{$ENDIF FPC_DOTTEDUNITS}
{$MODE objfpc}
{$PACKRECORDS C}
@ -30,8 +32,13 @@ unit gtkglarea;
interface
{$ifndef os2}
{$IFDEF FPC_DOTTEDUNITS}
uses
Api.Gtk1.Gdk, Api.Gtk1.Gtk, Api.OpenGL.Gl;
{$ELSE FPC_DOTTEDUNITS}
uses
GDK, GTK, GL;
{$ENDIF FPC_DOTTEDUNITS}
const
libgtkgl = 'gtkgl';