diff options
Diffstat (limited to 'tools/perf/scripts/perl/Perf-Trace-Util/Context.c')
-rw-r--r-- | tools/perf/scripts/perl/Perf-Trace-Util/Context.c | 30 |
1 files changed, 15 insertions, 15 deletions
diff --git a/tools/perf/scripts/perl/Perf-Trace-Util/Context.c b/tools/perf/scripts/perl/Perf-Trace-Util/Context.c index 3ba3ffc54164..af78d9a52a7d 100644 --- a/tools/perf/scripts/perl/Perf-Trace-Util/Context.c +++ b/tools/perf/scripts/perl/Perf-Trace-Util/Context.c | |||
@@ -39,8 +39,8 @@ | |||
39 | 39 | ||
40 | #line 41 "Context.c" | 40 | #line 41 "Context.c" |
41 | 41 | ||
42 | XS(XS_Perf__Trace__Context_get_common_pc); /* prototype to pass -Wmissing-prototypes */ | 42 | XS(XS_Perf__Trace__Context_common_pc); /* prototype to pass -Wmissing-prototypes */ |
43 | XS(XS_Perf__Trace__Context_get_common_pc) | 43 | XS(XS_Perf__Trace__Context_common_pc) |
44 | { | 44 | { |
45 | #ifdef dVAR | 45 | #ifdef dVAR |
46 | dVAR; dXSARGS; | 46 | dVAR; dXSARGS; |
@@ -48,22 +48,22 @@ XS(XS_Perf__Trace__Context_get_common_pc) | |||
48 | dXSARGS; | 48 | dXSARGS; |
49 | #endif | 49 | #endif |
50 | if (items != 1) | 50 | if (items != 1) |
51 | Perl_croak(aTHX_ "Usage: %s(%s)", "Perf::Trace::Context::get_common_pc", "context"); | 51 | Perl_croak(aTHX_ "Usage: %s(%s)", "Perf::Trace::Context::common_pc", "context"); |
52 | PERL_UNUSED_VAR(cv); /* -W */ | 52 | PERL_UNUSED_VAR(cv); /* -W */ |
53 | { | 53 | { |
54 | struct scripting_context * context = INT2PTR(struct scripting_context *,SvIV(ST(0))); | 54 | struct scripting_context * context = INT2PTR(struct scripting_context *,SvIV(ST(0))); |
55 | int RETVAL; | 55 | int RETVAL; |
56 | dXSTARG; | 56 | dXSTARG; |
57 | 57 | ||
58 | RETVAL = get_common_pc(context); | 58 | RETVAL = common_pc(context); |
59 | XSprePUSH; PUSHi((IV)RETVAL); | 59 | XSprePUSH; PUSHi((IV)RETVAL); |
60 | } | 60 | } |
61 | XSRETURN(1); | 61 | XSRETURN(1); |
62 | } | 62 | } |
63 | 63 | ||
64 | 64 | ||
65 | XS(XS_Perf__Trace__Context_get_common_flags); /* prototype to pass -Wmissing-prototypes */ | 65 | XS(XS_Perf__Trace__Context_common_flags); /* prototype to pass -Wmissing-prototypes */ |
66 | XS(XS_Perf__Trace__Context_get_common_flags) | 66 | XS(XS_Perf__Trace__Context_common_flags) |
67 | { | 67 | { |
68 | #ifdef dVAR | 68 | #ifdef dVAR |
69 | dVAR; dXSARGS; | 69 | dVAR; dXSARGS; |
@@ -71,22 +71,22 @@ XS(XS_Perf__Trace__Context_get_common_flags) | |||
71 | dXSARGS; | 71 | dXSARGS; |
72 | #endif | 72 | #endif |
73 | if (items != 1) | 73 | if (items != 1) |
74 | Perl_croak(aTHX_ "Usage: %s(%s)", "Perf::Trace::Context::get_common_flags", "context"); | 74 | Perl_croak(aTHX_ "Usage: %s(%s)", "Perf::Trace::Context::common_flags", "context"); |
75 | PERL_UNUSED_VAR(cv); /* -W */ | 75 | PERL_UNUSED_VAR(cv); /* -W */ |
76 | { | 76 | { |
77 | struct scripting_context * context = INT2PTR(struct scripting_context *,SvIV(ST(0))); | 77 | struct scripting_context * context = INT2PTR(struct scripting_context *,SvIV(ST(0))); |
78 | int RETVAL; | 78 | int RETVAL; |
79 | dXSTARG; | 79 | dXSTARG; |
80 | 80 | ||
81 | RETVAL = get_common_flags(context); | 81 | RETVAL = common_flags(context); |
82 | XSprePUSH; PUSHi((IV)RETVAL); | 82 | XSprePUSH; PUSHi((IV)RETVAL); |
83 | } | 83 | } |
84 | XSRETURN(1); | 84 | XSRETURN(1); |
85 | } | 85 | } |
86 | 86 | ||
87 | 87 | ||
88 | XS(XS_Perf__Trace__Context_get_common_lock_depth); /* prototype to pass -Wmissing-prototypes */ | 88 | XS(XS_Perf__Trace__Context_common_lock_depth); /* prototype to pass -Wmissing-prototypes */ |
89 | XS(XS_Perf__Trace__Context_get_common_lock_depth) | 89 | XS(XS_Perf__Trace__Context_common_lock_depth) |
90 | { | 90 | { |
91 | #ifdef dVAR | 91 | #ifdef dVAR |
92 | dVAR; dXSARGS; | 92 | dVAR; dXSARGS; |
@@ -94,14 +94,14 @@ XS(XS_Perf__Trace__Context_get_common_lock_depth) | |||
94 | dXSARGS; | 94 | dXSARGS; |
95 | #endif | 95 | #endif |
96 | if (items != 1) | 96 | if (items != 1) |
97 | Perl_croak(aTHX_ "Usage: %s(%s)", "Perf::Trace::Context::get_common_lock_depth", "context"); | 97 | Perl_croak(aTHX_ "Usage: %s(%s)", "Perf::Trace::Context::common_lock_depth", "context"); |
98 | PERL_UNUSED_VAR(cv); /* -W */ | 98 | PERL_UNUSED_VAR(cv); /* -W */ |
99 | { | 99 | { |
100 | struct scripting_context * context = INT2PTR(struct scripting_context *,SvIV(ST(0))); | 100 | struct scripting_context * context = INT2PTR(struct scripting_context *,SvIV(ST(0))); |
101 | int RETVAL; | 101 | int RETVAL; |
102 | dXSTARG; | 102 | dXSTARG; |
103 | 103 | ||
104 | RETVAL = get_common_lock_depth(context); | 104 | RETVAL = common_lock_depth(context); |
105 | XSprePUSH; PUSHi((IV)RETVAL); | 105 | XSprePUSH; PUSHi((IV)RETVAL); |
106 | } | 106 | } |
107 | XSRETURN(1); | 107 | XSRETURN(1); |
@@ -124,9 +124,9 @@ XS(boot_Perf__Trace__Context) | |||
124 | PERL_UNUSED_VAR(items); /* -W */ | 124 | PERL_UNUSED_VAR(items); /* -W */ |
125 | XS_VERSION_BOOTCHECK ; | 125 | XS_VERSION_BOOTCHECK ; |
126 | 126 | ||
127 | newXSproto("Perf::Trace::Context::get_common_pc", XS_Perf__Trace__Context_get_common_pc, file, "$"); | 127 | newXSproto("Perf::Trace::Context::common_pc", XS_Perf__Trace__Context_common_pc, file, "$"); |
128 | newXSproto("Perf::Trace::Context::get_common_flags", XS_Perf__Trace__Context_get_common_flags, file, "$"); | 128 | newXSproto("Perf::Trace::Context::common_flags", XS_Perf__Trace__Context_common_flags, file, "$"); |
129 | newXSproto("Perf::Trace::Context::get_common_lock_depth", XS_Perf__Trace__Context_get_common_lock_depth, file, "$"); | 129 | newXSproto("Perf::Trace::Context::common_lock_depth", XS_Perf__Trace__Context_common_lock_depth, file, "$"); |
130 | if (PL_unitcheckav) | 130 | if (PL_unitcheckav) |
131 | call_list(PL_scopestack_ix, PL_unitcheckav); | 131 | call_list(PL_scopestack_ix, PL_unitcheckav); |
132 | XSRETURN_YES; | 132 | XSRETURN_YES; |