4  * contents of Context.xs. Do not edit this file, edit Context.xs instead.
12 #line 1 "Context.xs"
14  * Context.xs.  XS interfaces for perf script.
28 #line 42 "Context.c"
39        Perl_croak(aTHX_ "Usage: %s(%s)", "Perf::Trace::Context::common_pc", "context");  in XS()
42 	struct scripting_context *	context = INT2PTR(struct scripting_context *,SvIV(ST(0)));  in XS()  local
46 	RETVAL = common_pc(context);  in XS()
62        Perl_croak(aTHX_ "Usage: %s(%s)", "Perf::Trace::Context::common_flags", "context");  in XS()
65 	struct scripting_context *	context = INT2PTR(struct scripting_context *,SvIV(ST(0)));  in XS()  local
69 	RETVAL = common_flags(context);  in XS()
85        Perl_croak(aTHX_ "Usage: %s(%s)", "Perf::Trace::Context::common_lock_depth", "context");  in XS()
88 	struct scripting_context *	context = INT2PTR(struct scripting_context *,SvIV(ST(0)));  in XS()  local
92 	RETVAL = common_lock_depth(context);  in XS()
115         newXSproto("Perf::Trace::Context::common_pc", XS_Perf__Trace__Context_common_pc, file, "$");  in XS()
116 … newXSproto("Perf::Trace::Context::common_flags", XS_Perf__Trace__Context_common_flags, file, "$");  in XS()
117 …newXSproto("Perf::Trace::Context::common_lock_depth", XS_Perf__Trace__Context_common_lock_depth, f…  in XS()