comparison gcc/testsuite/gcc.c-torture/unsorted/dump-noaddr.x @ 131:84e7813d76e9

gcc-8.2
author mir3636
date Thu, 25 Oct 2018 07:37:49 +0900
parents 04ced10e8804
children
comparison
equal deleted inserted replaced
111:04ced10e8804 131:84e7813d76e9
7 set option_list $torture_with_loops 7 set option_list $torture_with_loops
8 set dumpbase [file tail $src] 8 set dumpbase [file tail $src]
9 9
10 # loop through all the options 10 # loop through all the options
11 foreach option $option_list { 11 foreach option $option_list {
12 file delete -force dump1 12 file delete -force $tmpdir/dump1
13 file mkdir dump1 13 file mkdir $tmpdir/dump1
14 c-torture-compile $src "$option $options -dumpbase dump1/$dumpbase -DMASK=1 -x c --param ggc-min-heapsize=1 -fdump-ipa-all -fdump-rtl-all -fdump-tree-all -fdump-noaddr" 14 c-torture-compile $src "$option $options -dumpbase dump1/$dumpbase -DMASK=1 -x c --param ggc-min-heapsize=1 -fdump-ipa-all -fdump-rtl-all -fdump-tree-all -fdump-noaddr -gno-record-gcc-switches"
15 file delete -force dump2 15 file delete -force $tmpdir/dump2
16 file mkdir dump2 16 file mkdir $tmpdir/dump2
17 c-torture-compile $src "$option $options -dumpbase dump2/$dumpbase -DMASK=2 -x c -fdump-ipa-all -fdump-rtl-all -fdump-tree-all -fdump-noaddr" 17 c-torture-compile $src "$option $options -dumpbase dump2/$dumpbase -DMASK=2 -x c -fdump-ipa-all -fdump-rtl-all -fdump-tree-all -fdump-noaddr -gno-record-gcc-switches"
18 foreach dump1 [lsort [glob -nocomplain dump1/*]] { 18 foreach dump1 [lsort [glob -nocomplain $tmpdir/dump1/*]] {
19 regsub dump1/ $dump1 dump2/ dump2 19 set dump2 "$tmpdir/dump2/[file tail $dump1]"
20 set dumptail "gcc.c-torture/unsorted/[file tail $dump1]" 20 set dumptail "gcc.c-torture/unsorted/[file tail $dump1]"
21 regsub {\.\d+((t|r|i)\.[^.]+)$} $dumptail {.*\1} dumptail 21 regsub {\.\d+((t|r|i)\.[^.]+)$} $dumptail {.*\1} dumptail
22 set tmp [ diff "$dump1" "$dump2" ] 22 set tmp [ diff "$dump1" "$dump2" ]
23 if { $tmp == 0 } { 23 if { $tmp == 0 } {
24 untested "$dumptail, $option comparison" 24 untested "$dumptail, $option comparison"
27 } else { 27 } else {
28 fail "$dumptail, $option comparison" 28 fail "$dumptail, $option comparison"
29 } 29 }
30 } 30 }
31 } 31 }
32 file delete -force dump1 32 file delete -force $tmpdir/dump1
33 file delete -force dump2 33 file delete -force $tmpdir/dump2
34 } 34 }
35 35
36 dump_compare $src $options 36 dump_compare $src $options
37 return 1 37 return 1