Skip to content

Commit e79c768

Browse files
committed
Add nqp::backtracestrings.
1 parent 82b7e17 commit e79c768

File tree

1 file changed

+9
-0
lines changed

1 file changed

+9
-0
lines changed

src/QAST/Operations.nqp

Lines changed: 9 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -1310,6 +1310,15 @@ QAST::Operations.add_core_op('setmessage', -> $qastcomp, $op {
13101310
$ops.result($message.result);
13111311
$ops
13121312
});
1313+
QAST::Operations.add_core_op('backtracestrings', -> $qastcomp, $op {
1314+
if +$op.list != 1 {
1315+
nqp::die("The 'backtracestrings' op expects one child");
1316+
}
1317+
$qastcomp.as_post(QAST::Op.new(
1318+
:op('callmethod'), :name('backtrace_strings'),
1319+
$op[0]
1320+
))
1321+
});
13131322
QAST::Operations.add_core_op('newexception', -> $qastcomp, $op {
13141323
if +$op.list != 0 {
13151324
nqp::die("The 'newexception' op expects no children");

0 commit comments

Comments
 (0)