@@ -3,7 +3,7 @@ module fpm_settings
3
3
use fpm_filesystem, only: exists, join_path, get_local_prefix, is_absolute_path, mkdir
4
4
use fpm_environment, only: os_is_unix
5
5
use fpm_error, only: error_t, fatal_error
6
- use fpm_toml, only: ttable = > toml_table, toml_error, toml_stat, get_value, toml_load, check_keys
6
+ use fpm_toml, only: toml_table, toml_error, toml_stat, get_value, toml_load, check_keys
7
7
use fpm_os, only: get_current_directory, change_directory, get_absolute_path, convert_to_absolute_path
8
8
9
9
implicit none
@@ -47,11 +47,11 @@ subroutine get_global_settings(global_settings, error)
47
47
! > Error reading config file.
48
48
type (error_t), allocatable , intent (out ) :: error
49
49
! > TOML table to be filled with global config settings.
50
- type (ttable ), allocatable :: table
50
+ type (toml_table ), allocatable :: table
51
51
! > Error parsing to TOML table.
52
52
type (toml_error), allocatable :: parse_error
53
53
54
- type (ttable ), pointer :: registry_table
54
+ type (toml_table ), pointer :: registry_table
55
55
integer :: stat
56
56
57
57
! Use custom path to the config file if it was specified.
@@ -122,7 +122,7 @@ subroutine use_default_registry_settings(global_settings)
122
122
! > Read registry settings from the global config file.
123
123
subroutine get_registry_settings (table , global_settings , error )
124
124
! > The [registry] subtable from the global config file.
125
- type (ttable ), target , intent (inout ) :: table
125
+ type (toml_table ), target , intent (inout ) :: table
126
126
! > The global settings which can be filled with the registry settings.
127
127
type (fpm_global_settings), intent (inout ) :: global_settings
128
128
! > Error handling.
0 commit comments