neingeist/arduinisten
Archived
1
0
Fork 0
Code Releases Activity

arduino-0018-windows

Browse source
This commit is contained in:
orange 2010-03-30 21:53:44 +02:00
parent 157fd6f1a1
commit f39fc49523
5182 changed files with 950586 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

44
arduino-0018-windows/hardware/tools/avr/bin/ice-gdb Normal file
View file

@ -0,0 +1,44 @@
#!/usr/bin/perl
$prefix = "c:/WinAVR";
$datadir = "c:/WinAVR/doc";
$debugger = "avr-gdb";
@argcmds = ( "-b", "--cd", "--command", "--core", "--pid", "--directory",
"--exec", "--interpreter", "--se", "--symbols", "--tty",
"-s", "-e", "-se", "-x", "-d" );
for ($i = 0; $i <= $#ARGV; $i++) {
$arg = $ARGV[$i];
if ($arg =~ /^-/ &&
(grep $_ eq $arg, @argcmds || grep /^-$arg$/, @argcmds)) {
$i++;
}
elsif ($arg eq "--debugger" && $i < $#ARGV) {
$debugger = $ARGV[$i + 1];
splice @ARGV, $i, 2;
$i--;
}
elsif ($arg eq "--capture" || $arg eq "--ignore-intr") {
$ENV{AVARICE_ARGS} = "$ENV{AVARICE_ARGS} $arg";
splice @ARGV, $i, 1;
# Don't load an executable
$capture = 1 if $arg eq "--capture";
$i--;
}
elsif ($arg eq "--external") {
$avarice_running = 1;
splice @ARGV, $i, 1;
$i--;
}
elsif (!($arg =~ /^-/)) {
$exe = $arg;
break;
}
}
$exe = "" if $capture;
system "start-avarice $exe" unless $avarice_running;
unshift @ARGV, ($debugger, "-x", "$datadir/avarice/gdb-avarice-script" );
exec @ARGV;