Skip to content

Commit 2c3b798

Browse files
committed
Moved type.
1 parent 75a9864 commit 2c3b798

File tree

2 files changed

+2
-4
lines changed

2 files changed

+2
-4
lines changed

src/unix_regex.F90

Lines changed: 0 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -37,8 +37,6 @@ module unix_regex
3737
integer(kind=c_int), parameter, public :: REG_ESIZE = 15
3838
integer(kind=c_int), parameter, public :: REG_ERPAREN = 16
3939

40-
integer, parameter, public :: c_regoff_t = c_size_t
41-
4240
! struct regex_t
4341
type, bind(c), public :: c_regex_t
4442
private
@@ -87,8 +85,6 @@ module unix_regex
8785
integer(kind=c_int), parameter, public :: REG_LARGE = int(o'01000')
8886
integer(kind=c_int), parameter, public :: REG_BACKR = int(o'02000')
8987

90-
integer, parameter, public :: c_regoff_t = c_int64_t
91-
9288
! struct regex_t
9389
type, bind(c), public :: c_regex_t
9490
integer(kind=c_int) :: re_magic = 0

src/unix_types.F90

Lines changed: 2 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -32,6 +32,7 @@ module unix_types
3232
integer, parameter, public :: c_nlink_t = c_unsigned_long
3333
integer, parameter, public :: c_off_t = c_long
3434
integer, parameter, public :: c_pid_t = c_int32_t
35+
integer, parameter, public :: c_regoff_t = c_size_t
3536
integer, parameter, public :: c_socklen_t = c_int64_t
3637
integer, parameter, public :: c_speed_t = c_unsigned_int
3738
integer, parameter, public :: c_suseconds_t = c_int
@@ -57,6 +58,7 @@ module unix_types
5758
integer, parameter, public :: c_nlink_t = c_uint64_t
5859
integer, parameter, public :: c_off_t = c_int64_t
5960
integer, parameter, public :: c_pid_t = c_int32_t
61+
integer, parameter, public :: c_regoff_t = c_int64_t
6062
integer, parameter, public :: c_socklen_t = c_size_t
6163
integer, parameter, public :: c_speed_t = c_unsigned_int
6264
integer, parameter, public :: c_suseconds_t = c_long

0 commit comments

Comments
 (0)