+2016-07-13 Andi Kleen <ak@linux.intel.com>
+
+ * lib/profopt.exp (dg-final-scan-autofdo,
+ dg-final-scan-not-autofdo): New functions.
+
2016-07-13 Bin Cheng <bin.cheng@arm.com>
* gcc.dg/vect/vect-35-big-array.c: Refine comment and test.
append use_final_code "[lindex $args 1]\n"
}
+#
+# dg-final-use-not-autofdo -- process code to run after the profile-use step
+# but only if not running autofdo
+# ARGS is the line number of the directive followed by the commands.
+#
+proc dg-final-use-not-autofdo { args } {
+ global use_final_code
+ global run_autofdo
+
+ if { [llength $args] > 2 } {
+ error "[lindex $args 0]: too many arguments"
+ return
+ }
+
+ if { $run_autofdo == 1 } {
+ return
+ }
+ append use_final_code "[lindex $args 1]\n"
+}
+
+#
+# dg-final-use-autofdo -- process code to run after the profile-use step
+# but only if running autofdo
+# ARGS is the line number of the directive followed by the commands.
+#
+
+proc dg-final-use-autofdo { args } {
+ global use_final_code
+ global run_autofdo
+
+ if { [llength $args] > 2 } {
+ error "[lindex $args 0]: too many arguments"
+ return
+ }
+
+ if { $run_autofdo != 1 } {
+ return
+ }
+ append use_final_code "[lindex $args 1]\n"
+}
+
#
# profopt-final-code -- run final code
#
|| ![string compare "dg-skip-if" $cmd] \
|| ![string compare "dg-final-generate" $cmd] \
|| ![string compare "dg-final-use" $cmd] \
+ || ![string compare "dg-final-use-not-autofdo" $cmd] \
+ || ![string compare "dg-final-use-autofdo" $cmd] \
|| ![string compare "dg-additional-sources" $cmd] \
|| [string match "dg-require-*" $cmd] } {
set status [catch "$op" errmsg]