Removed type export.

interkosmos · Mar 9, 2024 · 449bcc3 · 449bcc3
1 parent e8819eb
commit 449bcc3
Show file tree

Hide file tree

Showing 5 changed files with 4 additions and 7 deletions.
diff --git a/examples/irc/irc.f90 b/examples/irc/irc.f90
@@ -5,10 +5,9 @@
 module irc
     !! IRC connectivity module.
     use, intrinsic :: iso_c_binding
-    use, intrinsic :: iso_fortran_env, only: stderr => error_unit, stdout => output_unit
+    use, intrinsic :: iso_fortran_env, only: i8 => int64, stderr => error_unit, stdout => output_unit
     use :: unix
     implicit none
-    private
 
     public :: irc_connect
     public :: irc_send
@@ -134,8 +133,6 @@ program main
     !! * `IRC_HOSTNAME`
     !! * `IRC_CHANNEL`
     !! * `IRC_PORT`
-    use, intrinsic :: iso_c_binding
-    use, intrinsic :: iso_fortran_env, only: stderr => error_unit
     use :: irc
     use :: unix
     implicit none

diff --git a/examples/serial/serial.f90 b/examples/serial/serial.f90
@@ -4,9 +4,9 @@
 ! Licence: ISC
 module serial
     !! Serial port access module.
+    use, intrinsic :: iso_fortran_env, only: i8 => int64
     use :: unix
     implicit none
-    private
 
     public :: serial_close
     public :: serial_open

diff --git a/examples/socket/socket.f90 b/examples/socket/socket.f90
@@ -24,7 +24,7 @@ program main
     !!
     !! Enter 'PING' in netcat to receive a 'PONG' from the Fortran program.
     use, intrinsic :: iso_c_binding
-    use, intrinsic :: iso_fortran_env, only: stderr => error_unit, stdout => output_unit
+    use, intrinsic :: iso_fortran_env, only: i8 => int64, stderr => error_unit, stdout => output_unit
     use :: unix
     implicit none
 

diff --git a/examples/uptime/uptime.f90 b/examples/uptime/uptime.f90
@@ -5,6 +5,7 @@
 program main
     !! Prints system uptime to standard output, similar to uptime(1).
     use, intrinsic :: iso_c_binding
+    use, intrinsic :: iso_fortran_env, only: i8 => int64
     use :: unix
     implicit none
 

diff --git a/src/unix.f90 b/src/unix.f90
@@ -7,7 +7,6 @@
 ! Licence: ISC
 module unix
     use, intrinsic :: iso_c_binding
-    use, intrinsic :: iso_fortran_env, only: i8 => int64
     use :: unix_dirent
     use :: unix_errno
     use :: unix_fcntl