espressif/binutils-gdb
1
0
Fork 0
mirror of https://github.com/espressif/binutils-gdb.git synced 2025-08-06 14:49:38 +08:00
Code Issues Packages Projects Releases Wiki Activity

* gdb.base/return2.exp: return of long long and double fails for

Browse Source 
68HC11; don't execute these tests on that platform.
	* gdb.base/return.exp: Return of a double fails for 68hc11.
This commit is contained in:
Stephane Carrez
2001-07-16 18:49:43 +00:00
parent c477543d3a
commit d6f5fea1d2
3 changed files with 20 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
gdb/testsuite/ChangeLog
View File

@ -1,3 +1,9 @@
2001-07-16 Stephane Carrez <Stephane.Carrez@worldnet.fr>
* gdb.base/return2.exp: return of long long and double fails for
68HC11; don't execute these tests on that platform.
* gdb.base/return.exp: Return of a double fails for 68hc11.
2001-07-16 Stephane Carrez <Stephane.Carrez@worldnet.fr> 2001-07-16 Stephane Carrez <Stephane.Carrez@worldnet.fr>
* call-ar-st.exp: Use gdb_skip_float_test to avoid executing * call-ar-st.exp: Use gdb_skip_float_test to avoid executing

9
gdb/testsuite/gdb.base/return.exp
View File

@ -1,4 +1,4 @@
# Copyright (C) 1992, 1997 Free Software Foundation, Inc. # Copyright (C) 1992, 1997, 2001 Free Software Foundation, Inc.
# This program is free software; you can redistribute it and/or modify # 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 # it under the terms of the GNU General Public License as published by
@ -73,6 +73,10 @@ proc return_tests { } {
gdb_test "p tmp2" ".* = 5" "correct value returned (integer test)" gdb_test "p tmp2" ".* = 5" "correct value returned (integer test)"
gdb_test "continue" "return -5.0;" "continue to return of -5.0" gdb_test "continue" "return -5.0;" "continue to return of -5.0"
# Return of a double does not work for 68hc11 (need struct return
# in memory).
setup_xfail "m6811-*-*"
send_gdb "return 5.0\n" send_gdb "return 5.0\n"
gdb_expect { gdb_expect {
-re "Make .* return now.*y or n. $" { -re "Make .* return now.*y or n. $" {
@ -84,6 +88,7 @@ proc return_tests { } {
timeout { fail "(timeout) did not return (double test)" } timeout { fail "(timeout) did not return (double test)" }
} }
setup_xfail "m6811-*-*"
gdb_test "next" "printf.*" "next over call to func3" gdb_test "next" "printf.*" "next over call to func3"
# This test is going to fail on all i*86 systems using an i*87. # This test is going to fail on all i*86 systems using an i*87.
@ -108,7 +113,7 @@ proc return_tests { } {
# process start, making this test pass, it will be for a version that # process start, making this test pass, it will be for a version that
# is not xfailed. # is not xfailed.
setup_xfail "i*86-*-*" "sparc-*-solaris2.3*" "sparc-*-solaris2.4*" setup_xfail "i*86-*-*" "sparc-*-solaris2.3*" "sparc-*-solaris2.4*" "m6811-*-*"
gdb_test "p tmp3" ".* = 5.*" "correct value returned double test (known problem with i*86 and sparc solaris" gdb_test "p tmp3" ".* = 5.*" "correct value returned double test (known problem with i*86 and sparc solaris"
} }

6
gdb/testsuite/gdb.base/return2.exp
View File

@ -1,4 +1,4 @@
# Copyright 2000 Free Software Foundation, Inc. # Copyright 2000, 2001 Free Software Foundation, Inc.
# This program is free software; you can redistribute it and/or modify # 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 # it under the terms of the GNU General Public License as published by
@ -109,9 +109,13 @@ proc return2_tests { } {
return_1 "short" return_1 "short"
return_1 "int" return_1 "int"
return_1 "long" return_1 "long"
if { ! [istarget "m6811-*-*"] } then {
return_1 "long_long" return_1 "long_long"
}
return_1 "float" return_1 "float"
if { ! [istarget "m6811-*-*"] } then {
return_1 "double" return_1 "double"
}
} }
# Start with a fresh gdb. # Start with a fresh gdb.