GitHub/pbot
3
0
Fork 0
mirror of https://github.com/pragma-/pbot.git synced 2024-11-29 23:39:24 +01:00
Code Issues Projects Releases Wiki Activity

compiler_vm: updated watchdog

Browse Source
This commit is contained in:
Pragmatic Software 2011-02-01 02:55:33 +00:00
parent 65d1d49aaf
commit f35874b6ea
1 changed files with 4 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
modules/compiler_vm/compiler_watchdog.pl
View File

@ -91,10 +91,14 @@ sub debug_program {
while(my $line = <$output>) { while(my $line = <$output>) {
if($line =~ s/^#\d+//) { if($line =~ s/^#\d+//) {
next if $line =~ /\?\?/;
next if $line =~ /in main\s*\(/;
$line =~ s/\s*0x[0-9a-fA-F]+\s*//; $line =~ s/\s*0x[0-9a-fA-F]+\s*//;
$result .= "$line "; $result .= "$line ";
} }
elsif($line =~ s/^\d+//) { elsif($line =~ s/^\d+//) {
$result .= "at " if not length $result;
$result .= "statement: $line"; $result .= "statement: $line";
last; last;
} }