Created
February 16, 2012 19:54
-
-
Save moritz/1847382 to your computer and use it in GitHub Desktop.
Generated code for class A { sub foo() { say 42 }; method bar() { foo() } }; A.bar
This file contains hidden or 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
.include 'cclass.pasm' | |
.include 'except_severity.pasm' | |
.include 'except_types.pasm' | |
.include 'iglobals.pasm' | |
.include 'interpinfo.pasm' | |
.include 'iterator.pasm' | |
.include 'sysinfo.pasm' | |
.include 'stat.pasm' | |
.include 'datatypes.pasm' | |
.HLL "perl6" | |
.namespace [] | |
.sub "_block1000" :anon :subid("15_1329421923.89192") | |
.annotate 'file', "-e" | |
.annotate 'line', 0 | |
.const 'Sub' $P1003 = "10_1329421923.89192" | |
capture_lex $P1003 | |
.annotate 'line', 1 | |
.annotate 'file', '-e' | |
.const 'Sub' $P1003 = "10_1329421923.89192" | |
capture_lex $P1003 | |
$P108 = $P1003() | |
.return ($P108) | |
.const 'Sub' $P1058 = "16_1329421923.89192" | |
.return ($P1058) | |
.end | |
.HLL "perl6" | |
.loadlib "nqp_group" | |
.loadlib "nqp_ops" | |
.loadlib "perl6_group" | |
.loadlib "perl6_ops" | |
.loadlib "bit_ops" | |
.loadlib "math_ops" | |
.loadlib "trans_ops" | |
.loadlib "io_ops" | |
.loadlib "obscure_ops" | |
.loadlib "os" | |
.loadlib "file" | |
.loadlib "sys_ops" | |
.loadlib "nqp_bigint_ops" | |
.loadlib "nqp_dyncall_ops" | |
.namespace [] | |
.sub "_block1002" :anon :subid("10_1329421923.89192") :outer("15_1329421923.89192") | |
.annotate 'file', "-e" | |
.annotate 'line', 1 | |
.const 'Sub' $P1014 = "11_1329421923.89192" | |
capture_lex $P1014 | |
.lex "GLOBALish", $P1004 | |
.lex "EXPORT", $P1005 | |
.lex "$?PACKAGE", $P1006 | |
.lex "::?PACKAGE", $P1007 | |
.lex "$_", $P1008 | |
.lex "$/", $P1009 | |
.lex "$!", $P1010 | |
.lex "A", $P1011 | |
.lex "$=POD", $P1012 | |
$P0 = find_dynamic_lex "$*CTXSAVE" | |
if null $P0 goto ctxsave_done | |
$I0 = can $P0, "ctxsave" | |
unless $I0 goto ctxsave_done | |
$P0."ctxsave"() | |
ctxsave_done: | |
nqp_get_sc_object $P100, "335544654AD9B76D56983D48BFBA8B985CBFD4CA", 20 | |
.const 'Sub' $P1014 = "11_1329421923.89192" | |
capture_lex $P1014 | |
$P1014() | |
nqp_get_sc_object $P107, "335544654AD9B76D56983D48BFBA8B985CBFD4CA", 8 | |
nqp_get_sc_object $P101, "335544654AD9B76D56983D48BFBA8B985CBFD4CA", 8 | |
$P102 = $P101."bar"() | |
perl6ize_type $P103, $P102 | |
.return ($P103) | |
.end | |
.HLL "perl6" | |
.namespace [] | |
.sub "" :load :init :subid("post17") :outer("10_1329421923.89192") | |
.annotate 'file', "-e" | |
.annotate 'line', 1 | |
.const 'Sub' $P1003 = "10_1329421923.89192" | |
.local pmc block | |
set block, $P1003 | |
nqp_get_sc $P101, "335544654AD9B76D56983D48BFBA8B985CBFD4CA" | |
isnull $I100, $P101 | |
if $I100, if_1040 | |
goto if_1040_end | |
if_1040: | |
nqp_dynop_setup | |
nqp_bigint_setup | |
nqp_native_call_setup | |
rakudo_dynop_setup | |
getinterp $P102 | |
get_class $P104, "LexPad" | |
get_class $P105, "Perl6LexPad" | |
$P102."hll_map"($P104, $P105) | |
nqp_create_sc $P106, "335544654AD9B76D56983D48BFBA8B985CBFD4CA" | |
.local pmc cur_sc | |
set cur_sc, $P106 | |
nqp_get_sc $P107, "__6MODEL_CORE__" | |
isnull $I101, $P107 | |
unless $I101, if_1041_end | |
set $S100, "Incorrect pre-compiled version of <unknown> loaded" | |
die $S100 | |
if_1041_end: | |
nqp_get_sc_object $P107, "__6MODEL_CORE__", 0 | |
$P108 = $P107."new_type"() | |
nqp_add_object_to_sc cur_sc, 2, $P108 | |
load_bytecode "ModuleLoader.pbc" | |
get_root_namespace $P107 | |
set $P108, $P107["nqp"] | |
set $P109, $P108["ModuleLoader"] | |
set $P110, $P109[1] | |
nqp_get_sc_object $P111, "335544654AD9B76D56983D48BFBA8B985CBFD4CA", 2 | |
$P110."load_module"("Perl6::ModuleLoader", $P111) | |
.const '' $P1042 = "15_1329421923.89192" | |
get_hll_global $P107, "ModuleLoader" | |
$P108 = $P107."load_setting"("CORE") | |
$P1042."set_outer_ctx"($P108) | |
nqp_get_sc $P107, "D767EAEFF8BB0CA95A01EDA9875E1BD454089DAE-1329418697.9541" | |
isnull $I101, $P107 | |
unless $I101, if_1043_end | |
set $S100, "Incorrect pre-compiled version of src/gen/Metamodel.pm loaded" | |
die $S100 | |
if_1043_end: | |
nqp_get_sc_object $P107, "D767EAEFF8BB0CA95A01EDA9875E1BD454089DAE-1329418697.9541", 33 | |
$P108 = $P107."new_type"("GLOBAL" :named("name")) | |
nqp_add_object_to_sc cur_sc, 3, $P108 | |
nqp_get_sc_object $P107, "335544654AD9B76D56983D48BFBA8B985CBFD4CA", 3 | |
get_how $P108, $P107 | |
nqp_get_sc_object $P109, "335544654AD9B76D56983D48BFBA8B985CBFD4CA", 3 | |
$P108."compose"($P109) | |
nqp_get_sc_object $P107, "D767EAEFF8BB0CA95A01EDA9875E1BD454089DAE-1329418697.9541", 33 | |
$P108 = $P107."new_type"("EXPORT" :named("name")) | |
nqp_add_object_to_sc cur_sc, 4, $P108 | |
nqp_get_sc_object $P107, "335544654AD9B76D56983D48BFBA8B985CBFD4CA", 4 | |
get_how $P108, $P107 | |
nqp_get_sc_object $P109, "335544654AD9B76D56983D48BFBA8B985CBFD4CA", 4 | |
$P108."compose"($P109) | |
nqp_get_sc_object $P107, "D767EAEFF8BB0CA95A01EDA9875E1BD454089DAE-1329418697.9541", 472 | |
repr_instance_of $P108, $P107 | |
nqp_add_object_to_sc cur_sc, 5, $P108 | |
.const 'LexInfo' $P1044 = "10_1329421923.89192" | |
nqp_get_sc_object $P109, "335544654AD9B76D56983D48BFBA8B985CBFD4CA", 5 | |
$P1044."set_static_lexpad"($P109) | |
nqp_get_sc_object $P107, "335544654AD9B76D56983D48BFBA8B985CBFD4CA", 5 | |
nqp_get_sc_object $P108, "335544654AD9B76D56983D48BFBA8B985CBFD4CA", 3 | |
$P107."add_static_value"("GLOBALish", $P108, 0, 0) | |
nqp_get_sc_object $P107, "335544654AD9B76D56983D48BFBA8B985CBFD4CA", 5 | |
nqp_get_sc_object $P108, "335544654AD9B76D56983D48BFBA8B985CBFD4CA", 4 | |
$P107."add_static_value"("EXPORT", $P108, 0, 0) | |
nqp_get_sc_object $P107, "335544654AD9B76D56983D48BFBA8B985CBFD4CA", 5 | |
nqp_get_sc_object $P108, "335544654AD9B76D56983D48BFBA8B985CBFD4CA", 3 | |
$P107."add_static_value"("$?PACKAGE", $P108, 0, 0) | |
nqp_get_sc_object $P107, "335544654AD9B76D56983D48BFBA8B985CBFD4CA", 5 | |
nqp_get_sc_object $P108, "335544654AD9B76D56983D48BFBA8B985CBFD4CA", 3 | |
$P107."add_static_value"("::?PACKAGE", $P108, 0, 0) | |
nqp_get_sc_object $P107, "D767EAEFF8BB0CA95A01EDA9875E1BD454089DAE-1329418697.9541", 511 | |
repr_instance_of $P108, $P107 | |
nqp_add_object_to_sc cur_sc, 6, $P108 | |
new $P109, "ResizablePMCArray" | |
nqp_get_sc_object $P110, "335544654AD9B76D56983D48BFBA8B985CBFD4CA", 6 | |
nqp_get_sc_object $P111, "D767EAEFF8BB0CA95A01EDA9875E1BD454089DAE-1329418697.9541", 511 | |
repr_bind_attr_obj $P110, $P111, "$!params", 0, $P109 | |
nqp_get_sc_object $P107, "D767EAEFF8BB0CA95A01EDA9875E1BD454089DAE-1329418697.9541", 514 | |
repr_instance_of $P108, $P107 | |
nqp_add_object_to_sc cur_sc, 7, $P108 | |
.const '' $P1045 = "10_1329421923.89192" | |
nqp_get_sc_object $P109, "335544654AD9B76D56983D48BFBA8B985CBFD4CA", 7 | |
nqp_get_sc_object $P110, "D767EAEFF8BB0CA95A01EDA9875E1BD454089DAE-1329418697.9541", 513 | |
repr_bind_attr_obj $P109, $P110, "$!do", 0, $P1045 | |
nqp_get_sc_object $P111, "335544654AD9B76D56983D48BFBA8B985CBFD4CA", 6 | |
nqp_get_sc_object $P112, "335544654AD9B76D56983D48BFBA8B985CBFD4CA", 7 | |
nqp_get_sc_object $P113, "D767EAEFF8BB0CA95A01EDA9875E1BD454089DAE-1329418697.9541", 513 | |
repr_bind_attr_obj $P112, $P113, "$!signature", 1, $P111 | |
.const '' $P1046 = "10_1329421923.89192" | |
nqp_get_sc_object $P114, "335544654AD9B76D56983D48BFBA8B985CBFD4CA", 7 | |
perl6_associate_sub_code_object $P1046, $P114 | |
nqp_get_sc_object $P107, "D767EAEFF8BB0CA95A01EDA9875E1BD454089DAE-1329418697.9541", 293 | |
$P108 = $P107."new_type"("A" :named("name")) | |
nqp_add_object_to_sc cur_sc, 8, $P108 | |
nqp_get_sc_object $P107, "335544654AD9B76D56983D48BFBA8B985CBFD4CA", 5 | |
nqp_get_sc_object $P108, "335544654AD9B76D56983D48BFBA8B985CBFD4CA", 8 | |
$P107."add_static_value"("A", $P108, 0, 0) | |
nqp_get_sc_object $P107, "335544654AD9B76D56983D48BFBA8B985CBFD4CA", 8 | |
nqp_get_sc_object $P108, "335544654AD9B76D56983D48BFBA8B985CBFD4CA", 3 | |
get_who $P109, $P108 | |
set $P109["A"], $P107 | |
nqp_get_sc_object $P107, "D767EAEFF8BB0CA95A01EDA9875E1BD454089DAE-1329418697.9541", 472 | |
repr_instance_of $P108, $P107 | |
nqp_add_object_to_sc cur_sc, 9, $P108 | |
.const 'LexInfo' $P1047 = "11_1329421923.89192" | |
nqp_get_sc_object $P109, "335544654AD9B76D56983D48BFBA8B985CBFD4CA", 9 | |
$P1047."set_static_lexpad"($P109) | |
nqp_get_sc_object $P107, "335544654AD9B76D56983D48BFBA8B985CBFD4CA", 9 | |
nqp_get_sc_object $P108, "335544654AD9B76D56983D48BFBA8B985CBFD4CA", 8 | |
$P107."add_static_value"("$?PACKAGE", $P108, 0, 0) | |
nqp_get_sc_object $P107, "335544654AD9B76D56983D48BFBA8B985CBFD4CA", 9 | |
nqp_get_sc_object $P108, "335544654AD9B76D56983D48BFBA8B985CBFD4CA", 8 | |
$P107."add_static_value"("::?PACKAGE", $P108, 0, 0) | |
nqp_get_sc_object $P107, "335544654AD9B76D56983D48BFBA8B985CBFD4CA", 9 | |
nqp_get_sc_object $P108, "335544654AD9B76D56983D48BFBA8B985CBFD4CA", 8 | |
$P107."add_static_value"("$?CLASS", $P108, 0, 0) | |
nqp_get_sc_object $P107, "335544654AD9B76D56983D48BFBA8B985CBFD4CA", 9 | |
nqp_get_sc_object $P108, "335544654AD9B76D56983D48BFBA8B985CBFD4CA", 8 | |
$P107."add_static_value"("::?CLASS", $P108, 0, 0) | |
nqp_get_sc_object $P107, "D767EAEFF8BB0CA95A01EDA9875E1BD454089DAE-1329418697.9541", 523 | |
repr_box_int $P108, 42, $P107 | |
nqp_add_object_to_sc cur_sc, 10, $P108 | |
nqp_get_sc_object $P107, "D767EAEFF8BB0CA95A01EDA9875E1BD454089DAE-1329418697.9541", 511 | |
repr_instance_of $P108, $P107 | |
nqp_add_object_to_sc cur_sc, 11, $P108 | |
new $P109, "ResizablePMCArray" | |
nqp_get_sc_object $P110, "335544654AD9B76D56983D48BFBA8B985CBFD4CA", 11 | |
nqp_get_sc_object $P111, "D767EAEFF8BB0CA95A01EDA9875E1BD454089DAE-1329418697.9541", 511 | |
repr_bind_attr_obj $P110, $P111, "$!params", 0, $P109 | |
nqp_get_sc_object $P107, "D767EAEFF8BB0CA95A01EDA9875E1BD454089DAE-1329418697.9541", 516 | |
repr_instance_of $P108, $P107 | |
nqp_add_object_to_sc cur_sc, 12, $P108 | |
.const '' $P1048 = "12_1329421923.89192" | |
nqp_get_sc_object $P109, "335544654AD9B76D56983D48BFBA8B985CBFD4CA", 12 | |
nqp_get_sc_object $P110, "D767EAEFF8BB0CA95A01EDA9875E1BD454089DAE-1329418697.9541", 513 | |
repr_bind_attr_obj $P109, $P110, "$!do", 0, $P1048 | |
nqp_get_sc_object $P111, "335544654AD9B76D56983D48BFBA8B985CBFD4CA", 11 | |
nqp_get_sc_object $P112, "335544654AD9B76D56983D48BFBA8B985CBFD4CA", 12 | |
nqp_get_sc_object $P113, "D767EAEFF8BB0CA95A01EDA9875E1BD454089DAE-1329418697.9541", 513 | |
repr_bind_attr_obj $P112, $P113, "$!signature", 1, $P111 | |
.const '' $P1049 = "12_1329421923.89192" | |
nqp_get_sc_object $P114, "335544654AD9B76D56983D48BFBA8B985CBFD4CA", 12 | |
perl6_associate_sub_code_object $P1049, $P114 | |
.const 'LexInfo' $P1050 = "12_1329421923.89192" | |
$P1050."set_fresh_magicals"() | |
nqp_get_sc_object $P107, "D767EAEFF8BB0CA95A01EDA9875E1BD454089DAE-1329418697.9541", 472 | |
repr_instance_of $P108, $P107 | |
nqp_add_object_to_sc cur_sc, 13, $P108 | |
.const 'LexInfo' $P1051 = "12_1329421923.89192" | |
nqp_get_sc_object $P109, "335544654AD9B76D56983D48BFBA8B985CBFD4CA", 13 | |
$P1051."set_static_lexpad"($P109) | |
nqp_get_sc_object $P107, "335544654AD9B76D56983D48BFBA8B985CBFD4CA", 13 | |
nqp_get_sc_object $P108, "335544654AD9B76D56983D48BFBA8B985CBFD4CA", 12 | |
$P107."add_static_value"("&?ROUTINE", $P108, 0, 0) | |
nqp_get_sc_object $P107, "335544654AD9B76D56983D48BFBA8B985CBFD4CA", 9 | |
nqp_get_sc_object $P108, "335544654AD9B76D56983D48BFBA8B985CBFD4CA", 12 | |
$P107."add_static_value"("&foo", $P108, 0, 0) | |
nqp_get_sc_object $P107, "D767EAEFF8BB0CA95A01EDA9875E1BD454089DAE-1329418697.9541", 512 | |
set $P1, $P107 | |
repr_instance_of $P108, $P1 | |
set $P0, $P108 | |
nqp_add_object_to_sc cur_sc, 14, $P0 | |
nqp_get_sc_object $P109, "335544654AD9B76D56983D48BFBA8B985CBFD4CA", 8 | |
repr_bind_attr_obj $P0, $P1, "$!nominal_type", -1, $P109 | |
repr_bind_attr_int $P0, $P1, "$!flags", -1, 192 | |
nqp_get_sc_object $P107, "D767EAEFF8BB0CA95A01EDA9875E1BD454089DAE-1329418697.9541", 462 | |
nqp_get_sc_object $P108, "D767EAEFF8BB0CA95A01EDA9875E1BD454089DAE-1329418697.9541", 505 | |
perl6_create_container_descriptor $P109, $P107, $P108, 0, "%_" | |
nqp_add_object_to_sc cur_sc, 15, $P109 | |
nqp_get_sc_object $P107, "D767EAEFF8BB0CA95A01EDA9875E1BD454089DAE-1329418697.9541", 512 | |
set $P1, $P107 | |
repr_instance_of $P108, $P1 | |
set $P0, $P108 | |
nqp_add_object_to_sc cur_sc, 16, $P0 | |
repr_bind_attr_str $P0, $P1, "$!variable_name", -1, "%_" | |
nqp_get_sc_object $P109, "D767EAEFF8BB0CA95A01EDA9875E1BD454089DAE-1329418697.9541", 505 | |
repr_bind_attr_obj $P0, $P1, "$!nominal_type", -1, $P109 | |
repr_bind_attr_int $P0, $P1, "$!flags", -1, 262288 | |
nqp_get_sc_object $P110, "335544654AD9B76D56983D48BFBA8B985CBFD4CA", 15 | |
repr_bind_attr_obj $P0, $P1, "$!container_descriptor", -1, $P110 | |
nqp_get_sc_object $P107, "D767EAEFF8BB0CA95A01EDA9875E1BD454089DAE-1329418697.9541", 511 | |
repr_instance_of $P108, $P107 | |
nqp_add_object_to_sc cur_sc, 17, $P108 | |
nqp_get_sc_object $P109, "335544654AD9B76D56983D48BFBA8B985CBFD4CA", 14 | |
nqp_get_sc_object $P110, "335544654AD9B76D56983D48BFBA8B985CBFD4CA", 16 | |
new $P111, "ResizablePMCArray" | |
push $P111, $P109 | |
push $P111, $P110 | |
nqp_get_sc_object $P112, "335544654AD9B76D56983D48BFBA8B985CBFD4CA", 17 | |
nqp_get_sc_object $P113, "D767EAEFF8BB0CA95A01EDA9875E1BD454089DAE-1329418697.9541", 511 | |
repr_bind_attr_obj $P112, $P113, "$!params", 0, $P111 | |
nqp_get_sc_object $P107, "D767EAEFF8BB0CA95A01EDA9875E1BD454089DAE-1329418697.9541", 472 | |
repr_instance_of $P108, $P107 | |
nqp_add_object_to_sc cur_sc, 18, $P108 | |
.const 'LexInfo' $P1052 = "13_1329421923.89192" | |
nqp_get_sc_object $P109, "335544654AD9B76D56983D48BFBA8B985CBFD4CA", 18 | |
$P1052."set_static_lexpad"($P109) | |
nqp_get_sc_object $P107, "335544654AD9B76D56983D48BFBA8B985CBFD4CA", 18 | |
nqp_get_sc_object $P108, "D767EAEFF8BB0CA95A01EDA9875E1BD454089DAE-1329418697.9541", 480 | |
$P107."add_static_value"("$*DISPATCHER", $P108, 0, 0) | |
nqp_get_sc_object $P107, "D767EAEFF8BB0CA95A01EDA9875E1BD454089DAE-1329418697.9541", 517 | |
repr_instance_of $P108, $P107 | |
nqp_add_object_to_sc cur_sc, 19, $P108 | |
.const '' $P1053 = "13_1329421923.89192" | |
nqp_get_sc_object $P109, "335544654AD9B76D56983D48BFBA8B985CBFD4CA", 19 | |
nqp_get_sc_object $P110, "D767EAEFF8BB0CA95A01EDA9875E1BD454089DAE-1329418697.9541", 513 | |
repr_bind_attr_obj $P109, $P110, "$!do", 0, $P1053 | |
nqp_get_sc_object $P111, "335544654AD9B76D56983D48BFBA8B985CBFD4CA", 17 | |
nqp_get_sc_object $P112, "335544654AD9B76D56983D48BFBA8B985CBFD4CA", 19 | |
nqp_get_sc_object $P113, "D767EAEFF8BB0CA95A01EDA9875E1BD454089DAE-1329418697.9541", 513 | |
repr_bind_attr_obj $P112, $P113, "$!signature", 1, $P111 | |
.const '' $P1054 = "13_1329421923.89192" | |
nqp_get_sc_object $P114, "335544654AD9B76D56983D48BFBA8B985CBFD4CA", 19 | |
perl6_associate_sub_code_object $P1054, $P114 | |
.const 'LexInfo' $P1055 = "13_1329421923.89192" | |
$P1055."set_fresh_magicals"() | |
nqp_get_sc_object $P107, "335544654AD9B76D56983D48BFBA8B985CBFD4CA", 18 | |
nqp_get_sc_object $P108, "335544654AD9B76D56983D48BFBA8B985CBFD4CA", 19 | |
$P107."add_static_value"("&?ROUTINE", $P108, 0, 0) | |
nqp_get_sc_object $P107, "335544654AD9B76D56983D48BFBA8B985CBFD4CA", 8 | |
get_how $P108, $P107 | |
nqp_get_sc_object $P109, "335544654AD9B76D56983D48BFBA8B985CBFD4CA", 8 | |
nqp_get_sc_object $P110, "335544654AD9B76D56983D48BFBA8B985CBFD4CA", 19 | |
$P108."add_method"($P109, "bar", $P110) | |
nqp_get_sc_object $P107, "335544654AD9B76D56983D48BFBA8B985CBFD4CA", 8 | |
get_how $P108, $P107 | |
nqp_get_sc_object $P109, "335544654AD9B76D56983D48BFBA8B985CBFD4CA", 8 | |
$P108."compose"($P109) | |
nqp_get_sc_object $P107, "D767EAEFF8BB0CA95A01EDA9875E1BD454089DAE-1329418697.9541", 530 | |
$P108 = $P107."new"() | |
nqp_add_object_to_sc cur_sc, 20, $P108 | |
nqp_get_sc_object $P107, "335544654AD9B76D56983D48BFBA8B985CBFD4CA", 5 | |
nqp_get_sc_object $P108, "335544654AD9B76D56983D48BFBA8B985CBFD4CA", 20 | |
$P107."add_static_value"("$=POD", $P108, 0, 0) | |
if_1040_end: | |
nqp_get_sc_object $P107, "335544654AD9B76D56983D48BFBA8B985CBFD4CA", 3 | |
set_hll_global "GLOBAL", $P107 | |
.const 'LexInfo' $P1056 = "10_1329421923.89192" | |
$P1056."set_fresh_magicals"() | |
.end | |
.HLL "perl6" | |
.namespace [] | |
.sub "_block1013" :anon :subid("11_1329421923.89192") :outer("10_1329421923.89192") | |
.annotate 'file', "-e" | |
.annotate 'line', 1 | |
.const 'Sub' $P1030 = "13_1329421923.89192" | |
capture_lex $P1030 | |
.const 'Sub' $P1020 = "12_1329421923.89192" | |
capture_lex $P1020 | |
.lex "$?PACKAGE", $P1015 | |
.lex "::?PACKAGE", $P1016 | |
.lex "$?CLASS", $P1017 | |
.lex "::?CLASS", $P1018 | |
.lex "$_", $P1019 | |
.lex "&foo", $P1028 | |
find_lex $P101, "&foo" | |
$P102 = $P101."clone"() | |
.local pmc sink_14 | |
set sink_14, $P102 | |
set $S100, "sink" | |
can $I100, sink_14, $S100 | |
unless $I100, if_1029_end | |
sink_14."sink"() | |
if_1029_end: | |
$P103 = "&infix:<,>"() | |
store_lex "&foo", $P103 | |
nqp_get_sc_object $P107, "335544654AD9B76D56983D48BFBA8B985CBFD4CA", 19 | |
$P108 = $P107."clone"() | |
perl6_capture_lex $P108 | |
.return ($P108) | |
.end | |
.HLL "perl6" | |
.namespace [] | |
.sub "foo" :anon :subid("12_1329421923.89192") :outer("11_1329421923.89192") | |
.param pmc param_1024 :call_sig | |
.annotate 'file', "-e" | |
.annotate 'line', 1 | |
perl6_take_dispatcher | |
.lex "$_", $P1021 | |
.lex "$/", $P1022 | |
.lex "$!", $P1023 | |
.lex "call_sig", param_1024 | |
bind_signature | |
.lex "$*DISPATCHER", $P1025 | |
.lex "&?ROUTINE", $P1026 | |
root_new $P1027, ['parrot';'Continuation'] | |
set_label $P1027, lexotic_18 | |
.lex "RETURN", $P1027 | |
nqp_get_sc_object $P101, "335544654AD9B76D56983D48BFBA8B985CBFD4CA", 10 | |
$P102 = "&say"($P101) | |
perl6_decontainerize_return_value $P101, $P102 | |
goto lexotic_19 | |
lexotic_18: | |
.get_results ($P101) | |
lexotic_19: | |
find_lex $P103, "&EXHAUST" | |
store_lex "RETURN", $P103 | |
perl6_type_check_return_value $P101 | |
.return ($P101) | |
.end | |
.HLL "perl6" | |
.namespace [] | |
.sub "bar" :anon :subid("13_1329421923.89192") :outer("11_1329421923.89192") | |
.param pmc param_1036 :call_sig | |
.annotate 'file', "-e" | |
.annotate 'line', 1 | |
perl6_take_dispatcher | |
.lex "self", $P1031 | |
.lex "%_", $P1032 | |
.lex "$_", $P1033 | |
.lex "$/", $P1034 | |
.lex "$!", $P1035 | |
.lex "call_sig", param_1036 | |
bind_signature | |
.lex "$*DISPATCHER", $P1037 | |
.lex "&?ROUTINE", $P1038 | |
root_new $P1039, ['parrot';'Continuation'] | |
set_label $P1039, lexotic_20 | |
.lex "RETURN", $P1039 | |
$P104 = "&foo"() | |
perl6_decontainerize_return_value $P105, $P104 | |
goto lexotic_21 | |
lexotic_20: | |
.get_results ($P105) | |
lexotic_21: | |
find_lex $P106, "&EXHAUST" | |
store_lex "RETURN", $P106 | |
perl6_type_check_return_value $P105 | |
.return ($P105) | |
.end | |
.HLL "perl6" | |
.namespace [] | |
.sub "_block1057" :load :anon :subid("16_1329421923.89192") | |
.annotate 'file', "-e" | |
.annotate 'line', 1 | |
.const '' $P1059 = "15_1329421923.89192" | |
$P109 = $P1059() | |
.return ($P109) | |
.end | |
Sign up for free
to join this conversation on GitHub.
Already have an account?
Sign in to comment