| 1 |
#define GREETING 'bench says hi' |
| 2 |
#define EXTRA_LINE 1 |
| 3 |
#include "include_message.inc" |
| 4 |
|
| 5 |
program macro_include |
| 6 |
implicit none |
| 7 |
#ifdef EXTRA_LINE |
| 8 |
print *, 'extra branch' |
| 9 |
#endif |
| 10 |
print *, GREETING |
| 11 |
print *, INCLUDED_MSG |
| 12 |
end program macro_include |
| 13 |
|