-- --
-- B o d y --
-- --
--- Copyright (C) 2003-2007, Free Software Foundation, Inc. --
+-- Copyright (C) 2003-2008, Free Software Foundation, Inc. --
-- --
-- GNAT is free software; you can redistribute it and/or modify it under --
-- terms of the GNU General Public License as published by the Free Soft- --
Index := Index + 1;
end loop;
- if Target_Name (Target_Name'First .. Index) = "erc32" then
+ if Target_Name (Target_Name'First .. Index) = "avr" then
+ return "avr-";
+ elsif Target_Name (Target_Name'First .. Index) = "erc32" then
return "erc32-elf-";
elsif Target_Name (Target_Name'First .. Index) = "leon" then
return "leon-elf-";
elsif Target_Name (Target_Name'First .. Index) = "powerpc" then
- return "powerpc-elf-";
+ if Target_Name'Length >= 23 and then
+ Target_Name (Target_Name'First .. Target_Name'First + 22) =
+ "powerpc-unknown-eabispe"
+ then
+ return "powerpc-eabispe-";
+ else
+ return "powerpc-elf-";
+ end if;
else
return "";
end if;