We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent 75a9864 commit 2c3b798Copy full SHA for 2c3b798
src/unix_regex.F90
@@ -37,8 +37,6 @@ module unix_regex
37
integer(kind=c_int), parameter, public :: REG_ESIZE = 15
38
integer(kind=c_int), parameter, public :: REG_ERPAREN = 16
39
40
- integer, parameter, public :: c_regoff_t = c_size_t
41
-
42
! struct regex_t
43
type, bind(c), public :: c_regex_t
44
private
@@ -87,8 +85,6 @@ module unix_regex
87
85
integer(kind=c_int), parameter, public :: REG_LARGE = int(o'01000')
88
86
integer(kind=c_int), parameter, public :: REG_BACKR = int(o'02000')
89
90
- integer, parameter, public :: c_regoff_t = c_int64_t
91
92
93
94
integer(kind=c_int) :: re_magic = 0
src/unix_types.F90
@@ -32,6 +32,7 @@ module unix_types
32
integer, parameter, public :: c_nlink_t = c_unsigned_long
33
integer, parameter, public :: c_off_t = c_long
34
integer, parameter, public :: c_pid_t = c_int32_t
35
+ integer, parameter, public :: c_regoff_t = c_size_t
36
integer, parameter, public :: c_socklen_t = c_int64_t
integer, parameter, public :: c_speed_t = c_unsigned_int
integer, parameter, public :: c_suseconds_t = c_int
@@ -57,6 +58,7 @@ module unix_types
57
58
integer, parameter, public :: c_nlink_t = c_uint64_t
59
integer, parameter, public :: c_off_t = c_int64_t
60
61
+ integer, parameter, public :: c_regoff_t = c_int64_t
62
integer, parameter, public :: c_socklen_t = c_size_t
63
64
integer, parameter, public :: c_suseconds_t = c_long
0 commit comments