Code cleanup: removes trailing spaces

Author: vmagnin

CHANGELOG.md

@@ -31,19 +31,19 @@ The gtk-4-fortran library has been generated from GTK 4.4.0 and GLib 2.70.0 unde
 
 
 ## [gtk-fortran 3.24.30] 2021-09-08
-- The gtk-3-fortran library has been generated from GTK 3.24.30 and GLib 2.68.4 under Fedora 34. 
+- The gtk-3-fortran library has been generated from GTK 3.24.30 and GLib 2.68.4 under Fedora 34.
 
 ### Added
 - The cfwrapper has a new required parameter `-v` to set the gtk-fortran semantic version (major.minor.patch). It is written in the `VERSIONS` file (used by CMake, `src/extract_events.pl`, `src/alt_build_test.sh`) and `codemeta.json`.
 - A `tutorials/` directory contains the sources and screenshots used in the Wiki new tutorials.
- 
+
 ### Changed
 - The compiler flags for release is now `-O3` instead of `-O3 -mtune=native -march=native`.
 - The Fortran / C interfaces now use the `import ::` statement instead of `use, intrinsic :: iso_c_binding, only:`.
 
 
 ## [gtk-fortran 4.0] 2021-04-28
-- The gtk-4-fortran library has been generated from GTK 4.2.0 and GLib 2.68.1 under Fedora 34. 
+- The gtk-4-fortran library has been generated from GTK 4.2.0 and GLib 2.68.1 under Fedora 34.
 - Starting from this 4.0 release, the project will adhere to [Semantic Versioning](https://semver.org/spec/v2.0.0.html).
 - All the improvements included in the simultaneously released gtk-fortran 3.24.28 (gtk3 branch) are also in the gtk4 branch.
 
@@ -110,7 +110,7 @@ The main objective of this release was to clean up the code and prepare it for t
 ### Added
 - Experimental and uncomplete `meson.build` files have been added. Meson>=0.53 is needed. Commands are `meson buildmeson` and `ninja -C buildmeson`. The gtk-fortran library can be inst	alled using `sudo ninja -C buildmeson install`, but there is still some problems for installing the `.mod` files (see https://github.com/mesonbuild/meson/issues/5374). Please use CMake for production !
 - examples/menu2.f90: the menu.f90 example is based on deprecated functions.
-- examples/gtkzero_gapp.f90: an empty GTK window based on GtkApplication and GApplication. 
+- examples/gtkzero_gapp.f90: an empty GTK window based on GtkApplication and GApplication.
 - CMake -D NO_BUILD_HL=true option to disable building the High Level sub-library (which includes PLplot and sketcher).
 - VERSIONS: a CSV file with the gtk-fortran, GTK, GLib and Ubuntu versions. Automatically created by the cfwrapper.py script. It will be used by the building system of the project.
 
@@ -181,7 +181,7 @@ in several modules to ease maintenance.
 ### Changed
 - GTK 3.20.9,  GLib 2.50.2
 - GTK 2.24.30, GLib 2.50.2
-- The code of the heart of gtk-fortran, the `cfwrapper.py` script, has been refactored and improved in order to ease maintenance. 
+- The code of the heart of gtk-fortran, the `cfwrapper.py` script, has been refactored and improved in order to ease maintenance.
 - CMake files have been unified in master (gtk2) and gtk3 branches.
 
 ## [gtk-fortran 16.04] - 2016-06-15

CMakeLists.txt

@@ -22,7 +22,7 @@
 # If not, see <http://www.gnu.org/licenses/>.
 #===============================================================================
 # Contributed by Kyle Horne: 05.11.2011
-# Last modifications: James Tappin 8/17/2012, Jens Hunger 01/07/2018, 
+# Last modifications: James Tappin 8/17/2012, Jens Hunger 01/07/2018,
 # vmagnin 2021-10-21
 #
 # CMAKE build file for gtk-fortran
@@ -105,7 +105,7 @@ set(CPACK_SOURCE_GENERATOR "TGZ")
 include(CPack)
 
 #===============================================================================
-# "Path for CMake modules to be loaded by the include() or find_package() 
+# "Path for CMake modules to be loaded by the include() or find_package()
 # commands before checking the default modules that come with CMake"
 #===============================================================================
 set(CMAKE_MODULE_PATH "${PROJECT_SOURCE_DIR}/cmake")
@@ -146,8 +146,8 @@ add_definitions(${GTK_CFLAGS_OTHER})
 #===============================================================================
 # PLplot integration (>=5.13 needed)
 # ----------------------------------
-# A lot of changes have occured in PLplot 5.11, 5.12 and 5.13: the libraries 
-# have been renamed (plplot and plplot-fortran) and the ISO_C_BINDING has been 
+# A lot of changes have occured in PLplot 5.11, 5.12 and 5.13: the libraries
+# have been renamed (plplot and plplot-fortran) and the ISO_C_BINDING has been
 # adopted.
 # By now (March 2019), the find_package(plplot) command gives a lot of errors
 # in Debian/Ubuntu distributions because of some renaming in Debian packages.

INSTALL.md

@@ -29,7 +29,7 @@ Useful variables that are specific to gtk-fortran are:
 
        EXCLUDE_PLPLOT -- set this to disable building the plplot
          integration even if PLplot is found.
-       NO_BUILD_HL -- set this to disable building the High Level sub-library 
+       NO_BUILD_HL -- set this to disable building the High Level sub-library
          (includes PLplot and sketcher).
        NO_BUILD_EXAMPLES -- set this to prevent compiling the example
          programs, also mostly useful for packagers.

README-high-level.md

@@ -4,7 +4,7 @@ The high level interface for gtk-fortran is in the source file
 gtk-hl.f90. This provides a number of higher level interfaces to the
 GTK widget system, with the intent of making GUI construction more
 accessible to scientific programmers (the feel should not be too alien
-to anyone who has developed GUIs in IDL). The routines make use of the 
+to anyone who has developed GUIs in IDL). The routines make use of the
 optional arguments in Fortran>=90 to simplify creating and initializing widgets.
 
 ## Modules list:
@@ -16,7 +16,7 @@ optional arguments in Fortran>=90 to simplify creating and initializing widgets.
 * gtk_hl_button: Implements interfaces to various kinds of button.
 
 * gtk_hl_chooser: Implements file choosers that do not need variadic
-       arguments. 
+       arguments.
 
 * gtk_hl_combobox: Implements interfaces to text comboboxes.
 
@@ -39,7 +39,7 @@ optional arguments in Fortran>=90 to simplify creating and initializing widgets.
 * gtk_hl_spin_slider: Implements spin boxes and sliders (including
        convenient integer interfaces).
 
-* gtk_hl_tree: Implements interfaces to the list & tree widgets. 
+* gtk_hl_tree: Implements interfaces to the list & tree widgets.
 
 
 In addition two graphics modules are available, but are not automatically
@@ -52,7 +52,7 @@ included with the gtk_hl module:
        plplot.
 
 * gdk_pixbuf_hl: Implements convenient interfaces to GDK pixbufs and
-       formats. 
+       formats.
 
 Several demos are provided in the examples/ directory: they have the
 prefix hl_.

codemeta.json

@@ -43,7 +43,7 @@
   "isAccessibleForFree": true,
   "keywords": "GTK, Fortran, Graphical User Interface",
   "license": "GPL v3.0",
-  "name": "gtk-fortran",  
+  "name": "gtk-fortran",
   "version": "4.1.0",
   "operatingSystem": "Linux, MacOS, MSYS2/Windows, BSD...",
   "programmingLanguage": "Fortran",

examples/CMakeLists.txt

@@ -33,13 +33,13 @@ if (NOT NO_BUILD_EXAMPLES)
   # Build the main examples:
   #==========================
   set(examples_list gtkzero_gapp gtkhello list_demo gio_demo tests
-    notebooks julia_pixbuf  mandelbrot_pixbuf mandelbrot_pixbuf_zoom 
-    menubar cairo-tests cairo-basics cairo-basics-click bazaar 
+    notebooks julia_pixbuf  mandelbrot_pixbuf mandelbrot_pixbuf_zoom
+    menubar cairo-tests cairo-basics cairo-basics-click bazaar
     pixbuf_without_gui regex
   )
 
   if(NOT NO_BUILD_HL)
-    set(examples_list ${examples_list} 
+    set(examples_list ${examples_list}
         hl_assistant hl_choosers hl_combo hl_containers hl_dialog hl_list1
         hl_list_n hl_list_renderers hl_pbar
         hl_sliders hl_sliders2 hl_textview hl_tree hl_cairo1 hl_cairo_clock

examples/README.md

@@ -1,7 +1,7 @@
 # Gtk-fortran Example Programs
 
 This directory contains example programs for the GTK 4 version of gtk-fortran.
-They are automatically built by CMake but any example may also be individually 
+They are automatically built by CMake but any example may also be individually
 built on a system with `gtk-4-fortran` installed with the command:
 
 ```bash
@@ -10,23 +10,23 @@ $ gfortran <name>.f90 -o <name> $(pkg-config --cflags --libs gtk-4-fortran)
 
 Among those examples:
 
-- gtkzero_gapp.f90 just opens an empty GTK window. Based on GtkApplication and GApplication. 
+- gtkzero_gapp.f90 just opens an empty GTK window. Based on GtkApplication and GApplication.
 - gtkhello.f90 opens a window with two buttons.
 - The \*pixbuf\*.f90 examples demonstrate pixel drawing (bitmap drawing). The pixbuf\_without\_gui.f90 example draws a Sierpinski triangle in a PNG file, without using a GUI.
 - The cairo*.f90 examples desmonstrate vectorial drawing using Cairo.
 - bazaar.f90 is used for testing various widgets and functions.
-- gio_demo.f90: this is a very basic demo to get started with GIO. It uses 
+- gio_demo.f90: this is a very basic demo to get started with GIO. It uses
 Fortran I/O to read text from the keyboard & writes it to the file `gio_demo.dat`
 in the current directory.
 - gtkbuilder2.f90 demonstrates how you can use an UI XML file to create your
 graphical user interface.
-- list_demo.f90 demonstrates how to use GtkTreeView for displaying trees and 
+- list_demo.f90 demonstrates how to use GtkTreeView for displaying trees and
 lists.
 - menubar.f90 demonstrates a menubar based on GMenu and GAction. It also uses CSS styles.
 - notebooks.f90 demonstrates how to use GtkNotebook, a tabbed notebook container.
 - regex.f90 demonstrates how to use GLib regular expressions functions.
 - hl_* examples uses the "high-level" interface.
     - hl_pbar.f90:  a progress bar.
     - ...
-- tests.f90 is testing things about ISO_C_BINDING and the relations between 
+- tests.f90 is testing things about ISO_C_BINDING and the relations between
 Fortran types and GLib types.

examples/bazaar.f90

@@ -376,8 +376,8 @@ end subroutine aboutbutton
 end module handlers
 
 !*******************************************************************************
-! In the main program, we declare the GTK application, connect it to its 
-! "activate" function where we will create the GUI, 
+! In the main program, we declare the GTK application, connect it to its
+! "activate" function where we will create the GUI,
 ! and finally call the GLib main loop.
 !*******************************************************************************
 program bazaar

examples/cairo-basics-click.f90

@@ -54,7 +54,7 @@ subroutine activate(app, gdata) bind(c)
     type(c_ptr)     :: window
     type(c_ptr)     :: my_drawing_area, controller, controller2
     integer(c_int)  :: width, height
-       
+
     window = gtk_application_window_new(app)
     width  = 700
     height = 700
@@ -67,7 +67,7 @@ subroutine activate(app, gdata) bind(c)
     call gtk_drawing_area_set_draw_func(my_drawing_area, &
                    & c_funloc(my_draw_function), c_null_ptr, c_null_funptr)
 
-    ! We need a gesture controller to detect mouse clicks: 
+    ! We need a gesture controller to detect mouse clicks:
     ! https://developer.gnome.org/gtk4/stable/GtkGestureClick.html
     ! https://developer.gnome.org/gtk4/stable/GtkWidget.html#gtk-widget-add-controller
     controller = gtk_gesture_click_new()
@@ -126,7 +126,7 @@ end subroutine scroll_cb
   ! https://developer.gnome.org/gtk4/stable/GtkDrawingArea.html#gtk-drawing-area-set-draw-func
   subroutine my_draw_function(widget, my_cairo_context, width, height, gdata) bind(c)
     type(c_ptr), value, intent(in)    :: widget, my_cairo_context, gdata
-    integer(c_int), value, intent(in) :: width, height    
+    integer(c_int), value, intent(in) :: width, height
     integer(c_int)                    :: cstatus
     integer                           :: t
     real(8), parameter                :: pi = 3.14159265358979323846d0
@@ -137,25 +137,25 @@ subroutine my_draw_function(widget, my_cairo_context, width, height, gdata) bind
     ! Horizontal and vertical thin blue lines:
     call cairo_set_source_rgb(my_cairo_context, 0d0, 0d0, 1d0)
     call cairo_set_line_width(my_cairo_context, 1d0)
- 
+
     do t = 0, height, +100
       ! https://cairographics.org/manual/cairo-Paths.html#cairo-move-to
       call cairo_move_to(my_cairo_context, 0d0,       t*1d0)
       call cairo_line_to(my_cairo_context, width*1d0, t*1d0)
-      call cairo_stroke(my_cairo_context) 
+      call cairo_stroke(my_cairo_context)
     end do
- 
+
     do t = 0, width, +100
       call cairo_move_to(my_cairo_context, t*1d0, 0d0)
       call cairo_line_to(my_cairo_context, t*1d0, height*1d0)
-      call cairo_stroke(my_cairo_context) 
+      call cairo_stroke(my_cairo_context)
     end do
 
     ! A thick red circle at the centre:
     call cairo_set_source_rgb(my_cairo_context, 1d0, 0d0, 0d0)
     call cairo_set_line_width(my_cairo_context, 5d0)
     call cairo_arc(my_cairo_context, width/2d0, height/2d0, radius, 0d0, 2*pi)
-    call cairo_stroke(my_cairo_context) 
+    call cairo_stroke(my_cairo_context)
 
     ! Save the image as a PNG
     ! https://cairographics.org/manual/cairo-PNG-Support.html#cairo-surface-write-to-png

examples/cairo-basics.f90

@@ -71,7 +71,7 @@ end subroutine activate
   ! https://developer.gnome.org/gtk4/stable/GtkDrawingArea.html#gtk-drawing-area-set-draw-func
   subroutine my_draw_function(widget, my_cairo_context, width, height, gdata) bind(c)
     type(c_ptr), value, intent(in)    :: widget, my_cairo_context, gdata
-    integer(c_int), value, intent(in) :: width, height    
+    integer(c_int), value, intent(in) :: width, height
     integer                           :: cstatus
     integer                           :: t
     real(8), parameter                :: pi = 3.14159265358979323846d0
@@ -82,15 +82,15 @@ subroutine my_draw_function(widget, my_cairo_context, width, height, gdata) bind
     call cairo_move_to(my_cairo_context, 0d0, 0d0)
     call cairo_curve_to(my_cairo_context, 600d0, 50d0, 115d0, 545d0, &
                       & width*1d0, height*1d0)
-    call cairo_stroke(my_cairo_context) 
+    call cairo_stroke(my_cairo_context)
 
     ! Lines:
     call cairo_set_source_rgb(my_cairo_context, 0d0, 0.5d0, 0.5d0)
     call cairo_set_line_width(my_cairo_context, 2d0)
     do t = 0, int(height), +20
       call cairo_move_to(my_cairo_context, 0d0, t*1d0)
       call cairo_line_to(my_cairo_context, t*1d0, height*1d0)
-      call cairo_stroke(my_cairo_context) 
+      call cairo_stroke(my_cairo_context)
     end do
 
     ! Text:
@@ -111,7 +111,7 @@ subroutine my_draw_function(widget, my_cairo_context, width, height, gdata) bind
         call cairo_set_line_width(my_cairo_context, 5d0*t/50d0)
         call cairo_arc(my_cairo_context, 353d0 + 200d0*cos(t*2d0*pi/50), &
                      & 350d0 + 200d0*sin(t*2d0*pi/50), 50d0, 0d0, 2*pi)
-        call cairo_stroke(my_cairo_context) 
+        call cairo_stroke(my_cairo_context)
     end do
 
     ! Save the image as a PNG:

examples/cairo-tests.f90

@@ -80,29 +80,29 @@ subroutine my_draw_function(widget, my_cairo_context, width, height, gdata) bind
 
     ! We redraw the Mandelbrot set pixbuf:
     call gdk_cairo_set_source_pixbuf(my_cairo_context, my_pixbuf, &
-                                   & 700d0/4d0, 700d0/4d0) 
+                                   & 700d0/4d0, 700d0/4d0)
     call cairo_paint(my_cairo_context)
 
     ! And do some vectorial Cairo drawings above:
     call cairo_set_line_width(my_cairo_context, 1d0)
     call cairo_set_source_rgb(my_cairo_context, 0d0, 0d0, 1d0)
-    call cairo_move_to(my_cairo_context, 100d0, 50d0)  
+    call cairo_move_to(my_cairo_context, 100d0, 50d0)
     call cairo_line_to(my_cairo_context, 700d0, 700d0)
-    call cairo_stroke(my_cairo_context) 
+    call cairo_stroke(my_cairo_context)
 
     call cairo_set_source_rgb(my_cairo_context, 1d0, 0d0, 0d0)
     call cairo_set_line_width(my_cairo_context, 3d0)
-    call cairo_move_to(my_cairo_context, 60d0, 0d0)  
+    call cairo_move_to(my_cairo_context, 60d0, 0d0)
     call cairo_curve_to(my_cairo_context, 600d0, 50d0, 135d0, 45d0, 500d0, 500d0)
-    call cairo_stroke(my_cairo_context) 
+    call cairo_stroke(my_cairo_context)
 
     call cairo_set_source_rgb(my_cairo_context, 1d0, 1d0, 0d0)
     call cairo_set_line_width(my_cairo_context, 2d0)
-    call cairo_move_to(my_cairo_context, 0d0, height/2d0)  
+    call cairo_move_to(my_cairo_context, 0d0, height/2d0)
     call cairo_line_to(my_cairo_context, 1d0*width, height/2d0)
-    call cairo_move_to(my_cairo_context, width/2d0+width/12d0, 0d0)  
+    call cairo_move_to(my_cairo_context, width/2d0+width/12d0, 0d0)
     call cairo_line_to(my_cairo_context, width/2d0+width/12d0, height*1d0)
-    call cairo_stroke(my_cairo_context) 
+    call cairo_stroke(my_cairo_context)
 
     call cairo_select_font_face(my_cairo_context, "Times"//c_null_char, &
                    & CAIRO_FONT_SLANT_NORMAL, CAIRO_FONT_WEIGHT_NORMAL)
@@ -111,8 +111,8 @@ subroutine my_draw_function(widget, my_cairo_context, width, height, gdata) bind
     call cairo_show_text (my_cairo_context, "Mandelbrot set"//c_null_char)
 
     call cairo_new_sub_path(my_cairo_context)
-    call cairo_arc(my_cairo_context, 300d0, 300d0, 100d0, 0d0, 3.14159d0) 
-    call cairo_stroke(my_cairo_context) 
+    call cairo_arc(my_cairo_context, 300d0, 300d0, 100d0, 0d0, 3.14159d0)
+    call cairo_stroke(my_cairo_context)
 
     ! The image is written to PNG only one time:
     if (write_png) then
@@ -153,7 +153,7 @@ subroutine activate(app, gdata) bind(c)
     ! Queries the number of channels of a pixbuf:
     nch = gdk_pixbuf_get_n_channels(my_pixbuf)
     print *, "Number of channels of the pixbuf: ", nch
-    ! "Queries the rowstride of a pixbuf, which is the number of bytes between 
+    ! "Queries the rowstride of a pixbuf, which is the number of bytes between
     ! the start of a row and the start of the next row":
     rowstride = gdk_pixbuf_get_rowstride(my_pixbuf)
     print *, "Rowstride of the pixbuf: ", rowstride

examples/gtkbuilder2.f90

@@ -90,7 +90,7 @@ program gtkbuilder
   ! Initialize the GTK Library:
   call gtk_init ()
 
-  ! Create a new GtkBuilder object and parse the 
+  ! Create a new GtkBuilder object and parse the
   ! Glade3 XML file 'gtkbuilder.glade' and add it's contents:
   builder=gtk_builder_new_from_file("gtkbuilder.glade"//c_null_char)
 

examples/gtkhello.f90

@@ -30,7 +30,7 @@
 !*************************************
 ! User defined event handlers go here
 !*************************************
-! Note that events are a special type of signals, coming from 
+! Note that events are a special type of signals, coming from
 ! the X Window system. Callback functions must have an event argument.
 module handlers
 
@@ -125,8 +125,8 @@ end subroutine button1clicked
 end module handlers
 
 !*******************************************************************************
-! In the main program, we declare the GTK application, connect it to its 
-! "activate" function where we will create the GUI, 
+! In the main program, we declare the GTK application, connect it to its
+! "activate" function where we will create the GUI,
 ! and finally call the GLib main loop.
 !*******************************************************************************
 program gtkhello
@@ -147,7 +147,7 @@ program gtkhello
   ! https://developer.gnome.org/gio/stable/GApplication.html#g-application-id-is-valid
   app = gtk_application_new("gtk-fortran.examples.gtkhello"//c_null_char, &
                             & G_APPLICATION_FLAGS_NONE)
-  ! The activate signal will be sent by g_application_run(). 
+  ! The activate signal will be sent by g_application_run().
   ! The c_funloc() function returns the C address of the callback function.
   ! The c_null_ptr means no data is transfered to the callback function.
   call g_signal_connect(app, "activate"//c_null_char, c_funloc(activate), &