perf trace/scripting: Check return val of perl_run()
authorTom Zanussi <tzanussi@gmail.com>
Tue, 15 Dec 2009 08:53:37 +0000 (02:53 -0600)
committerIngo Molnar <mingo@elte.hu>
Tue, 15 Dec 2009 09:31:32 +0000 (10:31 +0100)
commit8f11d85a0e7e9025acea7493e6864089c8b52f42
tree9de666c26df99502cae53f3912614d18fba22283
parenta3a7cb7bb1d7bd989982314cf6f90ec392890006
perf trace/scripting: Check return val of perl_run()

The return value from perl_run() is currently ignored, but it
should be checked and used to exit perf if there are problems
loading the script.

Signed-off-by: Tom Zanussi <tzanussi@gmail.com>
Cc: fweisbec@gmail.com
Cc: rostedt@goodmis.org
LKML-Reference: <1260867220-15699-4-git-send-email-tzanussi@gmail.com>
Signed-off-by: Ingo Molnar <mingo@elte.hu>
tools/perf/util/trace-event-perl.c