diff options
Diffstat (limited to 'scripts')
-rw-r--r-- | scripts/gcc2tasks.pl | 26 |
1 files changed, 26 insertions, 0 deletions
diff --git a/scripts/gcc2tasks.pl b/scripts/gcc2tasks.pl new file mode 100644 index 00000000000..d2563a8a1b3 --- /dev/null +++ b/scripts/gcc2tasks.pl @@ -0,0 +1,26 @@ +#!/usr/bin/perl -w + +=head1 NAME + +msvc2tasks.pl - Convert GCC warnings into Qt Creator task files. + +=head1 SYNOPSIS + + gcc2tasks.pl < logfile > taskfile + +=cut + +use strict; + +while (my $line = <STDIN> ) { + chomp($line); + # --- extract file name based matching: + # file.cpp:214:37: warning: cast from pointer to integer of different size [-Wpointer-to-int-cast] + if ($line =~ /^([^:]+):(\d+):\d*:? warning: (.*)$/) { + my $fileName = $1; + my $lineNumber = $2; + my $text = $3; + $fileName =~ s|\\|/|g; + print $fileName, "\t", $lineNumber, "\twarn\t", $text,"\n"; + } +} |