perf trace/scripting: Fix compile error when libperl not installed
When I added the xs callbacks into perf, I forgot to re-check the no-libperl case. This patch fixes the undefined reference error for that. Reported-by: Arnaldo Carvalho de Melo <acme@ghostprotocols.net> Signed-off-by: Tom Zanussi <tzanussi@gmail.com> Cc: Frederic Weisbecker <fweisbec@gmail.com> Cc: Mike Galbraith <efault@gmx.de> Cc: Peter Zijlstra <a.p.zijlstra@chello.nl> Cc: Paul Mackerras <paulus@samba.org> LKML-Reference: <1260153712.6564.4.camel@tropicana> Signed-off-by: Ingo Molnar <mingo@elte.hu>
This commit is contained in:
Родитель
f48f669d42
Коммит
3a9a0beba2
|
@ -32,9 +32,6 @@
|
|||
|
||||
void xs_init(pTHX);
|
||||
|
||||
void boot_Perf__Trace__Context(pTHX_ CV *cv);
|
||||
void boot_DynaLoader(pTHX_ CV *cv);
|
||||
|
||||
void xs_init(pTHX)
|
||||
{
|
||||
const char *file = __FILE__;
|
||||
|
|
|
@ -34,9 +34,13 @@ typedef int INTERP;
|
|||
#define dXSUB_SYS
|
||||
#define pTHX_
|
||||
static inline void newXS(const char *a, void *b, const char *c) {}
|
||||
static void boot_Perf__Trace__Context(pTHX_ CV *cv) {}
|
||||
static void boot_DynaLoader(pTHX_ CV *cv) {}
|
||||
#else
|
||||
#include <EXTERN.h>
|
||||
#include <perl.h>
|
||||
void boot_Perf__Trace__Context(pTHX_ CV *cv);
|
||||
void boot_DynaLoader(pTHX_ CV *cv);
|
||||
typedef PerlInterpreter * INTERP;
|
||||
#endif
|
||||
|
||||
|
|
Загрузка…
Ссылка в новой задаче