diff options
-rw-r--r-- | src/Slicing.c | 5 |
1 files changed, 1 insertions, 4 deletions
diff --git a/src/Slicing.c b/src/Slicing.c index a6443de..9899663 100644 --- a/src/Slicing.c +++ b/src/Slicing.c @@ -33,7 +33,7 @@ static char *rcsid = "$Id$"; #include "GroupsOnGH.h" #include "Misc.h" -#define ESLIC_DEBUG +/*#define ESLIC_DEBUG*/ /* Local data holding info on slicings..*/ @@ -343,7 +343,6 @@ void Einstein_ActivateSlicing(cGH *GH) { int Einstein_GetSlicingHandle(const char *name) { int handle; char *err; - printf("NAME: %s\n",name); handle = Util_GetHandle(Eslicings,name,NULL); if (handle<0) { @@ -375,9 +374,7 @@ int FMODIFIER FORTRAN_NAME(Einstein_GetSlicingHandle)(ONE_FORTSTRING_ARG) { int handle; ONE_FORTSTRING_CREATE(name) - printf("NAME: %s\n",name); handle = Util_GetHandle(Eslicings,name,NULL); - printf("HANDLE: %d\n",handle); free(name); return(handle); } |