File tree Expand file tree Collapse file tree 1 file changed +14
-14
lines changed Expand file tree Collapse file tree 1 file changed +14
-14
lines changed Original file line number Diff line number Diff line change @@ -879,28 +879,28 @@ Subroutine
879
879
#### Example
880
880
881
881
``` fortran
882
- module example_mod
883
- use stdlib_logger
884
- ...
885
- real, allocatable :: a(:)
886
- type(logger_type) :: logger
887
- ...
882
+ module example_mod
883
+ use stdlib_logger
884
+
885
+ real, allocatable :: a(:)
886
+ type(logger_type) :: logger
887
+
888
888
contains
889
- ...
890
- subroutine example_sub( size, stat )
889
+
890
+ subroutine example_sub( size, stat )
891
891
integer, intent(in) :: size
892
892
integer, intent(out) :: stat
893
893
allocate( a(size) )
894
894
if ( stat /= 0 ) then
895
- write( message, '(a, i0)' ) &
895
+ write( message, '(a, i0)' ) &
896
896
"Allocation of A failed with SIZE = ", size
897
- call logger % log_warning( message, &
897
+ call logger % log_warning( message, &
898
898
module = 'EXAMPLE_MOD', &
899
899
procedure = 'EXAMPLE_SUB' )
900
- end if
901
- end subroutine example_sub
902
- ...
903
- end module example_mod
900
+ end if
901
+ end subroutine example_sub
902
+
903
+ end module example_mod
904
904
```
905
905
906
906
### ` remove_log_unit ` - remove ` unit ` from ` self % log_units `
You can’t perform that action at this time.
0 commit comments