[mpich2-commits] r5571 - mpich2/trunk/maint

[gropp at mcs.anl.gov]

Author: gropp
Date: 2009-10-26 13:53:04 -0500 (Mon, 26 Oct 2009)
New Revision: 5571

Modified:
   mpich2/trunk/maint/extracterrmsgs
Log:
Enhance the error reporting if the errcode file cannot be opened

Modified: mpich2/trunk/maint/extracterrmsgs
===================================================================
--- mpich2/trunk/maint/extracterrmsgs	2009-10-26 18:50:37 UTC (rev 5570)
+++ mpich2/trunk/maint/extracterrmsgs	2009-10-26 18:53:04 UTC (rev 5571)
@@ -70,7 +70,9 @@
 }
 # Setup before processing the files
 if ($build_test_pgm && -d "test/mpi/errhan") {
-    open( TESTFD, ">test/mpi/errhan/errcode.c" ) or die "Cannot create test program\n";
+    # Get current directory incase we need it for the error message
+    my $curdir = `pwd`;
+    open( TESTFD, ">test/mpi/errhan/errcode.c" ) or die "Cannot create test program errcode.c in $curdir/test/mpi/errhan\n";
     print TESTFD "/* -*- Mode: C++; c-basic-offset:4 ; -*- */\
 /*  \
  *  (C) 2004 by Argonne National Laboratory.\