Test failure in libgcj on mainline

Thu Nov 25 14:30:00 GMT 2004

This seems to be because SHLIB_PATH isn't being set. I can trivially
fix this with the patch at the end of his mail, but I don't know that
is the right fix.
Running /home/aph/gcc/gcc/libjava/testsuite/libjava.cni/cni.exp ...
ERROR: tcl error sourcing /home/aph/gcc/gcc/libjava/testsuite/libjava.cni/cni.exp.
ERROR: can't unset "env(SHLIB_PATH)": no such element in array
 while executing
"unset env($var)"
 (procedure "unsetenv" line 3)
 invoked from within
"unsetenv SHLIB_PATH"
 (procedure "restore_ld_library_path_env_vars" line 37)
 invoked from within
"restore_ld_library_path_env_vars"
 (procedure "gcj_invoke" line 20)
 invoked from within
"gcj_invoke $main [file rootname $file].out {}"
 (procedure "gcj_cni_test_one" line 35)
 invoked from within
"gcj_cni_test_one $x"
 (procedure "gcj_cni_run" line 10)
 invoked from within
"gcj_cni_run
"
 (file "/home/aph/gcc/gcc/libjava/testsuite/libjava.cni/cni.exp" line 119)
 invoked from within
"source /home/aph/gcc/gcc/libjava/testsuite/libjava.cni/cni.exp"
 ("uplevel" body line 1)
 invoked from within
"uplevel #0 source /home/aph/gcc/gcc/libjava/testsuite/libjava.cni/cni.exp"
 invoked from within
"catch "uplevel #0 source $test_file_name""
Andrew.
Index: target-libpath.exp
===================================================================
RCS file: /cvs/gcc/gcc/gcc/testsuite/lib/target-libpath.exp,v
retrieving revision 1.2
diff -u -r1.2 target-libpath.exp

--- target-libpath.exp	25 Nov 2004 04:27:13 -0000	1.2
+++ target-libpath.exp	25 Nov 2004 12:39:30 -0000
@@ -207,7 +207,7 @@
 if { $orig_shlib_path_saved } {
 setenv SHLIB_PATH "$orig_shlib_path"
 } else {
- unsetenv SHLIB_PATH
+ catch { unsetenv SHLIB_PATH }
 }
 if { $orig_ld_libraryn32_path_saved } {
 setenv LD_LIBRARYN32_PATH "$orig_ld_libraryn32_path"
