Commit 7306b628 by Sa Liu

Add new parameter to NAMED_INTCST.

From-SVN: r135337
parent 81d19c06
...@@ -556,7 +556,7 @@ init_local_integer; ...@@ -556,7 +556,7 @@ init_local_integer;
/* Used for keeping things in balanced binary trees. */ /* Used for keeping things in balanced binary trees. */
#define BBT_HEADER(self) int priority; struct self *left, *right #define BBT_HEADER(self) int priority; struct self *left, *right
#define NAMED_INTCST(a,b,c) a, #define NAMED_INTCST(a,b,c,d) a,
typedef enum typedef enum
{ {
ISOFORTRANENV_INVALID = -1, ISOFORTRANENV_INVALID = -1,
...@@ -566,7 +566,7 @@ typedef enum ...@@ -566,7 +566,7 @@ typedef enum
iso_fortran_env_symbol; iso_fortran_env_symbol;
#undef NAMED_INTCST #undef NAMED_INTCST
#define NAMED_INTCST(a,b,c) a, #define NAMED_INTCST(a,b,c,d) a,
#define NAMED_REALCST(a,b,c) a, #define NAMED_REALCST(a,b,c) a,
#define NAMED_CMPXCST(a,b,c) a, #define NAMED_CMPXCST(a,b,c) a,
#define NAMED_LOGCST(a,b,c) a, #define NAMED_LOGCST(a,b,c) a,
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment