Fixed a critical (and previously untested) problem with the fortran interface
authorChee Wai Lee <cheelee@illinois.edu>
Wed, 19 Oct 2005 21:26:26 +0000 (21:26 +0000)
committerChee Wai Lee <cheelee@illinois.edu>
Wed, 19 Oct 2005 21:26:26 +0000 (21:26 +0000)
for AMPI function tracing where a fortran parameter reference was treated
as the parameter variable without dereferencing it.

src/ck-perf/tracef.C

index b59945495f7c5d9d109c2b412a3ed56ec94ab868..cf6c5575a4cf6637ee4fbcab602aa5460bcc6f65 100644 (file)
@@ -93,12 +93,12 @@ void ftraceRegisterFunc(char *name,int *outIdx,int lenName){
        delete [] newstr;
 }
 
-void ftraceBeginFunc(int idx){
-       traceBeginFuncIndexProj(idx,"FORTRAN",0);
+void ftraceBeginFunc(int *idx){
+       traceBeginFuncIndexProj(*idx,"FORTRAN",0);
 }
 
-void ftraceEndFunc(int idx){
-       traceEndFuncIndexProj(idx);
+void ftraceEndFunc(int *idx){
+       traceEndFuncIndexProj(*idx);
 }