@@ -301,7 +301,7 @@ class HLL::Backend::MoarVM {
301
301
for $ v -> $ gc {
302
302
my @ g := nqp ::list_s();
303
303
for <time retained_bytes promoted_bytes gen2_roots full cleared_bytes > -> $ f {
304
- nqp ::push_s(@ g , ~ ($ gc {$ f } // 0 ));
304
+ nqp ::push_s(@ g , ~ ($ gc {$ f } // ' 0 ' ));
305
305
}
306
306
nqp ::sayfh($ profile_fh , ' INSERT INTO gcs VALUES (' ~ nqp :: join (' ,' , @ g ) ~ ' );' );
307
307
}
@@ -311,17 +311,17 @@ class HLL::Backend::MoarVM {
311
311
sub collect_callees ($ caller , % call_graph ) {
312
312
my @ callee := nqp ::list_s(~ $ caller );
313
313
for <id osr spesh_entries jit_entries inlined_entries inclusive_time exclusive_time entries deopt_one > -> $ f {
314
- nqp ::push_s(@ callee , ~ (% call_graph {$ f } // 0 ));
314
+ nqp ::push_s(@ callee , ~ (% call_graph {$ f } // ' 0 ' ));
315
315
}
316
- my str $ id := ~ % call_graph < id > ;
316
+ my str $ id := ~ $ caller ;
317
317
% callee_rec_depth {$ id } := 0 unless % callee_rec_depth {$ id };
318
318
nqp ::push_s(@ callee , ~ % callee_rec_depth {$ id });
319
319
nqp ::sayfh($ profile_fh , ' INSERT INTO callees VALUES (' ~ nqp :: join (' ,' , @ callee ) ~ ' );' );
320
320
if % call_graph <allocations > {
321
321
for % call_graph <allocations > -> $ a {
322
322
my @ a := nqp ::list_s();
323
323
for <id spesh jit count > -> $ f {
324
- nqp ::push_s(@ a , ~ ($ a {$ f } // 0 ));
324
+ nqp ::push_s(@ a , ~ ($ a {$ f } // ' 0 ' ));
325
325
}
326
326
nqp ::sayfh($ profile_fh , ' INSERT INTO allocations VALUES (' ~ nqp :: join (' ,' , @ a ) ~ ' );' );
327
327
}
0 commit comments