diff options
Diffstat (limited to 'lib/sbin/schedule_parser.pl')
| -rw-r--r-- | lib/sbin/schedule_parser.pl | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/lib/sbin/schedule_parser.pl b/lib/sbin/schedule_parser.pl index 81f80977..0c10f361 100644 --- a/lib/sbin/schedule_parser.pl +++ b/lib/sbin/schedule_parser.pl @@ -635,6 +635,10 @@ sub fortran_wrapper { DECLARE_$THORN_C2F INITIALISE_$THORN_C2F +#ifdef DEBUG + printf(\"Calling \%s from rfr wrapper\\n\"); +#endif + FORTRAN_NAME($routine)(PASS_$THORN_C2F(GH)); } |