fpp and #define

fpp and #define

I have some fortran code ported from a U*x platform that uses an include file "forttype.h" that looks like:

snip
#define __REAL REAL
#define __INTEGER INTEGER
snip

The source looks like:
#include "forttype.h"

subroutine make_tree2 (x, numkey, first_in, last_in,
> tree_root, key, xdiv, lchild, rchild, parent, index,
> trindx, stack, stackptr, stacksiz,
> nodestk,firststk,laststk,perm)

IMPLICIT NONE

__INTEGER numkey,pop

__REAL x(numkey,*), xdiv(*)
snip

I can't seem to get the substitutions to occur no matter what I do with the fpp. The fpp is finding the forttype.h file OK, just not making the substitutions.

Suggestions?

2 posts / 0 new
Last post
For more complete information about compiler optimizations, see our Optimization Notice.

fpp, by default, doesn't do macro substitutions. To enable this, change the /fpp option in the "command options" to read /fpp:"/m"

Steve

Retired 12/31/2016

Leave a Comment

Please sign in to add a comment. Not a member? Join today