Print out strings and try trimming.

Author: nusbaume

test/unit/fortran/src/mock_routines/test_pio_reader.pf

@@ -103,7 +103,10 @@ subroutine test_pio_reader_already_opened_file_err()
 
     ! Check that the correct error was raised:
     @assertTrue(errcode /= 0)
-    @assertTrue(errmsg == expected_err_msg)
+    write(*,*) " ''' "//trim(errmsg)//" ''' "
+    write(*,*) " ''' "//expected_err_msg/" ''' "
+    write(*,*) trim(errmsg) == expected_err_msg
+    @assertTrue(trim(errmsg) == expected_err_msg)
 
     ! Perform test cleanup:
     call reader%close_file(errmsg, errcode)