testsuite/lib/dg-pch.exp

76     set bname "[file rootname [file tail $nshort]]"
78     catch { file_on_host delete "$bname$suffix.gch" }
79     catch { file_on_host delete "$bname.s" }
80     catch { file_on_host delete "$bname.s-gch" }
96 	catch { file_on_host delete "$bname$suffix" }
97 	gcc_copy_files "[file rootname $test]${suffix}s" "$bname$suffix"
98 	dg-test -keep-output "./$bname$suffix" "$otherflags $flags" ""
105 	if { [ file_on_host exists "$bname$suffix.gch" ] } {
107 	    file_on_host delete "$bname$suffix"
112 	    file_on_host delete "$bname$suffix.gch"
114 		if { [ file_on_host exists "$bname.s" ] } {
115 		    remote_upload host "$bname.s" "$bname.s-gch"
116 		    remote_download host "$bname.s-gch"
117 		    gcc_copy_files "[file rootname $test]${suffix}s" "$bname$suffix"
119 		    remote_upload host "$bname.s"
120 		    set tmp [ diff "$bname.s" "$bname.s-gch" ]
122 			verbose -log "assembly file '$bname.s', '$bname.s-gch' comparison error"
129 		    file_on_host delete "$bname$suffix"
130 		    file_on_host delete "$bname.s"
131 		    file_on_host delete "$bname.s-gch"
133 		    verbose -log "assembly file '$bname.s' missing"
139 	    verbose -log "pch file '$bname$suffix.gch' missing"
142 		verbose -log "assembly file '$bname.s' missing" 1