We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent 4895dc6 commit cce751cCopy full SHA for cce751c
src/assert_s.F90 src/assert_s.f90src/assert_s.F90 renamed to src/assert_s.f90
@@ -56,11 +56,7 @@
56
57
end if toggle_assertions
58
59
-#ifndef FORD
60
contains
61
-#else
62
- end procedure
63
-#endif
64
65
pure function string(numeric) result(number_as_string)
66
!! Result is a string represention of the numeric argument
@@ -86,8 +82,6 @@ pure function string(numeric) result(number_as_string)
86
82
87
83
end function string
88
84
89
90
85
end procedure
91
92
93
end submodule
0 commit comments