| OLD | NEW |
| 1 # Copyright 2009, 2011-2012 Free Software Foundation, Inc. | 1 # Copyright 2009, 2011-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 29 matching lines...) Expand all Loading... |
| 40 # Compile PPU binary. | 40 # Compile PPU binary. |
| 41 if { [gdb_cell_embedspu $spu_bin $spu_bin-embed.o {debug}] != "" } { | 41 if { [gdb_cell_embedspu $spu_bin $spu_bin-embed.o {debug}] != "" } { |
| 42 unsupported "Embedding spu binary failed." | 42 unsupported "Embedding spu binary failed." |
| 43 return -1 | 43 return -1 |
| 44 } | 44 } |
| 45 if { [gdb_compile_cell_ppu [list $ppu_src $spu_bin-embed.o] $ppu_bin executable
{debug}] != "" } { | 45 if { [gdb_compile_cell_ppu [list $ppu_src $spu_bin-embed.o] $ppu_bin executable
{debug}] != "" } { |
| 46 unsupported "Compiling ppu binary failed." | 46 unsupported "Compiling ppu binary failed." |
| 47 return -1 | 47 return -1 |
| 48 } | 48 } |
| 49 | 49 |
| 50 if [get_compiler_info ${ppu_bin}] { | 50 if [get_compiler_info] { |
| 51 return -1 | 51 return -1 |
| 52 } | 52 } |
| 53 | 53 |
| 54 proc check_var { name value } { | 54 proc check_var { name value } { |
| 55 gdb_test "print $name" \ | 55 gdb_test "print $name" \ |
| 56 ".*=.*$value" \ | 56 ".*=.*$value" \ |
| 57 "check_var $name = $value" | 57 "check_var $name = $value" |
| 58 } | 58 } |
| 59 | 59 |
| 60 proc set_var { name value } { | 60 proc set_var { name value } { |
| (...skipping 55 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
| 116 check_var var_short 7 | 116 check_var var_short 7 |
| 117 check_var var_int 1337 | 117 check_var var_int 1337 |
| 118 check_var var_long 123456 | 118 check_var var_long 123456 |
| 119 check_var var_longlong 123456789 | 119 check_var var_longlong 123456789 |
| 120 xfail "check_var var_float 1.23" | 120 xfail "check_var var_float 1.23" |
| 121 xfail "check_var var_double 2.3456" | 121 xfail "check_var var_double 2.3456" |
| 122 xfail "check_var var_longdouble 3.456789" | 122 xfail "check_var var_longdouble 3.456789" |
| 123 | 123 |
| 124 gdb_exit | 124 gdb_exit |
| 125 return 0 | 125 return 0 |
| OLD | NEW |