OLD | NEW |
1 # Copyright 1999-2005, 2007-2012 Free Software Foundation, Inc. | 1 # Copyright 1999-2005, 2007-2012 Free Software Foundation, Inc. |
2 | 2 |
3 # This program is free software; you can redistribute it and/or modify | 3 # This program is free software; you can redistribute it and/or modify |
4 # it under the terms of the GNU General Public License as published by | 4 # it under the terms of the GNU General Public License as published by |
5 # the Free Software Foundation; either version 3 of the License, or | 5 # the Free Software Foundation; either version 3 of the License, or |
6 # (at your option) any later version. | 6 # (at your option) any later version. |
7 # | 7 # |
8 # This program is distributed in the hope that it will be useful, | 8 # This program is distributed in the hope that it will be useful, |
9 # but WITHOUT ANY WARRANTY; without even the implied warranty of | 9 # but WITHOUT ANY WARRANTY; without even the implied warranty of |
10 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | 10 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
(...skipping 10 matching lines...) Expand all Loading... |
21 # | 21 # |
22 | 22 |
23 load_lib mi-support.exp | 23 load_lib mi-support.exp |
24 set MIFLAGS "-i=mi2" | 24 set MIFLAGS "-i=mi2" |
25 | 25 |
26 gdb_exit | 26 gdb_exit |
27 if [mi_gdb_start] { | 27 if [mi_gdb_start] { |
28 continue | 28 continue |
29 } | 29 } |
30 | 30 |
31 set testfile "basics" | 31 standard_testfile basics.c |
32 set srcfile ${testfile}.c | 32 |
33 set binfile ${objdir}/${subdir}/mi2-disassemble | 33 if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {deb
ug}] != "" } { |
34 if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {deb
ug additional_flags=-DFAKEARGV}] != "" } { | |
35 untested mi2-disassemble.exp | 34 untested mi2-disassemble.exp |
36 return -1 | 35 return -1 |
37 } | 36 } |
38 | 37 |
39 proc test_disassembly_only {} { | 38 proc test_disassembly_only {} { |
40 global mi_gdb_prompt | 39 global mi_gdb_prompt |
41 global hex | 40 global hex |
42 global decimal | 41 global decimal |
43 | 42 |
44 set line_main_head [gdb_get_line_number "main ("] | 43 set line_main_head [gdb_get_line_number "main ("] |
(...skipping 185 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
230 test_disassembly_only | 229 test_disassembly_only |
231 test_disassembly_with_opcodes | 230 test_disassembly_with_opcodes |
232 test_disassembly_mixed | 231 test_disassembly_mixed |
233 test_disassembly_mixed_with_opcodes | 232 test_disassembly_mixed_with_opcodes |
234 test_disassembly_bogus_args | 233 test_disassembly_bogus_args |
235 test_disassembly_lines_limit | 234 test_disassembly_lines_limit |
236 test_disassembly_mixed_lines_limit | 235 test_disassembly_mixed_lines_limit |
237 | 236 |
238 mi_gdb_exit | 237 mi_gdb_exit |
239 return 0 | 238 return 0 |
OLD | NEW |