Skip to content

Commit 169cbe8

Browse files
committed
Lint
1 parent ea78a8c commit 169cbe8

File tree

2 files changed

+8
-4
lines changed

2 files changed

+8
-4
lines changed

src/ftorch.F90

+4-2
Original file line numberDiff line numberDiff line change
@@ -8,8 +8,10 @@
88

99
module ftorch
1010

11-
use, intrinsic :: iso_c_binding, only: c_ptr, c_null_ptr
12-
use, intrinsic :: iso_fortran_env, only: ftorch_int => int32 ! set integer size for FTorch library
11+
use, intrinsic :: iso_c_binding, only: c_null_ptr, c_ptr
12+
13+
! Set integer size for FTorch library
14+
use, intrinsic :: iso_fortran_env, only: ftorch_int => int32
1315

1416
implicit none
1517

src/ftorch.fypp

+4-2
Original file line numberDiff line numberDiff line change
@@ -25,8 +25,10 @@ $:'integer' if PRECISION[:3] == 'int' else 'real'
2525

2626
module ftorch
2727

28-
use, intrinsic :: iso_c_binding, only: c_ptr, c_null_ptr
29-
use, intrinsic :: iso_fortran_env, only: ftorch_int => int32 ! set integer size for FTorch library
28+
use, intrinsic :: iso_c_binding, only: c_null_ptr, c_ptr
29+
30+
! Set integer size for FTorch library
31+
use, intrinsic :: iso_fortran_env, only: ftorch_int => int32
3032

3133
implicit none
3234

0 commit comments

Comments
 (0)