Skip to content

Commit f00902c

Browse files
committed
Undef variable before its redefinition
1 parent c5c5b5f commit f00902c

File tree

1 file changed

+2
-0
lines changed

1 file changed

+2
-0
lines changed

include/fms_platform.h

Lines changed: 2 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -80,11 +80,13 @@ use,intrinsic :: iso_c_binding, only: c_double,c_float,c_int64_t, &
8080

8181
!If you do not want to use 64-bit integers.
8282
#ifdef no_8byte_integers
83+
#undef LONG_KIND
8384
#define LONG_KIND INT_KIND
8485
#endif
8586

8687
!If you want to use quad-precision.
8788
#ifndef ENABLE_QUAD_PRECISION
89+
#undef QUAD_KIND
8890
#define QUAD_KIND DOUBLE_KIND
8991
#endif
9092

0 commit comments

Comments
 (0)