Donate to e Foundation | Murena handsets with /e/OS | Own a part of Murena! Learn more

Commit 8853a1b7 authored by Arnaldo Carvalho de Melo's avatar Arnaldo Carvalho de Melo
Browse files

perf scripting perl: Shorten function signatures 

Removing unused parameters.

Cc: Adrian Hunter <adrian.hunter@intel.com>
Cc: David Ahern <dsahern@gmail.com>
Cc: Frederic Weisbecker <fweisbec@gmail.com>
Cc: Jiri Olsa <jolsa@redhat.com>
Cc: Mike Galbraith <efault@gmx.de>
Cc: Namhyung Kim <namhyung@kernel.org>
Cc: Paul Mackerras <paulus@samba.org>
Cc: Peter Zijlstra <peterz@infradead.org>
Cc: Stephane Eranian <eranian@google.com>
Link: http://lkml.kernel.org/n/tip-b7r7o80o2xwwtlzgqxv50foe@git.kernel.org


Signed-off-by: default avatarArnaldo Carvalho de Melo <acme@redhat.com>
parent b7fff6b5

tools/perf/util/scripting-engines/trace-event-perl.c

+7 −13
Original line number Diff line number Diff line
@@ -257,12 +257,9 @@ static inline struct event_format *find_cache_event(struct perf_evsel *evsel) 
	return event;

}



static void perl_process_tracepoint(union perf_event *perf_event __maybe_unused,

				    struct perf_sample *sample,

static void perl_process_tracepoint(struct perf_sample *sample,

				    struct perf_evsel *evsel,

				    struct machine *machine __maybe_unused,

				    struct thread *thread,

					struct addr_location *al)

				    struct thread *thread)

{

	struct format_field *field;

	static char handler[256];
@@ -349,10 +346,7 @@ static void perl_process_tracepoint(union perf_event *perf_event __maybe_unused, 


static void perl_process_event_generic(union perf_event *event,

				       struct perf_sample *sample,

				       struct perf_evsel *evsel,

				       struct machine *machine __maybe_unused,

				       struct thread *thread __maybe_unused,

					   struct addr_location *al __maybe_unused)

				       struct perf_evsel *evsel)

{

	dSP;
@@ -377,12 +371,12 @@ static void perl_process_event_generic(union perf_event *event, 
static void perl_process_event(union perf_event *event,

			       struct perf_sample *sample,

			       struct perf_evsel *evsel,

			       struct machine *machine,

			       struct machine *machine __maybe_unused,

			       struct thread *thread,

				   struct addr_location *al)

			       struct addr_location *al __maybe_unused)

{

	perl_process_tracepoint(event, sample, evsel, machine, thread, al);

	perl_process_event_generic(event, sample, evsel, machine, thread, al);

	perl_process_tracepoint(sample, evsel, thread);

	perl_process_event_generic(event, sample, evsel);

}



static void run_start_sub(void)