Gnat-Gtkada-Alire on Ubuntu 24.04 Installation
Date: Mar 5 2025
Confirmed versions:
Ubuntu: 24.04.2 LTS, Gnat: 14.2.1, Gtkada:25.0.1
PC: OMEN 17-ck2095cl, i9-13900HX, RTX-4080
Advantages of This Version
1, No need for extensive additions to ~/.bashrc, making installation simpler.
2, The alr edit command allows GnatStudio to be used as before.
3, Running testgtk no longer results in errors (previously, errors occurred in some applications).
4, Graphical applications like gedit now work properly (previously, they did not)
Check installed package versions
$ make –version
GNU Make 4.3 — This is the current version
Check installation libncurses5
$ sudo ls -al /lib/x86_64-linux-gnu/libncu*
lrwxrwxrwx 1 root root 17 Apr 9 2024 /lib/x86_64-linux-gnu/libncurses.so.6 -> libncurses.so.6.4
-rw-r–r– 1 root root 165968 Apr 9 2024 /lib/x86_64-linux-gnu/libncurses.so.6.4
lrwxrwxrwx 1 root root 18 Apr 9 2024 /lib/x86_64-linux-gnu/libncursesw.so.6 -> libncursesw.so.6.4
-rw-r–r– 1 root root 239848 Apr 9 2024 /lib/x86_64-linux-gnu/libncursesw.so.6.4
libncurses6 was installed already, so make the link with libncurses5
$ sudo ln -s libncurses.so.6.4 /lib/x86_64-linux-gnu/libncurses.so.5
$ sudo ln -s libncursesw.so.6.4 /lib/x86_64-linux-gnu/libncursesw.so.5
Check libc6-dev package installation with Synaptic
Check libgtk-3-dev package installation with Synaptic
gnat installation with apt
/usr$ sudo apt install gnat
Reading package lists… Done
Building dependency tree… Done
Reading state information… Done
The following package was automatically installed and is no longer required:
python3-netifaces
Use 'sudo apt autoremove' to remove it.
The following additional packages will be installed:
gnat-13 gnat-13-x86-64-linux-gnu
Suggested packages:
ada-reference-manual-2012 gnat-13-doc gnat-13-sjlj
The following NEW packages will be installed:
gnat gnat-13 gnat-13-x86-64-linux-gnu
0 upgraded, 3 newly installed, 0 to remove and 6 not upgraded.
Need to get 19.4 MB of archives.
After this operation, 90.2 MB of additional disk space will be used.
Do you want to continue? [Y/n] y
Get:1 http://us.archive.ubuntu.com/ubuntu noble-updates/universe amd64 gnat-13-x86-64-linux-gnu amd64 13.3.0-6ubuntu2~24.04 [19.4 MB]
Get:2 http://us.archive.ubuntu.com/ubuntu noble-updates/universe amd64 gnat-13 amd64 13.3.0-6ubuntu2~24.04 [24.5 kB]
Get:3 http://us.archive.ubuntu.com/ubuntu noble/universe amd64 gnat amd64 13.2ubuntu2 [3,246 B]
Fetched 19.4 MB in 4s (5,131 kB/s)
Selecting previously unselected package gnat-13-x86-64-linux-gnu.
(Reading database … 199672 files and directories currently installed.)
Preparing to unpack …/gnat-13-x86-64-linux-gnu_13.3.0-6ubuntu2~24.04_amd64.deb …
Unpacking gnat-13-x86-64-linux-gnu (13.3.0-6ubuntu2~24.04) …
Selecting previously unselected package gnat-13.
Preparing to unpack …/gnat-13_13.3.0-6ubuntu2~24.04_amd64.deb …
Unpacking gnat-13 (13.3.0-6ubuntu2~24.04) …
Selecting previously unselected package gnat.
Preparing to unpack …/gnat_13.2ubuntu2_amd64.deb …
Unpacking gnat (13.2ubuntu2) …
Setting up gnat-13-x86-64-linux-gnu (13.3.0-6ubuntu2~24.04) …
Setting up gnat-13 (13.3.0-6ubuntu2~24.04) …
Setting up gnat (13.2ubuntu2) …
Processing triggers for man-db (2.12.0-4build2) …
Check gnat version
/usr$ gnat –version
GNAT 13.3.0 (— this version is new)
Test gnat Ada Build
~$ mkdir ada && cd ada && mkdir test1 && cd test1
Edit a new test code to test the gnat installation
~/ada/test1$ gedit main.adb
with Ada.Text_IO; use Ada.Text_IO;
with Ada.Float_Text_IO;
procedure Main is
type Real_Type is digits 15;
function Arctan(x : Real_Type) return Real_Type is
Sum : Real_Type := 0.0;
Term : Real_Type := x;
X2 : Real_Type := x * x;
Sign : Real_Type := 1.0;
Index : Integer := 1;
begin
while abs Term > 1.0e-15 loop
Sum := Sum + Term;
Index := Index + 2;
Sign := -Sign;
Term := Term * X2 * Sign / Real_Type(Index);
end loop;
return Sum;
end Arctan;
Pi : constant Real_Type := 16.0 * Arctan(1.0 / 5.0) - 4.0 * Arctan(1.0 / 239.0);
begin
Put_Line("Pi to 15 digits:");
Ada.Float_Text_IO.Put(Item => Float(Pi), Fore => 1, Aft => 15, Exp => 0);
New_Line;
end Main;~/ada/test1$ gprbuild main.adb
using project file /usr/share/gpr/_default.gpr
Compile
[Ada] main.adb
Bind
[gprbind] main.bexch
[Ada] main.ali
Link
[link] main.adb
~/ada/test1$ ls -al
total 128
drwxrwxr-x 2 mm mm 4096 Jan 17 09:15 .
drwxrwxr-x 3 mm mm 4096 Jan 17 09:12 ..
-rw-rw-r– 1 mm mm 9922 Jan 17 09:15 b__main.adb
-rw-rw-r– 1 mm mm 22291 Jan 17 09:15 b__main.ads
-rw-rw-r– 1 mm mm 11502 Jan 17 09:15 b__main.ali
-rw-rw-r– 1 mm mm 19472 Jan 17 09:15 b__main.o
-rwxrwxr-x 1 mm mm 36616 Jan 17 09:15 main
-rw-rw-r– 1 mm mm 774 Jan 17 09:14 main.adb
-rw-rw-r– 1 mm mm 0 Jan 17 09:15 main.adb.stderr
-rw-rw-r– 1 mm mm 0 Jan 17 09:15 main.adb.stdout
-rw-rw-r– 1 mm mm 2939 Jan 17 09:15 main.ali
-rw-rw-r– 1 mm mm 366 Jan 17 09:15 main.bexch
-rw-rw-r– 1 mm mm 2504 Jan 17 09:15 main.o
Execute the application
~/ada/test1$ ./main
Pi to 15 digits:
3.140257596970000
GnatStudio Installation
Download GnatStudio from GitHub
https://github.com/AdaCore/gnatstudio/releases/tag/gnatstudio-cr-20240506
~/Downloads$ tar zxvf gnatstudio-25.0w-20240506-x86_64-linux-bin.tar.gz
Following README file:
~/Downloads/$ sudo mkdir /usr/gnat
~/Downloads/gnatstudio-25.0w-20240506-x86_64-linux-bin$ sudo ./doinstall /usr/gnat
GNAT Studio has now been installed on your machine.
You can start it with the following command:
/usr/gnat/bin/gnatstudio
Make sure that GNAT Studio is in your path by typing one of the following
commands:
for csh and tcsh shells:
setenv PATH “/usr/gnat/bin:$PATH”
for sh, bash, ksh and zsh:
PATH=”/usr/gnat/bin:$PATH”; export PATH
Add these lines in the bottom of ~/.bashrc
$ gedit ~/.bashrc
# GNAT
export PATH=/usr/gnat/bin:$PATHStartup GnatStudio with the direct command
~$ cd ada
~/ada$ mkdir test2
~/ada$ gnatstudio
The GnatStudio setup window pops up
Press “Create new project”
Choose “Simple Ada Project” — Next
Browse and change location as /home/mm/ada/test2
Project Name: default (default)
Main Name: main (default)
Apply
Double click the file name main.adb
Copy and paste these text in the right pane.
with Ada.Text_IO; use Ada.Text_IO;
with Ada.Float_Text_IO;
procedure Main is
type Real_Type is digits 15;
function Arctan(x : Real_Type) return Real_Type is
Sum : Real_Type := 0.0;
Term : Real_Type := x;
X2 : Real_Type := x * x;
Sign : Real_Type := 1.0;
Index : Integer := 1;
begin
while abs Term > 1.0e-15 loop
Sum := Sum + Term;
Index := Index + 2;
Sign := -Sign;
Term := Term * X2 * Sign / Real_Type(Index);
end loop;
return Sum;
end Arctan;
Pi : constant Real_Type := 16.0 * Arctan(1.0 / 5.0) - 4.0 * Arctan(1.0 / 239.0);
begin
Put_Line("Pi to 15 digits:");
Ada.Float_Text_IO.Put(Item => Float(Pi), Fore => 1, Aft => 15, Exp => 0);
New_Line;
end Main;Press “Build All” icon
Press “Run” button
The results are displayed in the bottom boxes.
Alire Installation
Download Alire from here (Don’t use sudo apt install alire, it’s too old)
https://github.com/alire-project/alire/releases
~/Downloads$ ls -al alr-2.0.2-bin-x86_64-linux.zip
-rw-rw-r– 1 mm mm 10641659 Jan 17 11:09 alr-2.0.2-bin-x86_64-linux.zip
~/Downloads/alr-2.0.2-bin-x86_64-linux/bin$ ls -al
-rwxr-xr-x 1 mm mm 34577856 Oct 10 01:58 alr —This is the executable binary
~/Downloads/alr-2.0.2-bin-x86_64-linux/bin$ mkdir ~/ada/alire && cp alr ~/ada/alire
Add the PATH at the bottom of the file ~/.bashrc
export PATH=/home/mm/ada/alire:$PATH
Check the alire version
~$ alr –version
alr 2.0.2+9b80158
Test Hello Download–Build—Run with Alire
~/ada/test_alr01$ alr get hello
Cannot find required tool: GIT
Do you want Alire to install the required tool?
[Y] Yes [N] No (default is Yes) Y ------press "Y"
[sudo] password for mm:
Selecting previously unselected package liberror-perl.
(Reading database … 202230 files and directories currently installed.)
Preparing to unpack …/liberror-perl_0.17029-2_all.deb …
Unpacking liberror-perl (0.17029-2) …
Selecting previously unselected package git-man.
Preparing to unpack …/git-man_1%3a2.43.0-1ubuntu7.2_all.deb …
Unpacking git-man (1:2.43.0-1ubuntu7.2) …
Selecting previously unselected package git.
Preparing to unpack …/git_1%3a2.43.0-1ubuntu7.2_amd64.deb …
Unpacking git (1:2.43.0-1ubuntu7.2) …
Setting up liberror-perl (0.17029-2) …
Setting up git-man (1:2.43.0-1ubuntu7.2) …
Setting up git (1:2.43.0-1ubuntu7.2) …
Processing triggers for man-db (2.12.0-4build2) …
Cloning into '/home/mm/.config/alire/indexes/community/repo'…
remote: Enumerating objects: 11793, done.
remote: Counting objects: 100% (429/429), done.
remote: Compressing objects: 100% (273/273), done.
remote: Total 11793 (delta 312), reused 162 (delta 155), pack-reused 11364 (from 5)
Receiving objects: 100% (11793/11793), 2.31 MiB | 15.09 MiB/s, done.
Resolving deltas: 100% (6268/6268), done.
ⓘ Deploying hello=1.0.2…
Cloning into '/home/mm/ada/test_alr01/alr-boyl.tmp'…
remote: Enumerating objects: 34, done.
remote: Counting objects: 100% (10/10), done.
remote: Compressing objects: 100% (10/10), done.
remote: Total 34 (delta 0), reused 10 (delta 0), pack-reused 24 (from 1)
Receiving objects: 100% (34/34), 5.44 KiB | 5.44 MiB/s, done.
Resolving deltas: 100% (5/5), done.
ⓘ Deploying libhello=1.0.1…
Cloning into '/home/mm/.local/share/alire/releases/alr-yqtb.tmp'…
remote: Enumerating objects: 30, done.
remote: Counting objects: 100% (13/13), done.
remote: Compressing objects: 100% (13/13), done.
remote: Total 30 (delta 0), reused 12 (delta 0), pack-reused 17 (from 1)
Receiving objects: 100% (30/30), 5.20 KiB | 5.20 MiB/s, done.
Resolving deltas: 100% (3/3), done.
hello=1.0.2 successfully retrieved.
Dependencies were solved as follows:
libhello 1.0.1 (new)
File structure
Environment was created, do build and run
~/ada/test_alr01/ ——- You are on this directory after installation
|—hello_1.0.2_5715870b/ —— Move to this new directory
~/ada/test_alr01$ cd hello_1.0.2_5715870b/
The alr run command in Alire executes the application.
If the application has not been built yet, it will first build it before running.
~/ada/test_alr01/hello_1.0.2_5715870b$ alr run
ⓘ Alire has selected automatically this toolchain:
gprbuild=22.0.1
gnat_native=14.2.1
You can select a different toolchain at any time with "alr toolchain --select"
Download will start now:
Press Enter to continue or Ctrl-C to abort
ⓘ Deploying gprbuild=22.0.1…
Cannot find required tool: CURL
Do you want Alire to install the required tool?
[Y] Yes [N] No (default is Yes) Yes
Selecting previously unselected package curl.
(Reading database … 203314 files and directories currently installed.)
Preparing to unpack …/curl_8.5.0-2ubuntu10.6_amd64.deb …
Unpacking curl (8.5.0-2ubuntu10.6) …
Setting up curl (8.5.0-2ubuntu10.6) …
Processing triggers for man-db (2.12.0-4build2) …
#################################### 100.0%
ⓘ gprbuild=22.0.1 installed successfully.
ⓘ Deploying gnat_native=14.2.1…
################################### 100.0%
ⓘ gnat_native=14.2.1 installed successfully.
ⓘ Building hello=1.0.2/hello.gpr…
Setup
[mkdir] object directory for project Libhello
[mkdir] library directory for project Libhello
[mkdir] object directory for project Hello
[mkdir] exec directory for project Hello
Compile
[Ada] hello.adb
[Ada] libhello_config.ads
[Ada] libhello.adb
Build Libraries
[gprlib] Libhello.lexch
[archive] libLibhello.a
[index] libLibhello.a
Bind
[gprbind] hello.bexch
[Ada] hello.ali
Link
[link] hello.adb
✓ Build finished successfully in 0.32 seconds.
Hello, world!----This is the execution result
This is the sample if it was built already:
~/ada/test_alr01/hello_1.0.2_5715870b$ alr run
ⓘ Building hello=1.0.2/hello.gpr…
gprbuild: “hello” up to date
✓ Build finished successfully in 0.23 seconds.
Hello, world!
Startup Gnatstudio with Alire
~/ada/test_alr01/hello_1.0.2_5715870b$ alr edit
ⓘ There is no editor currently configured.
Please select your prefered editor or ‘other’ to enter a custom command
- VS Code
- GNAT studio
- Other
Enter your choice index (first is default):
>2 (Choose “2”)
Build and Run
How to use GtkAda
In the past, setting up GtkAda required a complicated installation process, and each project had to manually reference the installed library.
However, with the introduction of Alire, the installation step is no longer necessary.
Instead, individual projects can simply incorporate GtkAda using the command alr with gtkada.
This new approach simplifies the setup and eliminates the need for a separate GtkAda installation.
Build new directory and files
~/ada$ alr init test_gtk001 --bin (NOTE: dash dash bin)You can press the Enter key for all selections to proceed.
You can edit this information at any time with 'alr config'
Enter a short description of the crate: (default: '')
Using default: ''
Please enter your email address: (default: 'example@example.com')
Using default: 'example@example.com'
Select a software license for the crate?
1.MIT OR Apache-2.0 WITH LLVM-exception
2.MIT
3.Apache-2.0 WITH LLVM-exception
4.Apache-2.0
5.BSD-3-Clause
6.LGPL-3.0-or-later
7.GPL-3.0-or-later WITH GCC-exception-3.1
8.GPL-3.0-or-later
9.Other…
Enter your choice index (first is default):
1
Enter a comma (',') separated list of tags to help people find your crate: (default: '')
Using default: ''
Enter an optional Website URL for the crate: (default: '')
Using default: ''
warn: Tool gnat_native=14.2.1 is missing, redeploying…
ⓘ Deploying gnat_native=14.2.1…
########################################## 100.0%
ⓘ gnat_native=14.2.1 installed successfully.
warn: Tool gprbuild=22.0.1 is missing, redeploying…
ⓘ Deploying gprbuild=22.0.1…
########################################## 100.0%
ⓘ gprbuild=22.0.1 installed successfully.
✓ test_gtk001 initialized successfully.
Build GtkAda Environment
~/ada$ cd test_gtk001/
~/ada/test_gtk001$ alr with gtkada
◴ Updating index… Already up to date.
Requested changes:
✓ gtkada ^25.0.1 (add)
Changes to dependency solution:
- gtkada 25.0.1 (new)
+📦 libgtk3 3.24.41 (new,indirect,system package)
+📦 make 4.3.0 (new,indirect,system package)
+📦 pkg_config 1.8.1 (new,indirect,system package)
Do you want to proceed?
[Y] Yes [N] No (default is Yes) Yes
ⓘ Deploying gtkada=25.0.1…
-=O=- # # # #
~/ada/test_gtk001$ alr build
ⓘ Running post-fetch actions for gtkada=25.0.1…
checking build system type… x86_64-pc-linux-gnu
checking host system type… x86_64-pc-linux-gnu
checking target system type… x86_64-pc-linux-gnu
checking for pkg-config… /usr/bin/pkg-config
checking pkg-config is at least version 0.9.0… yes
checking for gcc… gcc
checking whether the C compiler works… yes
checking for C compiler default output file name… a.out
checking for suffix of executables…
checking whether we are cross compiling… no
checking for suffix of object files… o
checking whether we are using the GNU C compiler… yes
checking whether gcc accepts -g… yes
checking for gcc option to accept ISO C89… none needed
checking for gprbuild… /home/mm/.local/share/alire/toolchains/gprbuild_22.0.1_24dfc1b5/bin/gprbuild
checking for gprinstall… /home/mm/.local/share/alire/toolchains/gprbuild_22.0.1_24dfc1b5/bin/gprinstall
checking that your gnat compiler works with a simple example… yes
checking whether NLS is requested… yes
checking for gettext in libc… yes
checking for GTK… yes
checking for pkg-config… (cached) /usr/bin/pkg-config
checking pkg-config is at least version 0.16… yes
checking for GTK+ - version >= 3.24.24… yes (version 3.24.41)
checking for GMODULE… yes
checking for FONTCONFIG… yes
configure: creating ./config.status
config.status: creating Makefile
config.status: creating gtkada_shared.gpr
config.status: creating po/Makefile
config.status: creating docs/gtkada_rm/html/static/index.html
configure: --------- Summary for Gtkada 18.0w -----------------
configure: Shared libraries: yes (default: static)
configure: --------------------------------------------
gnatprep -DGETTEXT_INTL=False -DHAVE_GETTEXT=True src/gtkada-intl.gpb src/gtkada-intl.adb
ⓘ Building test_gtk001=0.1.0-dev/test_gtk001.gpr…
Setup
[mkdir] object directory for project GtkAda
[mkdir] library directory for project GtkAda
[mkdir] object directory for project Test_Gtk001
[mkdir] exec directory for project Test_Gtk001
Compile
[Ada] test_gtk001.adb
[Ada] gtkada-canvas_view-objects.adb
[Ada] cairo-png.adb
[Ada] gtkada-mdi.adb
[Ada] gtkada-canvas_view-links.adb
[Ada] gtkada-canvas_view-astar.adb
[Ada] gtkada-application.adb
[Ada] gtkada-pixmaps.ads
[Ada] gdk-visual.adb
[Ada] cairo-matrix.ads
[Ada] gtkada-stock_icons.ads
[Ada] gtkada-style.adb
[Ada] gtkada-file_selection.adb
[Ada] gtkada-multiline_entry.adb
[Ada] cairo-surface.adb
[Ada] gtk-dnd.adb
[Ada] gtkada.ads
[Ada] gtk-tree_model-utils.adb
[Ada] gtkada-canvas_view-models.adb
[Ada] glib-gnodes.adb
[Ada] gtk-type_conversion.adb
[Ada] glib-convert.adb
[Ada] gtkada-abstract_tree_model.adb
[Ada] gtk-marshallers.adb
[Ada] glib-type_conversion_hooks.adb
[Ada] gdk-pixbuf.adb
[Ada] gtk-handlers.adb
[Ada] glib-properties.adb
[Ada] cairo-pattern.ads
[Ada] gtkada-intl.adb
[Ada] gtkada-multi_paned.adb
[Ada] gdk.ads
[Ada] gdk-types.ads
[Ada] glib-key_file.adb
[Ada] gtkada-stock_labels.ads
[Ada] glib-unicode.adb
[Ada] glib-graphs-layouts.adb
[Ada] gtkada-printing.adb
[Ada] glib-error.adb
[Ada] gtk-rc.adb
[Ada] glib.adb
[Ada] glib-properties-creation.adb
[Ada] glib-generic_properties.adb
[Ada] gtkada-canvas_view-views.adb
[Ada] gtkada-canvas_view-models-layers.adb
[Ada] glib-types.adb
[Ada] gtk.ads
[Ada] cairo-scaled_font.ads
[Ada] glib-glist.adb
[Ada] gdk-main.adb
[Ada] cairo-pdf.adb
[Ada] gtkada-abstract_list_model.adb
[Ada] glib-xml.adb
[Ada] gtk-bindings.adb
[Ada] cairo-region.adb
[Ada] gtkada-handlers.ads
[Ada] gdk-types-keysyms.ads
[Ada] glib-graphs.adb
[Ada] pango-cairo.adb
[Ada] gdk-color.adb
[Ada] gdk-keyval.adb
[Ada] fontconfig.adb
[Ada] gdk-cairo.adb
[Ada] glib-gslist.adb
[Ada] glib-enums.ads
[Ada] gtkada-canvas.adb
[Ada] gtkada-dialogs.adb
[Ada] gdk-property.adb
[Ada] gtkada-canvas_view-rtrees.adb
[Ada] gtkada-types.adb
[Ada] gdk-dnd.adb
[Ada] gtkada-canvas_view.adb
[Ada] glib-object.adb
[Ada] cairo-svg.adb
[Ada] cairo-font_face.ads
[Ada] glib-module.adb
[Ada] pango.ads
[Ada] gtk-arguments.adb
[Ada] gdk-display_manager.adb
[Ada] gdk-threads.ads
[Ada] cairo.adb
[Ada] cairo-font_options.adb
[Ada] cairo-image_surface.adb
[Ada] gdk-window_attr.adb
[Ada] gdk-rectangle.adb
[Ada] gdk-input.ads
[Ada] glib-values.adb
[Ada] glib-xml_int.ads
[Ada] gtk-text_child.adb
[Ada] glib-main.adb
[Ada] gtkada-c.adb
[Ada] gtkada-bindings.adb
[Ada] gtkada-builder.adb
[Ada] glib-messages.adb
[Ada] glib-simple_action_group.adb
[Ada] gtk-status_bar.adb
[Ada] gtk-toggle_tool_button.adb
[Ada] glib-utils.adb
[Ada] gtk-image_menu_item.adb
[Ada] gtk-style_context.adb
[Ada] gtk-gentry.adb
[Ada] gtk-print_operation_preview.adb
[Ada] gtk-search_entry.adb
[Ada] glib-action_map.adb
[Ada] gtk-application.adb
[Ada] gtk-viewport.adb
[Ada] gtk-expander.adb
[Ada] gtk-widget.adb
[Ada] gtk-button.adb
[Ada] gtk-css_provider.adb
[Ada] gtk-tooltip.adb
[Ada] gtk-file_chooser_widget.adb
[Ada] gtk-text_tag_table.adb
[Ada] gtk-font_chooser_dialog.adb
[Ada] gdk-screen.adb
[Ada] pango-font_face.adb
[Ada] pango-matrix.adb
[Ada] gtk-drawing_area.adb
[Ada] gtk-tree_model.adb
[Ada] gtk-recent_chooser.adb
[Ada] gtk-size_group.adb
[Ada] gtk-invisible.adb
[Ada] gtk-radio_menu_item.adb
[Ada] glib-string.adb
[Ada] gtk-tree_view.adb
[Ada] gtk-accel_map.adb
[Ada] gtk-editable.adb
[Ada] gtk-main.adb
[Ada] gtk-menu.adb
[Ada] pango-enums.adb
[Ada] gdk-seat.adb
[Ada] gdk-device_tool.adb
[Ada] gdk-glcontext.adb
[Ada] gtk-cell_layout.adb
[Ada] gtk-cell_editable.adb
[Ada] pango-font_map.adb
[Ada] gtk-flow_box.adb
[Ada] gtk-toolbar.adb
[Ada] gdk-window.adb
[Ada] gtk-clipboard.adb
[Ada] gtk-check_menu_item.adb
[Ada] gtk-gesture_single.adb
[Ada] gtk-toggle_action.adb
[Ada] gtk-overlay.adb
[Ada] gtk-separator_tool_item.adb
[Ada] gtk-settings.adb
[Ada] gtk-notebook.adb
[Ada] gtk-enums.adb
[Ada] pango-layout.adb
[Ada] gtk-cell_renderer_text.adb
[Ada] gtk-symbolic_color.adb
[Ada] gtk-gesture_drag.adb
[Ada] gtk-icon_view.adb
[Ada] gtk-toggle_button.adb
[Ada] gtk-tool_item.adb
[Ada] gtk-entry_completion.adb
[Ada] gtk-gesture_swipe.adb
[Ada] glib-action.adb
[Ada] gtk-cell_renderer_accel.adb
[Ada] gtk-tree_store.adb
[Ada] gtk-spinner.adb
[Ada] gtk-orientable.adb
[Ada] gtk-tree_view_column.adb
[Ada] gtk-recent_action.adb
[Ada] glib-action_group.adb
[Ada] gtk-tool_palette.adb
[Ada] gtk-text_iter.adb
[Ada] gdk-frame_clock.adb
[Ada] glib-poll.adb
[Ada] gdk-drawing_context.adb
[Ada] gtk-cell_area_box.adb
[Ada] gtk-action.adb
[Ada] gtk-text_mark.adb
[Ada] gtk-tree_row_reference.adb
[Ada] gtk-stack_switcher.adb
[Ada] gtk-handle_box.adb
[Ada] gtk-builder.adb
[Ada] gtk-cell_view.adb
[Ada] gtk-color_button.adb
gtk-enums.adb:38:04: warning: possible aliasing problem for type "Chars_Ptr" [enabled by default]
gtk-enums.adb:38:04: warning: use -fno-strict-aliasing switch for references [enabled by default]
gtk-enums.adb:38:04: warning: or use "pragma No_Strict_Aliasing (Chars_Ptr);" [enabled by default]
[Ada] gtk-cell_renderer_combo.adb
[Ada] glib-spawn.adb
[Ada] gtk-offscreen_window.adb
[Ada] gtk-window.adb
[Ada] gtk-ui_manager.adb
[Ada] gtk-tree_model_sort.adb
[Ada] gtk-text_buffer.adb
[Ada] gtk-adjustment.adb
[Ada] glib-option.adb
[Ada] gtk-activatable.adb
[Ada] gtk-popover.adb
[Ada] gtk-text_view.adb
[Ada] gtk-color_chooser.adb
[Ada] gtk-header_bar.adb
[Ada] gtk-color_chooser_dialog.adb
[Ada] gtk-recent_chooser_widget.adb
[Ada] gtk-switch.adb
[Ada] gtk-stock.adb
[Ada] gtk-gesture_rotate.adb
[Ada] gtk-container.adb
[Ada] glib-notification.adb
[Ada] gdk-device.adb
[Ada] gtk-calendar.adb
[Ada] gtk-tool_button.adb
[Ada] gtk-scrolled_window.adb
[Ada] gtk-menu_item.adb
[Ada] gtk-print_operation.adb
[Ada] gtk-accel_group.adb
[Ada] pango-tabs.adb
[Ada] gtk-radio_action.adb
[Ada] gtk-about_dialog.adb
[Ada] gtk-combo_box_text.adb
[Ada] gdk-event.adb
[Ada] glib-g_icon.adb
[Ada] gtk-action_group.adb
[Ada] gtk-buildable.adb
[Ada] gtk-label.adb
[Ada] gtk-revealer.adb
[Ada] gtk-recent_info.adb
[Ada] gtk-grange.adb
[Ada] pango-attributes.adb
[Ada] gtk-tree_selection.adb
[Ada] gtk-dialog.adb
[Ada] gtk-scrollbar.adb
[Ada] gtk-tree_model_filter.adb
[Ada] gtk-bin.adb
[Ada] pango-font.adb
[Ada] gtk-print_context.adb
[Ada] gtk-flow_box_child.adb
[Ada] gtk-menu_tool_button.adb
[Ada] gtk-box.adb
[Ada] gtk-color_selection_dialog.adb
[Ada] gtk-list_box_row.adb
[Ada] gtk-cell_renderer_toggle.adb
[Ada] gtk-target_list.adb
[Ada] gtk-tool_item_group.adb
[Ada] gtk-font_selection.adb
[Ada] pango-fontset.adb
[Ada] gdk-frame_timings.adb
[Ada] pango-font_family.adb
[Ada] gtk-im_context_simple.adb
[Ada] gdk-monitor.adb
[Ada] glib-simple_action.adb
[Ada] gtk-menu_bar.adb
[Ada] gtk-list_box.adb
[Ada] gtk-list_store.adb
[Ada] gtk-recent_chooser_dialog.adb
[Ada] gtk-text_child_anchor.adb
[Ada] gtk-accel_label.adb
[Ada] gtk-im_multi_context.adb
[Ada] gtk-event_controller.adb
[Ada] gtk-action_bar.adb
[Ada] gtk-image.adb
[Ada] gtk-tree_drag_source.adb
[Ada] gtk-cell_renderer_pixbuf.adb
[Ada] gtk-icon_theme.adb
[Ada] gtk-radio_tool_button.adb
[Ada] gtk-recent_chooser_menu.adb
[Ada] gtk-style_properties.adb
[Ada] gtk-font_button.adb
[Ada] gtk-im_context.adb
[Ada] glib-application.adb
[Ada] glib-cancellable.adb
[Ada] gtk-gesture_pan.adb
[Ada] gtk-gesture_long_press.adb
[Ada] gtk-target_entry.adb
[Ada] glib-iochannel.adb
[Ada] gtk-layout.adb
[Ada] gtk-alignment.adb
[Ada] gtk-assistant.adb
[Ada] gtk-glarea.adb
[Ada] gdk-cursor.adb
[Ada] gtk-status_icon.adb
[Ada] gtk-scrollable.adb
[Ada] gtk-application_window.adb
[Ada] gdk-drag_contexts.adb
[Ada] gtk-scale.adb
[Ada] gdk-rgba.adb
[Ada] gtk-hsv.adb
[Ada] gtk-recent_filter.adb
[Ada] gtk-message_dialog.adb
[Ada] gtk-print_settings.adb
[Ada] gtk-entry_buffer.adb
[Ada] gtk-menu_button.adb
[Ada] gdk-device_manager.adb
[Ada] gtk-style.adb
[Ada] gtk-separator.adb
[Ada] glib-menu_model.adb
[Ada] gtk-misc.adb
[Ada] gtk-info_bar.adb
[Ada] pango-font_metrics.adb
[Ada] glib-menu.adb
[Ada] gtk-actionable.adb
[Ada] gtk-gesture_zoom.adb
[Ada] gtk-radio_button.adb
[Ada] gtk-aspect_frame.adb
[Ada] gtk-text_tag.adb
[Ada] gtk-text_attributes.adb
[Ada] gtk-font_chooser_widget.adb
[Ada] gtk-theming_engine.adb
[Ada] gtk-binding_set.adb
[Ada] gtk-selection_data.adb
[Ada] gtk-color_selection.adb
[Ada] gtk-cell_area.adb
[Ada] gtk-icon_source.adb
[Ada] gtk-arrow.adb
[Ada] gtk-file_chooser_dialog.adb
[Ada] gtk-color_chooser_widget.adb
[Ada] glib-list_model.adb
[Ada] gtk-page_setup.adb
[Ada] gtk-progress_bar.adb
[Ada] gtk-search_bar.adb
[Ada] gtk-stack.adb
[Ada] gtk-tool_shell.adb
[Ada] gtk-scale_button.adb
[Ada] gtk-paper_size.adb
[Ada] gtk-tree_drag_dest.adb
[Ada] gtk-cell_area_context.adb
[Ada] gtk-cell_renderer.adb
[Ada] gtk-frame.adb
[Ada] gtk-file_filter.adb
[Ada] pango-coverage.adb
[Ada] gtk-hbutton_box.adb
[Ada] gtk-icon_factory.adb
[Ada] gtk-tearoff_menu_item.adb
[Ada] gtk-cell_renderer_progress.adb
[Ada] gtk-icon_set.adb
[Ada] gtk-gesture.adb
[Ada] gtk-css_section.adb
[Ada] gtk-gradient.adb
[Ada] gtk-button_box.adb
[Ada] gtk-volume_button.adb
[Ada] gtk-file_chooser_button.adb
[Ada] gtk-menu_shell.adb
[Ada] gtk-font_selection_dialog.adb
[Ada] gtk-separator_menu_item.adb
[Ada] gtk-tree_sortable.adb
[Ada] glib-variant.adb
[Ada] gtk-combo_box.adb
[Ada] gtk-spin_button.adb
[Ada] pango-context.adb
[Ada] gtk-level_bar.adb
[Ada] gtk-file_chooser.adb
[Ada] gtk-grid.adb
[Ada] gtk-check_button.adb
[Ada] gtk-link_button.adb
[Ada] gdk-display.adb
[Ada] gtk-style_provider.adb
[Ada] gtk-shortcuts_window.adb
[Ada] gtk-vbutton_box.adb
[Ada] gtk-gesture_multi_press.adb
[Ada] gtk-cell_renderer_spin.adb
[Ada] gtk-fixed.adb
[Ada] pango-language.adb
[Ada] gtk-table.adb
[Ada] gtk-recent_manager.adb
[Ada] gtk-cell_renderer_spinner.adb
[Ada] gtk-font_chooser.adb
[Ada] gtk-event_box.adb
[Ada] gtk-paned.adb
[C] misc_generated.c
[C] misc.c
/home/mm/.local/share/alire/builds/gtkada_25.0.1_d3787772/05561da954afaee17128f59bba699db2f2e4a4215317b2b818a8016192c82334/src/misc.c: In function 'ada_g_module_build_path':
/home/mm/.local/share/alire/builds/gtkada_25.0.1_d3787772/05561da954afaee17128f59bba699db2f2e4a4215317b2b818a8016192c82334/src/misc.c:161:3: warning: 'g_module_build_path' is deprecated [-Wdeprecated-declarations]
161 | return g_module_build_path (directory, module_name);
| ^~
In file included from /usr/include/glib-2.0/gio/giomodule.h:31,
from /usr/include/glib-2.0/gio/gio.h:102,
from /usr/include/gtk-3.0/gdk/gdkapplaunchcontext.h:28,
from /usr/include/gtk-3.0/gdk/gdk.h:32,
from /home/mm/.local/share/alire/builds/gtkada_25.0.1_d3787772/05561da954afaee17128f59bba699db2f2e4a4215317b2b818a8016192c82334/src/misc.c:38:
/usr/include/glib-2.0/gmodule.h:142:23: note: declared here
142 | gchar* g_module_build_path (const gchar *directory,
| ^~~~~~~
Build Libraries
[gprlib] gtkada.lexch
[archive] libgtkada.a
[index] libgtkada.a
Bind
[gprbind] test_gtk001.bexch
[Ada] test_gtk001.ali
Link
[link] test_gtk001.adb
✓ Build finished successfully in 19.69 seconds.
New GtkAda environment directories
Default Source file: test_gtk001/src/test_gtk001.adb
procedure Test_Gtk001 is
begin
null;
end Test_Gtk001;Default Project file: test_gtk001/test_gtk001.gpr
with "config/test_gtk001_config.gpr";
project Test_Gtk001 is
for Source_Dirs use ("src/", "config/");
for Object_Dir use "obj/" & Test_Gtk001_Config.Build_Profile;
for Create_Missing_Dirs use "True";
for Exec_Dir use "bin";
for Main use ("test_gtk001.adb");
package Compiler is
for Default_Switches ("Ada") use Test_Gtk001_Config.Ada_Compiler_Switches;
end Compiler;
package Binder is
for Switches ("Ada") use ("-Es"); -- Symbolic traceback
end Binder;
package Install is
for Artifacts (".") use ("share");
end Install;
end Test_Gtk001;
Setup new source files for test
test_gtk001/src/test_gtk001.adb
with Quit_Procedure; use Quit_Procedure;
with Gtk.Main; use Gtk.Main;
with Gtk.Window; use Gtk.Window;
with Gtk.Enums; use Gtk.Enums;
with Gtk; use Gtk;
with Gtk.Label; use Gtk.Label;
with Gtk.Widget; use Gtk.Widget;
with Gtk.Container; use Gtk.Container;
procedure Test_Gtk001 is
Win : Gtk_Window;
Label : Gtk_Label;
begin
-- Initialize GTK
Init;
-- Create window
Win := Gtk_Window_New (Window_Toplevel);
Win.Set_Title ("Hello, World!");
Win.Set_Default_Size (400, 300);
-- Create label
Label := Gtk_Label_New ("Hello, World!");
Win.Add (Label);
-- Connect signal for window close event
Handlers.Connect (Win, "destroy", Handlers.To_Marshaller (Destroy'Access));
-- Show all widgets
Win.Show_All;
-- Start GTK main loop
Gtk.Main.Main;
end Test_Gtk001;New Sub program spec file: test_gtk001/src/quit_procedure.ads
with Gtk.Widget; use Gtk.Widget;
with Gtk.Handlers; use Gtk.Handlers;
package Quit_Procedure is
package Handlers is new Gtk.Handlers.Callback
(Widget_Type => Gtk_Widget_Record);
procedure Destroy (Widget : access Gtk_Widget_Record'Class);
end Quit_Procedure;New Sub program file: test_gtk001/src/quit_procedure.adb
with Gtk.Main;
package body Quit_Procedure is
procedure Destroy (Widget : access Gtk_Widget_Record'Class) is
pragma Unreferenced (Widget);
begin
Gtk.Main.Main_Quit;
end Destroy;
end Quit_Procedure;New project file: test_gtk001.gpr
with "config/test_gtk001_config.gpr";
with "gtkada";
project Test_Gtk001 is
for Source_Dirs use ("src/", "config/");
for Source_Files use ("test_gtk001.adb", "quit_procedure.ads", "quit_procedure.adb");
for Object_Dir use "obj/" & Test_Gtk001_Config.Build_Profile;
for Create_Missing_Dirs use "True";
for Exec_Dir use "bin";
for Main use ("test_gtk001.adb");
package Compiler is
for Default_Switches ("Ada") use Test_Gtk001_Config.Ada_Compiler_Switches;
end Compiler;
package Binder is
for Switches ("Ada") use ("-Es"); -- Symbolic traceback
end Binder;
package Linker is
for Default_Switches ("Ada") use ("-lgtkada", "-lglib-2.0", "-lgobject-2.0", "-lgtk-3");
end Linker;
package Install is
for Artifacts (".") use ("share");
end Install;
end Test_Gtk001;Build message:
alr –non-interactive –no-color –no-tty -q build — -XLIBRARY_TYPE=static -XBUILD=Production -XGTK_PREFIX=/home/mm/.local/share/alire/builds/gtkada_25.0.1_d3787772/05561da954afaee17128f59bba699db2f2e4a4215317b2b818a8016192c82334/ -XOBJCFLAGS= -XLDFLAGS= -XCPPFLAGS= -XCFLAGS= -XADAFLAGS=
[2025-03-05 15:42:47] process terminated successfully, elapsed time: 00.50s
Run message:
/home/mm/ada/test_gtk001/bin/test_gtk001 (NOTE*: Gnatstudio “run” causes next error message)
Gtk-Message: 15:42:47.908: Failed to load module “canberra-gtk-module”
Gtk-Message: 15:42:47.909: Failed to load module “canberra-gtk-module”
[2025-03-05 15:50:23] process terminated successfully, elapsed time: 07:35.68s
The object can run using both the ‘Run’ button in GnatStudio and the terminal.
NOTE*: The terminal execution command $ ./test_gtk001 does not cause the canberra-gtk-module error, but the GnatStudio ‘Run’ button does. However, it does not cause any problems.
GtkAda Project Workflow
~$ cd ada
~/ada$ ls -al
~/ada$ alr init test_gtk001 –bin (NOTE: dash dash bin)
> Enter > Enter > Enter > Enter > Enter > Enter
~/ada$ cd test_gtk004
~/ada/test_gtk004$ alr with gtkada
[Y] Yes [N] No (default is Yes) yes
~/ada/test_gtk004$ alr build
~/ada/test_gtk004$ ls -al
Set source files (ads, adb) in src directory.
Set project file (.gpr) in current directory if that is known in advance.
Startup GnatStudio: ~/ada/test_gtk004$ alr edit
Configuration
The following project file settings will be applied automatically for a simple project:
Edit—Project Properties—Files—Source files
Include these files:
test_gtk004.adb—Discard this auto generated file, and create the new one.
test_gtk004_config.ads–Keep this auto generated file.
sub_procedure.ads — Create your file
sub_procedure.adb — Create your file