| 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 28 matching lines...) Expand all Loading... |
| 39 # Compile PPU binary. | 39 # Compile PPU binary. |
| 40 if { [gdb_cell_embedspu $spu_bin $spu_bin-embed.o {debug}] != "" } { | 40 if { [gdb_cell_embedspu $spu_bin $spu_bin-embed.o {debug}] != "" } { |
| 41 unsupported "Embedding spu binary failed." | 41 unsupported "Embedding spu binary failed." |
| 42 return -1 | 42 return -1 |
| 43 } | 43 } |
| 44 if { [gdb_compile_cell_ppu [list $ppu_src $spu_bin-embed.o] $ppu_bin executable
{debug}] != "" } { | 44 if { [gdb_compile_cell_ppu [list $ppu_src $spu_bin-embed.o] $ppu_bin executable
{debug}] != "" } { |
| 45 unsupported "Compiling ppu binary failed." | 45 unsupported "Compiling ppu binary failed." |
| 46 return -1 | 46 return -1 |
| 47 } | 47 } |
| 48 | 48 |
| 49 if [get_compiler_info ${ppu_bin}] { | 49 if [get_compiler_info] { |
| 50 return -1 | 50 return -1 |
| 51 } | 51 } |
| 52 | 52 |
| 53 | 53 |
| 54 # Ask GDB about the sizes of data types. This has | 54 # Ask GDB about the sizes of data types. This has |
| 55 # to be done in PPU thread and SPU thread. | 55 # to be done in PPU thread and SPU thread. |
| 56 proc get_gdb_size { type } { | 56 proc get_gdb_size { type } { |
| 57 global gdb_prompt | 57 global gdb_prompt |
| 58 | 58 |
| 59 set val "0" | 59 set val "0" |
| (...skipping 51 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
| 111 size_compare "short" [get_gdb_size "short"] | 111 size_compare "short" [get_gdb_size "short"] |
| 112 size_compare "int" [get_gdb_size "int"] | 112 size_compare "int" [get_gdb_size "int"] |
| 113 size_compare "long" [get_gdb_size "long"] | 113 size_compare "long" [get_gdb_size "long"] |
| 114 size_compare "long long" [get_gdb_size "long long"] | 114 size_compare "long long" [get_gdb_size "long long"] |
| 115 size_compare "float" [get_gdb_size "float"] | 115 size_compare "float" [get_gdb_size "float"] |
| 116 size_compare "double" [get_gdb_size "double"] | 116 size_compare "double" [get_gdb_size "double"] |
| 117 size_compare "long double" [get_gdb_size "long double"] | 117 size_compare "long double" [get_gdb_size "long double"] |
| 118 | 118 |
| 119 gdb_exit | 119 gdb_exit |
| 120 return 0 | 120 return 0 |
| OLD | NEW |