Skip to content

Commit 8d4ed48

Browse files
author
Damian Rouson
committed
fix(object): explicit typing in UDDTIO interface
1 parent b1911ee commit 8d4ed48

File tree

1 file changed

+1
-0
lines changed

1 file changed

+1
-0
lines changed

src/object_interface.f90

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -50,6 +50,7 @@ pure module function user_defined(this) result(is_defined)
5050
abstract interface
5151
subroutine write_interface(self, unit, iotype, v_list, iostat, iomsg)
5252
import object
53+
implicit none
5354
class(object), intent(in) :: self
5455
integer, intent(in) :: unit
5556
character(*), intent(in) :: iotype

0 commit comments

Comments
 (0)