Index: /branches/eam_branches/ipp-20150625/Ohana/src/libohana/include/ohana_allocate.h
===================================================================
--- /branches/eam_branches/ipp-20150625/Ohana/src/libohana/include/ohana_allocate.h	(revision 38685)
+++ /branches/eam_branches/ipp-20150625/Ohana/src/libohana/include/ohana_allocate.h	(revision 38686)
@@ -110,3 +110,5 @@
 # endif /* OHANA_MEMORY */
 
+void  ohana_memdump_file (FILE *f, int mode);
+
 # endif /* OHANA_ALLOCATE */
Index: /branches/eam_branches/ipp-20150625/Ohana/src/libohana/src/ohana_allocate.c
===================================================================
--- /branches/eam_branches/ipp-20150625/Ohana/src/libohana/src/ohana_allocate.c	(revision 38685)
+++ /branches/eam_branches/ipp-20150625/Ohana/src/libohana/src/ohana_allocate.c	(revision 38686)
@@ -424,8 +424,8 @@
 }
 
-void ohana_memdump_func (int VERBOSE) {
+void ohana_memdump_file (FILE *f, int VERBOSE) {
 
   if (!lastBlock) {
-    if (VERBOSE) fprintf (stderr, "no memory allocated\n");
+    if (VERBOSE) fprintf (f, "no memory allocated\n");
     return;
   }
@@ -436,5 +436,5 @@
   size_t Nbytes = 0;
 
-  fprintf (stderr, " entry | bytes | cumulative | STATUS | file | line | function\n");
+  fprintf (f, " entry | bytes | cumulative | STATUS | file | line | function\n");
 
   while (thisBlock) {
@@ -456,7 +456,7 @@
     if (Ntotal < 100) {
       if (good) {
-	fprintf (stderr, "  %zd  %zd  %zd  GOOD  %s %d, func: %s\n", Ntotal, thisBlock->size, Nbytes, thisBlock->file, thisBlock->line, thisBlock->func);
+	fprintf (f, "  %zd  %zd  %zd  GOOD  %s %d, func: %s\n", Ntotal, thisBlock->size, Nbytes, thisBlock->file, thisBlock->line, thisBlock->func);
       } else {
-	fprintf (stderr, "  %zd  %zd  %zd  BAD   %s %d, func: %s\n", Ntotal, thisBlock->size, Nbytes, thisBlock->file, thisBlock->line, thisBlock->func);
+	fprintf (f, "  %zd  %zd  %zd  BAD   %s %d, func: %s\n", Ntotal, thisBlock->size, Nbytes, thisBlock->file, thisBlock->line, thisBlock->func);
       }
     }
@@ -466,7 +466,12 @@
 
   if (Ntotal || VERBOSE) {
-    fprintf (stderr, "%zd memory blocks allocated (%zd bytes total)\n", Ntotal, Nbytes);
-  }
-
+    fprintf (f, "%zd memory blocks allocated (%zd bytes total)\n", Ntotal, Nbytes);
+  }
+
+  return;
+}
+
+void ohana_memdump_func (int VERBOSE) {
+  ohana_memdump_file (stderr, VERBOSE);
   return;
 }