[testsuite][AArch64] Port gdb.trace
[binutils-gdb.git] / gdb / testsuite / gdb.trace / report.exp
index 8bf12510da985fb543dff7f7a0cd3352c117f6c5..b3e90002c70124041b6fc9387b17b3dc908ab45f 100644 (file)
@@ -1,4 +1,4 @@
-#   Copyright 1998-2014 Free Software Foundation, Inc.
+#   Copyright 1998-2015 Free Software Foundation, Inc.
 #
 # This program is free software; you can redistribute it and/or modify
 # it under the terms of the GNU General Public License as published by
@@ -158,6 +158,10 @@ if [is_amd64_regs_target] {
     set fpreg "ebp"
     set spreg "esp"
     set pcreg "eip"
+} elseif [is_aarch64_target] {
+    set fpreg "x29"
+    set spreg "sp"
+    set pcreg "pc"
 } else {
     set fpreg "fp"
     set spreg "sp"
@@ -197,7 +201,7 @@ proc use_collected_data { data_source } {
        global tdp1 tdp2 tdp3 tdp4 tdp5 tdp6
        global testline1 testline2 testline3 testline4 testline5 testline6
        global pcreg fpreg spreg
-       global srcfile srcdir subdir
+       global srcfile srcdir subdir binfile
        global arg1 arg3
        global decimal hex gdb_prompt
        #
@@ -397,6 +401,11 @@ proc use_collected_data { data_source } {
                }
            }
        }
+
+       # There is always a thread of an inferior, either a live one or
+       # a faked one.
+       gdb_test "info threads" "\\* ${decimal}    (process|Thread) ${decimal}\[ \t\].*"
+       gdb_test "info inferiors" "\\* 1    process ${decimal} \[ \t\]+${binfile}.*"
     }
 }