Created
July 4, 2011 03:18
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
# Current Source Filename 'fib.pir' | |
# get_params_pc PMC_CONST(1), P0 | |
# set_i_p I1,P0 | |
# set_i_ic I2,28 | |
# le_i_ic_ic I1,1,L1 | |
# set_i_p_kic I2,P0[1] | |
#L1: set_args_pc PMC_CONST(0), I2 | |
# set_p_pc P1,PMC_CONST(3) | |
# invokecc_p P1 | |
# get_results_pc PMC_CONST(0), I0 | |
# print_sc "fib(" | |
# print_i I2 | |
# print_sc ") = " | |
# say_i I0 | |
# end | |
# get_params_pc PMC_CONST(0), I3 | |
# lt_i_ic_ic I3,2,L2 | |
# sub_i_i_ic I1,I3,1 | |
# sub_i_i_ic I2,I3,2 | |
# set_args_pc PMC_CONST(0), I1 | |
# set_p_pc P0,PMC_CONST(3) | |
# invokecc_p P0 | |
# get_results_pc PMC_CONST(0), I4 | |
# set_args_pc PMC_CONST(0), I2 | |
# set_p_pc P1,PMC_CONST(3) | |
# invokecc_p P1 | |
# get_results_pc PMC_CONST(0), I0 | |
# add_i_i_i I3,I4,I0 | |
#L2: set_returns_pc PMC_CONST(0), I3 | |
.main 'pbc2lasm' | |
# get_params_pc PMC_CONST(1), P0 | |
# free: 0 1 2 3 4 6 7 8 5 - alloc: - decl: | |
# raw_params := $P0 := $P0 | |
# signature := PMC_CONST(1) := $OP1 | |
$S8 = STR LOAD_CONST :[CURRENT_CONTEXT]; | |
$P5 = STR LOOKUP $P10, $S8; | |
$P5 = PMC NEW_CTX $P5; | |
PUSH $P5, $P10; | |
CALL $P5; | |
$P5 = POP_ARG $P5; | |
# ctx := $P5 := $P5 | |
$S7 = STR LOAD_CONST :[Parrot_pcc_get_continuation]; | |
$P8 = STR LOOKUP $P10, $S7; | |
$P8 = PMC NEW_CTX $P8; | |
PUSH $P8, $P10; | |
# ctx := $P5 | |
PUSH $P8, $P5; | |
CALL $P8; | |
$P8 = POP_ARG $P8; | |
# ccont := $P8 := $P8 | |
$S6 = STR LOAD_CONST :[Parrot_pcc_get_caller_ctx]; | |
$P7 = STR LOOKUP $P10, $S6; | |
$P7 = PMC NEW_CTX $P7; | |
PUSH $P7, $P10; | |
# ctx := $P5 | |
PUSH $P7, $P5; | |
CALL $P7; | |
$P7 = POP_ARG $P7; | |
# caller_ctx := $P7 := $P7 | |
$S4 = STR LOAD_CONST :[Parrot_pcc_get_signature]; | |
$P6 = STR LOOKUP $P10, $S4; | |
$P6 = PMC NEW_CTX $P6; | |
PUSH $P6, $P10; | |
# caller_ctx := $P7 | |
PUSH $P6, $P7; | |
CALL $P6; | |
$P6 = POP_ARG $P6; | |
# call_object := $P6 := $P6 | |
# argc := $I4 := $I4 | |
$S2 = STR LOAD_CONST :[Parrot_pcc_fill_params_from_op]; | |
$P3 = STR LOOKUP $P10, $S2; | |
$P3 = PMC NEW_CTX $P3; | |
PUSH $P3, $P10; | |
# call_object := $P6 | |
PUSH $P3, $P6; | |
# signature := $OP1 | |
PUSH $P3, $OP1; | |
# raw_params := $P0 | |
PUSH $P3, $P0; | |
$I1 = INT LOAD_IMM :4; | |
PUSH $P3, $I1; | |
CALL $P3; | |
$P3 = POP_ARG $P3; | |
$S1 = STR LOAD_CONST :[PObj_get_FLAGS]; | |
$P2 = STR LOOKUP $P10, $S1; | |
$P2 = PMC NEW_CTX $P2; | |
# ccont := $P8 | |
PUSH $P2, $P8; | |
CALL $P2; | |
$P2 = POP_ARG $P2; | |
$I1 = INT LOAD_IMM :4; | |
$I3 = INT AND $P2, $I1; | |
INT IF $I3 :l43; | |
INT GOTO :l44; | |
l43: INT NOOP; | |
$S1 = STR LOAD_CONST :[PObj_get_FLAGS]; | |
$P3 = STR LOOKUP $P10, $S1; | |
$P3 = PMC NEW_CTX $P3; | |
# ccont := $P8 | |
PUSH $P3, $P8; | |
CALL $P3; | |
$P3 = POP_ARG $P3; | |
$I2 = INT LOAD_IMM :4; | |
$I1 = INT NOT $I2; | |
$P3 = INT AND $P3, $I1; | |
$S3 = STR LOAD_CONST :[Parrot_pcc_dec_recursion_depth]; | |
$P1 = STR LOOKUP $P10, $S3; | |
$P1 = PMC NEW_CTX $P1; | |
PUSH $P1, $P10; | |
# ctx := $P5 | |
PUSH $P1, $P5; | |
CALL $P1; | |
$P1 = POP_ARG $P1; | |
$S3 = STR LOAD_CONST :[Parrot_pcc_set_caller_ctx]; | |
$P1 = STR LOOKUP $P10, $S3; | |
$P1 = PMC NEW_CTX $P1; | |
PUSH $P1, $P10; | |
# ctx := $P5 | |
PUSH $P1, $P5; | |
$S0 = STR LOAD_CONST :[Parrot_pcc_get_caller_ctx]; | |
$P2 = STR LOOKUP $P10, $S0; | |
$P2 = PMC NEW_CTX $P2; | |
PUSH $P2, $P10; | |
# caller_ctx := $P7 | |
PUSH $P2, $P7; | |
CALL $P2; | |
$P2 = POP_ARG $P2; | |
PUSH $P1, $P2; | |
CALL $P1; | |
$P1 = POP_ARG $P1; | |
44: INT NOOP; | |
$S3 = STR LOAD_CONST :[GETATTR_FixedIntegerArray_size]; | |
$P1 = STR LOOKUP $P10, $S3; | |
$P1 = PMC NEW_CTX $P1; | |
PUSH $P1, $P10; | |
# signature := $OP1 | |
PUSH $P1, $OP1; | |
# argc := $I4 | |
PUSH $P1, $I4; | |
CALL $P1; | |
$P1 = POP_ARG $P1; | |
# Unhandled pasttype: macro | |
# free: 2 1 3 - alloc: 0 - decl: 5 8 7 6 4 | |
# Dealloc 0 | |
# Dealloc 5 | |
# Dealloc 8 | |
# Dealloc 7 | |
# Dealloc 6 | |
# Dealloc 4 | |
# set_i_p I1,P0 | |
# free: 0 1 2 3 4 5 6 7 8 - alloc: - decl: | |
$S7 = STR LOAD_CONST :[VTABLE_get_integer]; | |
$P8 = STR LOOKUP $P10, $S7; | |
$P8 = PMC NEW_CTX $P8; | |
PUSH $P8, $P10; | |
PUSH $P8, $P10; | |
CALL $P8; | |
$P8 = POP_ARG $P8; | |
$I11 = $P8; | |
# Unhandled pirop: = | |
# Unhandled pasttype: macro | |
# free: 0 1 2 3 4 5 6 7 8 - alloc: - decl: | |
# set_i_ic I2,28 | |
# free: 0 1 2 3 4 5 6 7 8 - alloc: - decl: | |
$I12 = 28; | |
# Unhandled pirop: = | |
# Unhandled pasttype: macro | |
# free: 0 1 2 3 4 5 6 7 8 - alloc: - decl: | |
# le_i_ic_ic I1,1,L1 | |
# free: 0 1 2 3 4 5 6 7 8 - alloc: - decl: | |
# Unhandled pirop: le | |
INT IF :l226; | |
INT GOTO :l227; | |
l226: INT NOOP; | |
# Unhandled pasttype: macro | |
227: INT NOOP; | |
# Unhandled pasttype: macro | |
# free: 0 1 2 3 4 5 6 7 8 - alloc: - decl: | |
# set_i_p_kic I2,P0[1] | |
# free: 0 1 2 3 4 5 6 7 8 - alloc: - decl: | |
$S7 = STR LOAD_CONST :[VTABLE_get_integer_keyed_int]; | |
$P8 = STR LOOKUP $P10, $S7; | |
$P8 = PMC NEW_CTX $P8; | |
PUSH $P8, $P10; | |
PUSH $P8, P0[1]; | |
PUSH $P8, $O3; | |
CALL $P8; | |
$P8 = POP_ARG $P8; | |
$I12 = $P8; | |
# Unhandled pirop: = | |
# Unhandled pasttype: macro | |
# free: 0 1 2 3 4 5 6 7 8 - alloc: - decl: | |
L1: | |
# set_args_pc PMC_CONST(0), I2 | |
# free: 0 1 2 3 4 6 7 5 8 - alloc: - decl: | |
# raw_args := $P0 := $P0 | |
# signature := PMC_CONST(0) := $OP1 | |
$S5 = STR LOAD_CONST :[Parrot_pcc_build_sig_object_from_op]; | |
$P8 = STR LOOKUP $P10, $S5; | |
$P8 = PMC NEW_CTX $P8; | |
PUSH $P8, $P10; | |
# Unhandled var: Capture[0x9d1a53c] | |
PUSH $P8, ; | |
# signature := $OP1 | |
PUSH $P8, $OP1; | |
# raw_args := $P0 | |
PUSH $P8, $P0; | |
CALL $P8; | |
$P8 = POP_ARG $P8; | |
# call_sig := $P8 := $P8 | |
# argc := $I5 := $I5 | |
$S6 = STR LOAD_CONST :[GETATTR_FixedIntegerArray_size]; | |
$P7 = STR LOOKUP $P10, $S6; | |
$P7 = PMC NEW_CTX $P7; | |
PUSH $P7, $P10; | |
# signature := $OP1 | |
PUSH $P7, $OP1; | |
# argc := $I5 | |
PUSH $P7, $I5; | |
CALL $P7; | |
$P7 = POP_ARG $P7; | |
$S6 = STR LOAD_CONST :[Parrot_pcc_set_signature]; | |
$P7 = STR LOOKUP $P10, $S6; | |
$P7 = PMC NEW_CTX $P7; | |
PUSH $P7, $P10; | |
$S3 = STR LOAD_CONST :[CURRENT_CONTEXT]; | |
$P4 = STR LOOKUP $P10, $S3; | |
$P4 = PMC NEW_CTX $P4; | |
PUSH $P4, $P10; | |
CALL $P4; | |
$P4 = POP_ARG $P4; | |
PUSH $P7, $P4; | |
# call_sig := $P8 | |
PUSH $P7, $P8; | |
CALL $P7; | |
$P7 = POP_ARG $P7; | |
# Unhandled pasttype: macro | |
# free: 0 1 2 3 4 6 7 - alloc: - decl: 8 5 | |
# Dealloc 8 | |
# Dealloc 5 | |
# set_p_pc P1,PMC_CONST(3) | |
# free: 0 1 2 3 4 5 6 7 8 - alloc: - decl: | |
$P11 = PMC_CONST(3); | |
# Unhandled pirop: = | |
$S7 = STR LOAD_CONST :[PARROT_GC_WRITE_BARRIER]; | |
$P8 = STR LOOKUP $P10, $S7; | |
$P8 = PMC NEW_CTX $P8; | |
PUSH $P8, $P10; | |
$S5 = STR LOAD_CONST :[CURRENT_CONTEXT]; | |
$P6 = STR LOOKUP $P10, $S5; | |
$P6 = PMC NEW_CTX $P6; | |
PUSH $P6, $P10; | |
CALL $P6; | |
$P6 = POP_ARG $P6; | |
PUSH $P8, $P6; | |
CALL $P8; | |
$P8 = POP_ARG $P8; | |
# Unhandled pasttype: macro | |
# free: 0 1 2 3 4 5 6 7 8 - alloc: - decl: | |
# invokecc_p P1 | |
# free: 0 1 2 3 4 5 8 7 6 - alloc: - decl: | |
# p := $P11 := $OP1 | |
# Unhandled pasttype: macro | |
# dest := := | |
$S7 = STR LOAD_CONST :[Parrot_pcc_get_signature]; | |
$P6 = STR LOOKUP $P10, $S7; | |
$P6 = PMC NEW_CTX $P6; | |
PUSH $P6, $P10; | |
$S5 = STR LOAD_CONST :[CURRENT_CONTEXT]; | |
$P8 = STR LOOKUP $P10, $S5; | |
$P8 = PMC NEW_CTX $P8; | |
PUSH $P8, $P10; | |
CALL $P8; | |
$P8 = POP_ARG $P8; | |
PUSH $P6, $P8; | |
CALL $P6; | |
$P6 = POP_ARG $P6; | |
# signature := $P6 := $P6 | |
$S8 = STR LOAD_CONST :[Parrot_pcc_set_pc]; | |
$P7 = STR LOOKUP $P10, $S8; | |
$P7 = PMC NEW_CTX $P7; | |
PUSH $P7, $P10; | |
$S4 = STR LOAD_CONST :[CURRENT_CONTEXT]; | |
$P5 = STR LOOKUP $P10, $S4; | |
$P5 = PMC NEW_CTX $P5; | |
PUSH $P5, $P10; | |
CALL $P5; | |
$P5 = POP_ARG $P5; | |
PUSH $P7, $P5; | |
# dest := | |
PUSH $P7, ; | |
CALL $P7; | |
$P7 = POP_ARG $P7; | |
# Unhandled pirop: ! | |
INT IF :l37; | |
INT GOTO :l38; | |
l37: INT NOOP; | |
$S8 = STR LOAD_CONST :[Parrot_pcc_set_object]; | |
$P7 = STR LOOKUP $P10, $S8; | |
$P7 = PMC NEW_CTX $P7; | |
PUSH $P7, $P10; | |
# signature := $P6 | |
PUSH $P7, $P6; | |
# Unhandled var: Capture[0x9c4fa50] | |
PUSH $P7, ; | |
CALL $P7; | |
$P7 = POP_ARG $P7; | |
38: INT NOOP; | |
# Unhandled pirop: arrow | |
# Unhandled var: Capture[0x9a632dc] | |
= ; | |
# Unhandled pirop: = | |
# dest := | |
$S8 = STR LOAD_CONST :[VTABLE_invoke]; | |
$P7 = STR LOOKUP $P10, $S8; | |
$P7 = PMC NEW_CTX $P7; | |
PUSH $P7, $P10; | |
# p := $OP1 | |
PUSH $P7, $OP1; | |
# dest := | |
PUSH $P7, ; | |
CALL $P7; | |
$P7 = POP_ARG $P7; | |
= $P7; | |
# Unhandled pirop: = | |
# Unhandled pasttype: macro | |
# free: 0 1 2 3 4 5 8 7 - alloc: - decl: 6 | |
# Dealloc 6 | |
# get_results_pc PMC_CONST(0), I0 | |
# free: 2 1 3 5 8 7 4 6 - alloc: 0 - decl: | |
# raw_params := $P0 := $P0 | |
# signature := PMC_CONST(0) := $OP1 | |
$S4 = STR LOAD_CONST :[CURRENT_CONTEXT]; | |
$P6 = STR LOOKUP $P10, $S4; | |
$P6 = PMC NEW_CTX $P6; | |
PUSH $P6, $P10; | |
CALL $P6; | |
$P6 = POP_ARG $P6; | |
# ctx := $P6 := $P6 | |
$S7 = STR LOAD_CONST :[Parrot_pcc_get_signature]; | |
$P4 = STR LOOKUP $P10, $S7; | |
$P4 = PMC NEW_CTX $P4; | |
PUSH $P4, $P10; | |
# ctx := $P6 | |
PUSH $P4, $P6; | |
CALL $P4; | |
$P4 = POP_ARG $P4; | |
# call_object := $P4 := $P4 | |
# argc := $I7 := $I7 | |
$S5 = STR LOAD_CONST :[Parrot_pcc_fill_params_from_op]; | |
$P8 = STR LOOKUP $P10, $S5; | |
$P8 = PMC NEW_CTX $P8; | |
PUSH $P8, $P10; | |
# call_object := $P4 | |
PUSH $P8, $P4; | |
# signature := $OP1 | |
PUSH $P8, $OP1; | |
# raw_params := $P0 | |
PUSH $P8, $P0; | |
$I3 = INT LOAD_IMM :8; | |
PUSH $P8, $I3; | |
CALL $P8; | |
$P8 = POP_ARG $P8; | |
$S5 = STR LOAD_CONST :[GETATTR_FixedIntegerArray_size]; | |
$P8 = STR LOOKUP $P10, $S5; | |
$P8 = PMC NEW_CTX $P8; | |
PUSH $P8, $P10; | |
# signature := $OP1 | |
PUSH $P8, $OP1; | |
# argc := $I7 | |
PUSH $P8, $I7; | |
CALL $P8; | |
$P8 = POP_ARG $P8; | |
$S5 = STR LOAD_CONST :[Parrot_pcc_set_signature]; | |
$P8 = STR LOOKUP $P10, $S5; | |
$P8 = PMC NEW_CTX $P8; | |
PUSH $P8, $P10; | |
$S1 = STR LOAD_CONST :[CURRENT_CONTEXT]; | |
$P3 = STR LOOKUP $P10, $S1; | |
$P3 = PMC NEW_CTX $P3; | |
PUSH $P3, $P10; | |
CALL $P3; | |
$P3 = POP_ARG $P3; | |
PUSH $P8, $P3; | |
# Unhandled var: Capture[0x9d1ff24] | |
PUSH $P8, ; | |
CALL $P8; | |
$P8 = POP_ARG $P8; | |
# Unhandled pasttype: macro | |
# free: 2 1 3 5 8 - alloc: 0 - decl: 6 4 7 | |
# Dealloc 0 | |
# Dealloc 6 | |
# Dealloc 4 | |
# Dealloc 7 | |
# print_sc "fib(" | |
# free: 0 1 2 3 4 5 6 7 8 - alloc: - decl: | |
# s := "fib(" := $OS1 | |
# Unhandled pirop: && | |
INT IF :l4; | |
INT GOTO :l5; | |
l4: INT NOOP; | |
$S7 = STR LOAD_CONST :[Parrot_io_putps]; | |
$P8 = STR LOOKUP $P10, $S7; | |
$P8 = PMC NEW_CTX $P8; | |
PUSH $P8, $P10; | |
$S5 = STR LOAD_CONST :[_PIO_STDOUT]; | |
$P6 = STR LOOKUP $P10, $S5; | |
$P6 = PMC NEW_CTX $P6; | |
PUSH $P6, $P10; | |
CALL $P6; | |
$P6 = POP_ARG $P6; | |
PUSH $P8, $P6; | |
# s := $OS1 | |
PUSH $P8, $OS1; | |
CALL $P8; | |
$P8 = POP_ARG $P8; | |
5: INT NOOP; | |
# Unhandled pasttype: macro | |
# free: 0 1 2 3 4 5 6 7 8 - alloc: - decl: | |
# print_i I2 | |
# free: 0 1 2 3 4 5 6 7 8 - alloc: - decl: | |
$S7 = STR LOAD_CONST :[Parrot_io_printf]; | |
$P8 = STR LOOKUP $P10, $S7; | |
$P8 = PMC NEW_CTX $P8; | |
PUSH $P8, $P10; | |
# Unhandled var: Capture[0xa4d0f64] | |
PUSH $P8, ; | |
# Unhandled op: Capture[0xa528628] | |
PUSH $P8, ; | |
CALL $P8; | |
$P8 = POP_ARG $P8; | |
# Unhandled pasttype: macro | |
# free: 0 1 2 3 4 5 6 7 8 - alloc: - decl: | |
# print_sc ") = " | |
# free: 0 1 2 3 4 5 6 7 8 - alloc: - decl: | |
# s := ") = " := $OS1 | |
# Unhandled pirop: && | |
INT IF :l4; | |
INT GOTO :l5; | |
l4: INT NOOP; | |
$S7 = STR LOAD_CONST :[Parrot_io_putps]; | |
$P8 = STR LOOKUP $P10, $S7; | |
$P8 = PMC NEW_CTX $P8; | |
PUSH $P8, $P10; | |
$S5 = STR LOAD_CONST :[_PIO_STDOUT]; | |
$P6 = STR LOOKUP $P10, $S5; | |
$P6 = PMC NEW_CTX $P6; | |
PUSH $P6, $P10; | |
CALL $P6; | |
$P6 = POP_ARG $P6; | |
PUSH $P8, $P6; | |
# s := $OS1 | |
PUSH $P8, $OS1; | |
CALL $P8; | |
$P8 = POP_ARG $P8; | |
5: INT NOOP; | |
# Unhandled pasttype: macro | |
# free: 0 1 2 3 4 5 6 7 8 - alloc: - decl: | |
# say_i I0 | |
# free: 0 1 2 3 4 5 6 7 8 - alloc: - decl: | |
$S7 = STR LOAD_CONST :[Parrot_io_printf]; | |
$P8 = STR LOOKUP $P10, $S7; | |
$P8 = PMC NEW_CTX $P8; | |
PUSH $P8, $P10; | |
# Unhandled node: INTVAL_FMT "\n" | |
PUSH $P8, ; | |
# Unhandled op: Capture[0xa4dba18] | |
PUSH $P8, ; | |
CALL $P8; | |
$P8 = POP_ARG $P8; | |
# Unhandled pasttype: macro | |
# free: 0 1 2 3 4 5 6 7 8 - alloc: - decl: | |
# TODO - end: not found | |
# get_params_pc PMC_CONST(0), I3 | |
# free: 0 1 2 3 4 6 7 8 5 - alloc: - decl: | |
# raw_params := $P0 := $P0 | |
# signature := PMC_CONST(0) := $OP1 | |
$S8 = STR LOAD_CONST :[CURRENT_CONTEXT]; | |
$P5 = STR LOOKUP $P10, $S8; | |
$P5 = PMC NEW_CTX $P5; | |
PUSH $P5, $P10; | |
CALL $P5; | |
$P5 = POP_ARG $P5; | |
# ctx := $P5 := $P5 | |
$S7 = STR LOAD_CONST :[Parrot_pcc_get_continuation]; | |
$P8 = STR LOOKUP $P10, $S7; | |
$P8 = PMC NEW_CTX $P8; | |
PUSH $P8, $P10; | |
# ctx := $P5 | |
PUSH $P8, $P5; | |
CALL $P8; | |
$P8 = POP_ARG $P8; | |
# ccont := $P8 := $P8 | |
$S6 = STR LOAD_CONST :[Parrot_pcc_get_caller_ctx]; | |
$P7 = STR LOOKUP $P10, $S6; | |
$P7 = PMC NEW_CTX $P7; | |
PUSH $P7, $P10; | |
# ctx := $P5 | |
PUSH $P7, $P5; | |
CALL $P7; | |
$P7 = POP_ARG $P7; | |
# caller_ctx := $P7 := $P7 | |
$S4 = STR LOAD_CONST :[Parrot_pcc_get_signature]; | |
$P6 = STR LOOKUP $P10, $S4; | |
$P6 = PMC NEW_CTX $P6; | |
PUSH $P6, $P10; | |
# caller_ctx := $P7 | |
PUSH $P6, $P7; | |
CALL $P6; | |
$P6 = POP_ARG $P6; | |
# call_object := $P6 := $P6 | |
# argc := $I4 := $I4 | |
$S2 = STR LOAD_CONST :[Parrot_pcc_fill_params_from_op]; | |
$P3 = STR LOOKUP $P10, $S2; | |
$P3 = PMC NEW_CTX $P3; | |
PUSH $P3, $P10; | |
# call_object := $P6 | |
PUSH $P3, $P6; | |
# signature := $OP1 | |
PUSH $P3, $OP1; | |
# raw_params := $P0 | |
PUSH $P3, $P0; | |
$I1 = INT LOAD_IMM :4; | |
PUSH $P3, $I1; | |
CALL $P3; | |
$P3 = POP_ARG $P3; | |
$S1 = STR LOAD_CONST :[PObj_get_FLAGS]; | |
$P2 = STR LOOKUP $P10, $S1; | |
$P2 = PMC NEW_CTX $P2; | |
# ccont := $P8 | |
PUSH $P2, $P8; | |
CALL $P2; | |
$P2 = POP_ARG $P2; | |
$I1 = INT LOAD_IMM :4; | |
$I3 = INT AND $P2, $I1; | |
INT IF $I3 :l43; | |
INT GOTO :l44; | |
l43: INT NOOP; | |
$S1 = STR LOAD_CONST :[PObj_get_FLAGS]; | |
$P3 = STR LOOKUP $P10, $S1; | |
$P3 = PMC NEW_CTX $P3; | |
# ccont := $P8 | |
PUSH $P3, $P8; | |
CALL $P3; | |
$P3 = POP_ARG $P3; | |
$I2 = INT LOAD_IMM :4; | |
$I1 = INT NOT $I2; | |
$P3 = INT AND $P3, $I1; | |
$S3 = STR LOAD_CONST :[Parrot_pcc_dec_recursion_depth]; | |
$P1 = STR LOOKUP $P10, $S3; | |
$P1 = PMC NEW_CTX $P1; | |
PUSH $P1, $P10; | |
# ctx := $P5 | |
PUSH $P1, $P5; | |
CALL $P1; | |
$P1 = POP_ARG $P1; | |
$S3 = STR LOAD_CONST :[Parrot_pcc_set_caller_ctx]; | |
$P1 = STR LOOKUP $P10, $S3; | |
$P1 = PMC NEW_CTX $P1; | |
PUSH $P1, $P10; | |
# ctx := $P5 | |
PUSH $P1, $P5; | |
$S0 = STR LOAD_CONST :[Parrot_pcc_get_caller_ctx]; | |
$P2 = STR LOOKUP $P10, $S0; | |
$P2 = PMC NEW_CTX $P2; | |
PUSH $P2, $P10; | |
# caller_ctx := $P7 | |
PUSH $P2, $P7; | |
CALL $P2; | |
$P2 = POP_ARG $P2; | |
PUSH $P1, $P2; | |
CALL $P1; | |
$P1 = POP_ARG $P1; | |
44: INT NOOP; | |
$S3 = STR LOAD_CONST :[GETATTR_FixedIntegerArray_size]; | |
$P1 = STR LOOKUP $P10, $S3; | |
$P1 = PMC NEW_CTX $P1; | |
PUSH $P1, $P10; | |
# signature := $OP1 | |
PUSH $P1, $OP1; | |
# argc := $I4 | |
PUSH $P1, $I4; | |
CALL $P1; | |
$P1 = POP_ARG $P1; | |
# Unhandled pasttype: macro | |
# free: 2 1 3 - alloc: 0 - decl: 5 8 7 6 4 | |
# Dealloc 0 | |
# Dealloc 5 | |
# Dealloc 8 | |
# Dealloc 7 | |
# Dealloc 6 | |
# Dealloc 4 | |
# lt_i_ic_ic I3,2,L2 | |
# free: 0 1 2 3 4 5 6 7 8 - alloc: - decl: | |
# Unhandled pirop: lt | |
INT IF :l163; | |
INT GOTO :l164; | |
l163: INT NOOP; | |
# Unhandled pasttype: macro | |
164: INT NOOP; | |
# Unhandled pasttype: macro | |
# free: 0 1 2 3 4 5 6 7 8 - alloc: - decl: | |
# sub_i_i_ic I1,I3,1 | |
# free: 0 1 2 3 4 5 6 7 8 - alloc: - decl: | |
# Unhandled pirop: - | |
$I11 = ; | |
# Unhandled pirop: = | |
# Unhandled pasttype: macro | |
# free: 0 1 2 3 4 5 6 7 8 - alloc: - decl: | |
# sub_i_i_ic I2,I3,2 | |
# free: 0 1 2 3 4 5 6 7 8 - alloc: - decl: | |
# Unhandled pirop: - | |
$I12 = ; | |
# Unhandled pirop: = | |
# Unhandled pasttype: macro | |
# free: 0 1 2 3 4 5 6 7 8 - alloc: - decl: | |
# set_args_pc PMC_CONST(0), I1 | |
# free: 0 1 2 3 4 6 7 5 8 - alloc: - decl: | |
# raw_args := $P0 := $P0 | |
# signature := PMC_CONST(0) := $OP1 | |
$S5 = STR LOAD_CONST :[Parrot_pcc_build_sig_object_from_op]; | |
$P8 = STR LOOKUP $P10, $S5; | |
$P8 = PMC NEW_CTX $P8; | |
PUSH $P8, $P10; | |
# Unhandled var: Capture[0x9d1a53c] | |
PUSH $P8, ; | |
# signature := $OP1 | |
PUSH $P8, $OP1; | |
# raw_args := $P0 | |
PUSH $P8, $P0; | |
CALL $P8; | |
$P8 = POP_ARG $P8; | |
# call_sig := $P8 := $P8 | |
# argc := $I5 := $I5 | |
$S6 = STR LOAD_CONST :[GETATTR_FixedIntegerArray_size]; | |
$P7 = STR LOOKUP $P10, $S6; | |
$P7 = PMC NEW_CTX $P7; | |
PUSH $P7, $P10; | |
# signature := $OP1 | |
PUSH $P7, $OP1; | |
# argc := $I5 | |
PUSH $P7, $I5; | |
CALL $P7; | |
$P7 = POP_ARG $P7; | |
$S6 = STR LOAD_CONST :[Parrot_pcc_set_signature]; | |
$P7 = STR LOOKUP $P10, $S6; | |
$P7 = PMC NEW_CTX $P7; | |
PUSH $P7, $P10; | |
$S3 = STR LOAD_CONST :[CURRENT_CONTEXT]; | |
$P4 = STR LOOKUP $P10, $S3; | |
$P4 = PMC NEW_CTX $P4; | |
PUSH $P4, $P10; | |
CALL $P4; | |
$P4 = POP_ARG $P4; | |
PUSH $P7, $P4; | |
# call_sig := $P8 | |
PUSH $P7, $P8; | |
CALL $P7; | |
$P7 = POP_ARG $P7; | |
# Unhandled pasttype: macro | |
# free: 0 1 2 3 4 6 7 - alloc: - decl: 8 5 | |
# Dealloc 8 | |
# Dealloc 5 | |
# set_p_pc P0,PMC_CONST(3) | |
# free: 0 1 2 3 4 5 6 7 8 - alloc: - decl: | |
$P10 = PMC_CONST(3); | |
# Unhandled pirop: = | |
$S7 = STR LOAD_CONST :[PARROT_GC_WRITE_BARRIER]; | |
$P8 = STR LOOKUP $P10, $S7; | |
$P8 = PMC NEW_CTX $P8; | |
PUSH $P8, $P10; | |
$S5 = STR LOAD_CONST :[CURRENT_CONTEXT]; | |
$P6 = STR LOOKUP $P10, $S5; | |
$P6 = PMC NEW_CTX $P6; | |
PUSH $P6, $P10; | |
CALL $P6; | |
$P6 = POP_ARG $P6; | |
PUSH $P8, $P6; | |
CALL $P8; | |
$P8 = POP_ARG $P8; | |
# Unhandled pasttype: macro | |
# free: 0 1 2 3 4 5 6 7 8 - alloc: - decl: | |
# invokecc_p P0 | |
# free: 0 1 2 3 4 5 8 7 6 - alloc: - decl: | |
# p := $P10 := $OP1 | |
# Unhandled pasttype: macro | |
# dest := := | |
$S7 = STR LOAD_CONST :[Parrot_pcc_get_signature]; | |
$P6 = STR LOOKUP $P10, $S7; | |
$P6 = PMC NEW_CTX $P6; | |
PUSH $P6, $P10; | |
$S5 = STR LOAD_CONST :[CURRENT_CONTEXT]; | |
$P8 = STR LOOKUP $P10, $S5; | |
$P8 = PMC NEW_CTX $P8; | |
PUSH $P8, $P10; | |
CALL $P8; | |
$P8 = POP_ARG $P8; | |
PUSH $P6, $P8; | |
CALL $P6; | |
$P6 = POP_ARG $P6; | |
# signature := $P6 := $P6 | |
$S8 = STR LOAD_CONST :[Parrot_pcc_set_pc]; | |
$P7 = STR LOOKUP $P10, $S8; | |
$P7 = PMC NEW_CTX $P7; | |
PUSH $P7, $P10; | |
$S4 = STR LOAD_CONST :[CURRENT_CONTEXT]; | |
$P5 = STR LOOKUP $P10, $S4; | |
$P5 = PMC NEW_CTX $P5; | |
PUSH $P5, $P10; | |
CALL $P5; | |
$P5 = POP_ARG $P5; | |
PUSH $P7, $P5; | |
# dest := | |
PUSH $P7, ; | |
CALL $P7; | |
$P7 = POP_ARG $P7; | |
# Unhandled pirop: ! | |
INT IF :l37; | |
INT GOTO :l38; | |
l37: INT NOOP; | |
$S8 = STR LOAD_CONST :[Parrot_pcc_set_object]; | |
$P7 = STR LOOKUP $P10, $S8; | |
$P7 = PMC NEW_CTX $P7; | |
PUSH $P7, $P10; | |
# signature := $P6 | |
PUSH $P7, $P6; | |
# Unhandled var: Capture[0x9c4fa50] | |
PUSH $P7, ; | |
CALL $P7; | |
$P7 = POP_ARG $P7; | |
38: INT NOOP; | |
# Unhandled pirop: arrow | |
# Unhandled var: Capture[0x9a632dc] | |
= ; | |
# Unhandled pirop: = | |
# dest := | |
$S8 = STR LOAD_CONST :[VTABLE_invoke]; | |
$P7 = STR LOOKUP $P10, $S8; | |
$P7 = PMC NEW_CTX $P7; | |
PUSH $P7, $P10; | |
# p := $OP1 | |
PUSH $P7, $OP1; | |
# dest := | |
PUSH $P7, ; | |
CALL $P7; | |
$P7 = POP_ARG $P7; | |
= $P7; | |
# Unhandled pirop: = | |
# Unhandled pasttype: macro | |
# free: 0 1 2 3 4 5 8 7 - alloc: - decl: 6 | |
# Dealloc 6 | |
# get_results_pc PMC_CONST(0), I4 | |
# free: 2 1 3 5 8 7 4 6 - alloc: 0 - decl: | |
# raw_params := $P0 := $P0 | |
# signature := PMC_CONST(0) := $OP1 | |
$S4 = STR LOAD_CONST :[CURRENT_CONTEXT]; | |
$P6 = STR LOOKUP $P10, $S4; | |
$P6 = PMC NEW_CTX $P6; | |
PUSH $P6, $P10; | |
CALL $P6; | |
$P6 = POP_ARG $P6; | |
# ctx := $P6 := $P6 | |
$S7 = STR LOAD_CONST :[Parrot_pcc_get_signature]; | |
$P4 = STR LOOKUP $P10, $S7; | |
$P4 = PMC NEW_CTX $P4; | |
PUSH $P4, $P10; | |
# ctx := $P6 | |
PUSH $P4, $P6; | |
CALL $P4; | |
$P4 = POP_ARG $P4; | |
# call_object := $P4 := $P4 | |
# argc := $I7 := $I7 | |
$S5 = STR LOAD_CONST :[Parrot_pcc_fill_params_from_op]; | |
$P8 = STR LOOKUP $P10, $S5; | |
$P8 = PMC NEW_CTX $P8; | |
PUSH $P8, $P10; | |
# call_object := $P4 | |
PUSH $P8, $P4; | |
# signature := $OP1 | |
PUSH $P8, $OP1; | |
# raw_params := $P0 | |
PUSH $P8, $P0; | |
$I3 = INT LOAD_IMM :8; | |
PUSH $P8, $I3; | |
CALL $P8; | |
$P8 = POP_ARG $P8; | |
$S5 = STR LOAD_CONST :[GETATTR_FixedIntegerArray_size]; | |
$P8 = STR LOOKUP $P10, $S5; | |
$P8 = PMC NEW_CTX $P8; | |
PUSH $P8, $P10; | |
# signature := $OP1 | |
PUSH $P8, $OP1; | |
# argc := $I7 | |
PUSH $P8, $I7; | |
CALL $P8; | |
$P8 = POP_ARG $P8; | |
$S5 = STR LOAD_CONST :[Parrot_pcc_set_signature]; | |
$P8 = STR LOOKUP $P10, $S5; | |
$P8 = PMC NEW_CTX $P8; | |
PUSH $P8, $P10; | |
$S1 = STR LOAD_CONST :[CURRENT_CONTEXT]; | |
$P3 = STR LOOKUP $P10, $S1; | |
$P3 = PMC NEW_CTX $P3; | |
PUSH $P3, $P10; | |
CALL $P3; | |
$P3 = POP_ARG $P3; | |
PUSH $P8, $P3; | |
# Unhandled var: Capture[0x9d1ff24] | |
PUSH $P8, ; | |
CALL $P8; | |
$P8 = POP_ARG $P8; | |
# Unhandled pasttype: macro | |
# free: 2 1 3 5 8 - alloc: 0 - decl: 6 4 7 | |
# Dealloc 0 | |
# Dealloc 6 | |
# Dealloc 4 | |
# Dealloc 7 | |
# set_args_pc PMC_CONST(0), I2 | |
# free: 0 1 2 3 4 6 7 5 8 - alloc: - decl: | |
# raw_args := $P0 := $P0 | |
# signature := PMC_CONST(0) := $OP1 | |
$S5 = STR LOAD_CONST :[Parrot_pcc_build_sig_object_from_op]; | |
$P8 = STR LOOKUP $P10, $S5; | |
$P8 = PMC NEW_CTX $P8; | |
PUSH $P8, $P10; | |
# Unhandled var: Capture[0x9d1a53c] | |
PUSH $P8, ; | |
# signature := $OP1 | |
PUSH $P8, $OP1; | |
# raw_args := $P0 | |
PUSH $P8, $P0; | |
CALL $P8; | |
$P8 = POP_ARG $P8; | |
# call_sig := $P8 := $P8 | |
# argc := $I5 := $I5 | |
$S6 = STR LOAD_CONST :[GETATTR_FixedIntegerArray_size]; | |
$P7 = STR LOOKUP $P10, $S6; | |
$P7 = PMC NEW_CTX $P7; | |
PUSH $P7, $P10; | |
# signature := $OP1 | |
PUSH $P7, $OP1; | |
# argc := $I5 | |
PUSH $P7, $I5; | |
CALL $P7; | |
$P7 = POP_ARG $P7; | |
$S6 = STR LOAD_CONST :[Parrot_pcc_set_signature]; | |
$P7 = STR LOOKUP $P10, $S6; | |
$P7 = PMC NEW_CTX $P7; | |
PUSH $P7, $P10; | |
$S3 = STR LOAD_CONST :[CURRENT_CONTEXT]; | |
$P4 = STR LOOKUP $P10, $S3; | |
$P4 = PMC NEW_CTX $P4; | |
PUSH $P4, $P10; | |
CALL $P4; | |
$P4 = POP_ARG $P4; | |
PUSH $P7, $P4; | |
# call_sig := $P8 | |
PUSH $P7, $P8; | |
CALL $P7; | |
$P7 = POP_ARG $P7; | |
# Unhandled pasttype: macro | |
# free: 0 1 2 3 4 6 7 - alloc: - decl: 8 5 | |
# Dealloc 8 | |
# Dealloc 5 | |
# set_p_pc P1,PMC_CONST(3) | |
# free: 0 1 2 3 4 5 6 7 8 - alloc: - decl: | |
$P11 = PMC_CONST(3); | |
# Unhandled pirop: = | |
$S7 = STR LOAD_CONST :[PARROT_GC_WRITE_BARRIER]; | |
$P8 = STR LOOKUP $P10, $S7; | |
$P8 = PMC NEW_CTX $P8; | |
PUSH $P8, $P10; | |
$S5 = STR LOAD_CONST :[CURRENT_CONTEXT]; | |
$P6 = STR LOOKUP $P10, $S5; | |
$P6 = PMC NEW_CTX $P6; | |
PUSH $P6, $P10; | |
CALL $P6; | |
$P6 = POP_ARG $P6; | |
PUSH $P8, $P6; | |
CALL $P8; | |
$P8 = POP_ARG $P8; | |
# Unhandled pasttype: macro | |
# free: 0 1 2 3 4 5 6 7 8 - alloc: - decl: | |
# invokecc_p P1 | |
# free: 0 1 2 3 4 5 8 7 6 - alloc: - decl: | |
# p := $P11 := $OP1 | |
# Unhandled pasttype: macro | |
# dest := := | |
$S7 = STR LOAD_CONST :[Parrot_pcc_get_signature]; | |
$P6 = STR LOOKUP $P10, $S7; | |
$P6 = PMC NEW_CTX $P6; | |
PUSH $P6, $P10; | |
$S5 = STR LOAD_CONST :[CURRENT_CONTEXT]; | |
$P8 = STR LOOKUP $P10, $S5; | |
$P8 = PMC NEW_CTX $P8; | |
PUSH $P8, $P10; | |
CALL $P8; | |
$P8 = POP_ARG $P8; | |
PUSH $P6, $P8; | |
CALL $P6; | |
$P6 = POP_ARG $P6; | |
# signature := $P6 := $P6 | |
$S8 = STR LOAD_CONST :[Parrot_pcc_set_pc]; | |
$P7 = STR LOOKUP $P10, $S8; | |
$P7 = PMC NEW_CTX $P7; | |
PUSH $P7, $P10; | |
$S4 = STR LOAD_CONST :[CURRENT_CONTEXT]; | |
$P5 = STR LOOKUP $P10, $S4; | |
$P5 = PMC NEW_CTX $P5; | |
PUSH $P5, $P10; | |
CALL $P5; | |
$P5 = POP_ARG $P5; | |
PUSH $P7, $P5; | |
# dest := | |
PUSH $P7, ; | |
CALL $P7; | |
$P7 = POP_ARG $P7; | |
# Unhandled pirop: ! | |
INT IF :l37; | |
INT GOTO :l38; | |
l37: INT NOOP; | |
$S8 = STR LOAD_CONST :[Parrot_pcc_set_object]; | |
$P7 = STR LOOKUP $P10, $S8; | |
$P7 = PMC NEW_CTX $P7; | |
PUSH $P7, $P10; | |
# signature := $P6 | |
PUSH $P7, $P6; | |
# Unhandled var: Capture[0x9c4fa50] | |
PUSH $P7, ; | |
CALL $P7; | |
$P7 = POP_ARG $P7; | |
38: INT NOOP; | |
# Unhandled pirop: arrow | |
# Unhandled var: Capture[0x9a632dc] | |
= ; | |
# Unhandled pirop: = | |
# dest := | |
$S8 = STR LOAD_CONST :[VTABLE_invoke]; | |
$P7 = STR LOOKUP $P10, $S8; | |
$P7 = PMC NEW_CTX $P7; | |
PUSH $P7, $P10; | |
# p := $OP1 | |
PUSH $P7, $OP1; | |
# dest := | |
PUSH $P7, ; | |
CALL $P7; | |
$P7 = POP_ARG $P7; | |
= $P7; | |
# Unhandled pirop: = | |
# Unhandled pasttype: macro | |
# free: 0 1 2 3 4 5 8 7 - alloc: - decl: 6 | |
# Dealloc 6 | |
# get_results_pc PMC_CONST(0), I0 | |
# free: 2 1 3 5 8 7 4 6 - alloc: 0 - decl: | |
# raw_params := $P0 := $P0 | |
# signature := PMC_CONST(0) := $OP1 | |
$S4 = STR LOAD_CONST :[CURRENT_CONTEXT]; | |
$P6 = STR LOOKUP $P10, $S4; | |
$P6 = PMC NEW_CTX $P6; | |
PUSH $P6, $P10; | |
CALL $P6; | |
$P6 = POP_ARG $P6; | |
# ctx := $P6 := $P6 | |
$S7 = STR LOAD_CONST :[Parrot_pcc_get_signature]; | |
$P4 = STR LOOKUP $P10, $S7; | |
$P4 = PMC NEW_CTX $P4; | |
PUSH $P4, $P10; | |
# ctx := $P6 | |
PUSH $P4, $P6; | |
CALL $P4; | |
$P4 = POP_ARG $P4; | |
# call_object := $P4 := $P4 | |
# argc := $I7 := $I7 | |
$S5 = STR LOAD_CONST :[Parrot_pcc_fill_params_from_op]; | |
$P8 = STR LOOKUP $P10, $S5; | |
$P8 = PMC NEW_CTX $P8; | |
PUSH $P8, $P10; | |
# call_object := $P4 | |
PUSH $P8, $P4; | |
# signature := $OP1 | |
PUSH $P8, $OP1; | |
# raw_params := $P0 | |
PUSH $P8, $P0; | |
$I3 = INT LOAD_IMM :8; | |
PUSH $P8, $I3; | |
CALL $P8; | |
$P8 = POP_ARG $P8; | |
$S5 = STR LOAD_CONST :[GETATTR_FixedIntegerArray_size]; | |
$P8 = STR LOOKUP $P10, $S5; | |
$P8 = PMC NEW_CTX $P8; | |
PUSH $P8, $P10; | |
# signature := $OP1 | |
PUSH $P8, $OP1; | |
# argc := $I7 | |
PUSH $P8, $I7; | |
CALL $P8; | |
$P8 = POP_ARG $P8; | |
$S5 = STR LOAD_CONST :[Parrot_pcc_set_signature]; | |
$P8 = STR LOOKUP $P10, $S5; | |
$P8 = PMC NEW_CTX $P8; | |
PUSH $P8, $P10; | |
$S1 = STR LOAD_CONST :[CURRENT_CONTEXT]; | |
$P3 = STR LOOKUP $P10, $S1; | |
$P3 = PMC NEW_CTX $P3; | |
PUSH $P3, $P10; | |
CALL $P3; | |
$P3 = POP_ARG $P3; | |
PUSH $P8, $P3; | |
# Unhandled var: Capture[0x9d1ff24] | |
PUSH $P8, ; | |
CALL $P8; | |
$P8 = POP_ARG $P8; | |
# Unhandled pasttype: macro | |
# free: 2 1 3 5 8 - alloc: 0 - decl: 6 4 7 | |
# Dealloc 0 | |
# Dealloc 6 | |
# Dealloc 4 | |
# Dealloc 7 | |
# add_i_i_i I3,I4,I0 | |
# free: 0 1 2 3 4 5 6 7 8 - alloc: - decl: | |
$I8 = INT ADD $I14, $I10; | |
$I13 = $I8; | |
# Unhandled pirop: = | |
# Unhandled pasttype: macro | |
# free: 0 1 2 3 4 5 6 7 8 - alloc: - decl: | |
L2: | |
# set_returns_pc PMC_CONST(0), I3 | |
# free: 2 1 3 5 8 7 6 4 - alloc: 0 - decl: | |
# raw_args := $P0 := $P0 | |
# signature := PMC_CONST(0) := $OP1 | |
$S6 = STR LOAD_CONST :[Parrot_pcc_build_sig_object_from_op]; | |
$P4 = STR LOOKUP $P10, $S6; | |
$P4 = PMC NEW_CTX $P4; | |
PUSH $P4, $P10; | |
$S8 = STR LOAD_CONST :[Parrot_pcc_get_signature]; | |
$P7 = STR LOOKUP $P10, $S8; | |
$P7 = PMC NEW_CTX $P7; | |
PUSH $P7, $P10; | |
$S3 = STR LOAD_CONST :[Parrot_pcc_get_caller_ctx]; | |
$P5 = STR LOOKUP $P10, $S3; | |
$P5 = PMC NEW_CTX $P5; | |
PUSH $P5, $P10; | |
$S2 = STR LOAD_CONST :[CURRENT_CONTEXT]; | |
$P1 = STR LOOKUP $P10, $S2; | |
$P1 = PMC NEW_CTX $P1; | |
PUSH $P1, $P10; | |
CALL $P1; | |
$P1 = POP_ARG $P1; | |
PUSH $P5, $P1; | |
CALL $P5; | |
$P5 = POP_ARG $P5; | |
PUSH $P7, $P5; | |
CALL $P7; | |
$P7 = POP_ARG $P7; | |
PUSH $P4, $P7; | |
# signature := $OP1 | |
PUSH $P4, $OP1; | |
# raw_args := $P0 | |
PUSH $P4, $P0; | |
CALL $P4; | |
$P4 = POP_ARG $P4; | |
# call_sig := $P4 := $P4 | |
# argc := $I6 := $I6 | |
$S8 = STR LOAD_CONST :[Parrot_pcc_set_signature]; | |
$P7 = STR LOOKUP $P10, $S8; | |
$P7 = PMC NEW_CTX $P7; | |
PUSH $P7, $P10; | |
$S3 = STR LOAD_CONST :[CURRENT_CONTEXT]; | |
$P5 = STR LOOKUP $P10, $S3; | |
$P5 = PMC NEW_CTX $P5; | |
PUSH $P5, $P10; | |
CALL $P5; | |
$P5 = POP_ARG $P5; | |
PUSH $P7, $P5; | |
# call_sig := $P4 | |
PUSH $P7, $P4; | |
CALL $P7; | |
$P7 = POP_ARG $P7; | |
$S8 = STR LOAD_CONST :[GETATTR_FixedIntegerArray_size]; | |
$P7 = STR LOOKUP $P10, $S8; | |
$P7 = PMC NEW_CTX $P7; | |
PUSH $P7, $P10; | |
# signature := $OP1 | |
PUSH $P7, $OP1; | |
# argc := $I6 | |
PUSH $P7, $I6; | |
CALL $P7; | |
$P7 = POP_ARG $P7; | |
# Unhandled pasttype: macro | |
# free: 2 1 3 5 8 7 - alloc: 0 - decl: 4 6 | |
# Dealloc 0 | |
# Dealloc 4 | |
# Dealloc 6 | |
.end; |
Sign up for free
to join this conversation on GitHub.
Already have an account?
Sign in to comment