.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 "" :subid("cuid_72_1372810463.03146") :anon :lex
.annotate 'file', "lib/Test.pm"
.annotate 'line', 1
    .const 'Sub' $P5003 = 'cuid_1_1372810463.03146' 
    capture_lex $P5003 
    .const 'Sub' $P5001 = 'cuid_1_1372810463.03146' 
    capture_lex $P5001
    $P5002 = $P5001()
    .return ($P5002) 
.end
.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"
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_1_1372810463.03146") :anon :lex :outer("cuid_72_1372810463.03146")
.annotate 'file', "lib/Test.pm"
.annotate 'line', 1
    .const 'Sub' $P5007 = 'cuid_2_1372810463.03146' 
    capture_lex $P5007 
    .lex "GLOBALish", $P101 
    .lex "EXPORT", $P102 
    .lex "$?PACKAGE", $P103 
    .lex "::?PACKAGE", $P104 
    .lex "$_", $P105 
    .lex "$/", $P106 
    .lex "$!", $P107 
    .lex "Test", $P108 
    .lex "$=pod", $P109 
    .lex "!UNIT_MARKER", $P110 
    .local pmc ctxsave 
    find_dynamic_lex $P5004, "@*END_PHASERS"
    nqp_get_sc_object $P5005, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 371
    $P5004."unshift"($P5005)
    find_dynamic_lex $P5006, "$*CTXSAVE"
    set ctxsave, $P5006
    isnull $I5001, ctxsave
    if $I5001 goto unless10_end11 
    can $I5002, ctxsave, "ctxsave"
    perl6_box_int $P5009, $I5002
    set $P5008, $P5009
    unless $I5002 goto if11_end13 
    $P5007 = ctxsave."ctxsave"()
    set $P5008, $P5007
  if11_end13:
  unless10_end11:
    nqp_get_sc_object $P5006, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 377
    .const 'Sub' $P5007 = 'cuid_2_1372810463.03146' 
    capture_lex $P5007
    $P5008 = $P5007()
    nqp_get_sc_object $P5009, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 4
    .return ($P5009) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_2_1372810463.03146") :anon :lex :outer("cuid_1_1372810463.03146")
.annotate 'file', "lib/Test.pm"
.annotate 'line', 1
    .const 'Sub' $P5052 = 'cuid_3_1372810463.03146' 
    capture_lex $P5052 
    .const 'Sub' $P5052 = 'cuid_6_1372810463.03146' 
    capture_lex $P5052 
    .const 'Sub' $P5052 = 'cuid_7_1372810463.03146' 
    capture_lex $P5052 
    .const 'Sub' $P5052 = 'cuid_8_1372810463.03146' 
    capture_lex $P5052 
    .const 'Sub' $P5052 = 'cuid_9_1372810463.03146' 
    capture_lex $P5052 
    .const 'Sub' $P5052 = 'cuid_10_1372810463.03146' 
    capture_lex $P5052 
    .const 'Sub' $P5052 = 'cuid_11_1372810463.03146' 
    capture_lex $P5052 
    .const 'Sub' $P5052 = 'cuid_12_1372810463.03146' 
    capture_lex $P5052 
    .const 'Sub' $P5052 = 'cuid_13_1372810463.03146' 
    capture_lex $P5052 
    .const 'Sub' $P5052 = 'cuid_14_1372810463.03146' 
    capture_lex $P5052 
    .const 'Sub' $P5052 = 'cuid_16_1372810463.03146' 
    capture_lex $P5052 
    .const 'Sub' $P5052 = 'cuid_17_1372810463.03146' 
    capture_lex $P5052 
    .const 'Sub' $P5052 = 'cuid_18_1372810463.03146' 
    capture_lex $P5052 
    .const 'Sub' $P5052 = 'cuid_19_1372810463.03146' 
    capture_lex $P5052 
    .const 'Sub' $P5052 = 'cuid_21_1372810463.03146' 
    capture_lex $P5052 
    .const 'Sub' $P5052 = 'cuid_22_1372810463.03146' 
    capture_lex $P5052 
    .const 'Sub' $P5052 = 'cuid_23_1372810463.03146' 
    capture_lex $P5052 
    .const 'Sub' $P5052 = 'cuid_24_1372810463.03146' 
    capture_lex $P5052 
    .const 'Sub' $P5052 = 'cuid_25_1372810463.03146' 
    capture_lex $P5052 
    .const 'Sub' $P5052 = 'cuid_26_1372810463.03146' 
    capture_lex $P5052 
    .const 'Sub' $P5052 = 'cuid_28_1372810463.03146' 
    capture_lex $P5052 
    .const 'Sub' $P5052 = 'cuid_30_1372810463.03146' 
    capture_lex $P5052 
    .const 'Sub' $P5052 = 'cuid_31_1372810463.03146' 
    capture_lex $P5052 
    .const 'Sub' $P5052 = 'cuid_32_1372810463.03146' 
    capture_lex $P5052 
    .const 'Sub' $P5052 = 'cuid_34_1372810463.03146' 
    capture_lex $P5052 
    .const 'Sub' $P5052 = 'cuid_35_1372810463.03146' 
    capture_lex $P5052 
    .const 'Sub' $P5052 = 'cuid_36_1372810463.03146' 
    capture_lex $P5052 
    .const 'Sub' $P5052 = 'cuid_39_1372810463.03146' 
    capture_lex $P5052 
    .const 'Sub' $P5052 = 'cuid_41_1372810463.03146' 
    capture_lex $P5052 
    .const 'Sub' $P5052 = 'cuid_42_1372810463.03146' 
    capture_lex $P5052 
    .const 'Sub' $P5052 = 'cuid_43_1372810463.03146' 
    capture_lex $P5052 
    .const 'Sub' $P5052 = 'cuid_47_1372810463.03146' 
    capture_lex $P5052 
    .const 'Sub' $P5052 = 'cuid_48_1372810463.03146' 
    capture_lex $P5052 
    .const 'Sub' $P5052 = 'cuid_49_1372810463.03146' 
    capture_lex $P5052 
    .const 'Sub' $P5052 = 'cuid_50_1372810463.03146' 
    capture_lex $P5052 
    .const 'Sub' $P5052 = 'cuid_55_1372810463.03146' 
    capture_lex $P5052 
    .const 'Sub' $P5052 = 'cuid_56_1372810463.03146' 
    capture_lex $P5052 
    .const 'Sub' $P5052 = 'cuid_58_1372810463.03146' 
    capture_lex $P5052 
    .const 'Sub' $P5052 = 'cuid_64_1372810463.03146' 
    capture_lex $P5052 
    .const 'Sub' $P5052 = 'cuid_65_1372810463.03146' 
    capture_lex $P5052 
    .const 'Sub' $P5052 = 'cuid_69_1372810463.03146' 
    capture_lex $P5052 
    .const 'Sub' $P5052 = 'cuid_71_1372810463.03146' 
    capture_lex $P5052 
    .lex "$?PACKAGE", $P101 
    .lex "::?PACKAGE", $P102 
    .lex "$_", $P103 
    .lex "$num_of_tests_run", $P104 
    .lex "$num_of_tests_failed", $P105 
    .lex "$todo_upto_test_num", $P106 
    .lex "$todo_reason", $P107 
    .lex "$num_of_tests_planned", $P108 
    .lex "$no_plan", $P109 
    .lex "$die_on_fail", $P110 
    .lex "$perl6_test_times", $P111 
    .lex "$time_before", $P112 
    .lex "$time_after", $P113 
    .lex "$done_testing_has_been_run", $P114 
    .lex "&die_on_fail", $P115 
    .lex "&plan", $P116 
    .lex "&pass", $P117 
    .lex "&ok", $P118 
    .lex "&nok", $P119 
    .lex "&is", $P120 
    .lex "&isnt", $P121 
    .lex "&is_approx", $P122 
    .lex "&todo", $P123 
    .lex "&skip", $P124 
    .lex "&skip_rest", $P125 
    .lex "&diag", $P126 
    .lex "&flunk", $P127 
    .lex "&isa_ok", $P128 
    .lex "&dies_ok", $P129 
    .lex "&lives_ok", $P130 
    .lex "&eval_dies_ok", $P131 
    .lex "&eval_lives_ok", $P132 
    .lex "&is_deeply", $P133 
    .lex "&_is_deeply", $P134 
    .lex "&eval_exception", $P135 
    .lex "&proclaim", $P136 
    .lex "&done_testing", $P137 
    .lex "&done", $P138 
    .const 'Sub' $P5002 = 'cuid_3_1372810463.03146' 
    capture_lex $P5002
    $P5002 = $P115."clone"()
    set $P115, $P5002
    .const 'Sub' $P5003 = 'cuid_6_1372810463.03146' 
    capture_lex $P5003
    .const 'Sub' $P5003 = 'cuid_7_1372810463.03146' 
    capture_lex $P5003
    $P5003 = $P116."clone"()
    set $P116, $P5003
    .const 'Sub' $P5004 = 'cuid_8_1372810463.03146' 
    capture_lex $P5004
    .const 'Sub' $P5004 = 'cuid_9_1372810463.03146' 
    capture_lex $P5004
    $P5004 = $P117."clone"()
    set $P117, $P5004
    .const 'Sub' $P5005 = 'cuid_10_1372810463.03146' 
    capture_lex $P5005
    .const 'Sub' $P5005 = 'cuid_11_1372810463.03146' 
    capture_lex $P5005
    $P5005 = $P118."clone"()
    set $P118, $P5005
    .const 'Sub' $P5006 = 'cuid_12_1372810463.03146' 
    capture_lex $P5006
    .const 'Sub' $P5006 = 'cuid_13_1372810463.03146' 
    capture_lex $P5006
    $P5006 = $P119."clone"()
    set $P119, $P5006
    .const 'Sub' $P5007 = 'cuid_14_1372810463.03146' 
    capture_lex $P5007
    .const 'Sub' $P5007 = 'cuid_16_1372810463.03146' 
    capture_lex $P5007
    $P5007 = $P120."clone"()
    set $P120, $P5007
    .const 'Sub' $P5008 = 'cuid_17_1372810463.03146' 
    capture_lex $P5008
    .const 'Sub' $P5008 = 'cuid_18_1372810463.03146' 
    capture_lex $P5008
    $P5008 = $P121."clone"()
    set $P121, $P5008
    .const 'Sub' $P5009 = 'cuid_19_1372810463.03146' 
    capture_lex $P5009
    .const 'Sub' $P5009 = 'cuid_21_1372810463.03146' 
    capture_lex $P5009
    $P5009 = $P122."clone"()
    set $P122, $P5009
    .const 'Sub' $P5010 = 'cuid_22_1372810463.03146' 
    capture_lex $P5010
    .const 'Sub' $P5010 = 'cuid_23_1372810463.03146' 
    capture_lex $P5010
    $P5010 = $P123."clone"()
    set $P123, $P5010
    .const 'Sub' $P5011 = 'cuid_24_1372810463.03146' 
    capture_lex $P5011
    .const 'Sub' $P5011 = 'cuid_25_1372810463.03146' 
    capture_lex $P5011
    $P5011 = $P124."clone"()
    set $P124, $P5011
    .const 'Sub' $P5012 = 'cuid_26_1372810463.03146' 
    capture_lex $P5012
    .const 'Sub' $P5012 = 'cuid_28_1372810463.03146' 
    capture_lex $P5012
    $P5012 = $P125."clone"()
    set $P125, $P5012
    .const 'Sub' $P5013 = 'cuid_30_1372810463.03146' 
    capture_lex $P5013
    $P5013 = $P126."clone"()
    set $P126, $P5013
    .const 'Sub' $P5014 = 'cuid_31_1372810463.03146' 
    capture_lex $P5014
    .const 'Sub' $P5014 = 'cuid_32_1372810463.03146' 
    capture_lex $P5014
    $P5014 = $P127."clone"()
    set $P127, $P5014
    .const 'Sub' $P5015 = 'cuid_34_1372810463.03146' 
    capture_lex $P5015
    .const 'Sub' $P5015 = 'cuid_35_1372810463.03146' 
    capture_lex $P5015
    $P5015 = $P128."clone"()
    set $P128, $P5015
    .const 'Sub' $P5016 = 'cuid_36_1372810463.03146' 
    capture_lex $P5016
    .const 'Sub' $P5016 = 'cuid_39_1372810463.03146' 
    capture_lex $P5016
    $P5016 = $P129."clone"()
    set $P129, $P5016
    .const 'Sub' $P5017 = 'cuid_41_1372810463.03146' 
    capture_lex $P5017
    .const 'Sub' $P5017 = 'cuid_42_1372810463.03146' 
    capture_lex $P5017
    $P5017 = $P130."clone"()
    set $P130, $P5017
    .const 'Sub' $P5018 = 'cuid_43_1372810463.03146' 
    capture_lex $P5018
    .const 'Sub' $P5018 = 'cuid_47_1372810463.03146' 
    capture_lex $P5018
    $P5018 = $P131."clone"()
    set $P131, $P5018
    .const 'Sub' $P5019 = 'cuid_48_1372810463.03146' 
    capture_lex $P5019
    .const 'Sub' $P5019 = 'cuid_49_1372810463.03146' 
    capture_lex $P5019
    $P5019 = $P132."clone"()
    set $P132, $P5019
    .const 'Sub' $P5020 = 'cuid_50_1372810463.03146' 
    capture_lex $P5020
    .const 'Sub' $P5020 = 'cuid_55_1372810463.03146' 
    capture_lex $P5020
    $P5020 = $P133."clone"()
    set $P133, $P5020
    .const 'Sub' $P5021 = 'cuid_56_1372810463.03146' 
    capture_lex $P5021
    $P5021 = $P134."clone"()
    set $P134, $P5021
    .const 'Sub' $P5022 = 'cuid_58_1372810463.03146' 
    capture_lex $P5022
    $P5022 = $P135."clone"()
    set $P135, $P5022
    .const 'Sub' $P5023 = 'cuid_64_1372810463.03146' 
    capture_lex $P5023
    $P5023 = $P136."clone"()
    set $P136, $P5023
    .const 'Sub' $P5024 = 'cuid_65_1372810463.03146' 
    capture_lex $P5024
    $P5024 = $P137."clone"()
    set $P137, $P5024
    .const 'Sub' $P5025 = 'cuid_69_1372810463.03146' 
    capture_lex $P5025
    $P5025 = $P138."clone"()
    set $P138, $P5025
    .const 'Sub' $P5026 = 'cuid_71_1372810463.03146' 
    capture_lex $P5026
.annotate 'line', 8
    nqp_get_sc_object $P5027, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 7
    perl6_container_store $P104, $P5027
.annotate 'line', 9

    nqp_get_sc_object $P5027, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 7
    perl6_container_store $P105, $P5027
.annotate 'line', 10

    nqp_get_sc_object $P5027, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 7
    perl6_container_store $P106, $P5027
.annotate 'line', 11

    nqp_get_sc_object $P5027, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 11
    perl6_container_store $P107, $P5027
.annotate 'line', 13

    nqp_get_sc_object $P5027, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 14
    perl6_container_store $P109, $P5027
.annotate 'line', 15

    nqp_get_sc_object $P5030, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 17
    $P5031 = "&DYNAMIC"($P5030)
    nqp_get_sc_object $P5032, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 18
    $P5033 = $P5031."postcircumfix:<{ }>"($P5032)
    perl6ize_type $P5029, $P5033
    find_lex $P5028, "&prefix:<?>"
    perl6_multi_dispatch_thunk $P5027, $P5028
    $P5034 = $P5027($P5029)
    perl6_container_store $P111, $P5034
.annotate 'line', 22

    nqp_get_sc_object $P5027, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 7
    perl6_container_store $P114, $P5027
    null $P5027
    null $P5028
    null $P5029
    null $P5030
    null $P5031
    null $P5032
    null $P5033
    null $P5034
    null $P5035
    null $P5036
    null $P5037
    null $P5038
    null $P5039
    null $P5040
    null $P5041
    null $P5042
    null $P5043
    null $P5044
    null $P5045
    null $P5046
    null $P5047
    null $P5048
    null $P5049
    null $P5050
    null $P5051
    find_lex $P5052, "Nil"
    .return ($P5052) 
.end
.HLL "perl6"
.namespace []
.sub "die_on_fail" :subid("cuid_3_1372810463.03146") :anon :lex :outer("cuid_2_1372810463.03146")
.annotate 'file', "lib/Test.pm"
.annotate 'line', 28
    .param pmc CALL_SIG :call_sig 
    .lex "$fail", $P101 
    .lex "$_", $P102 
    .lex "$/", $P103 
    .lex "$!", $P104 
    .lex "call_sig", $P105 
    .lex "$*DISPATCHER", $P106 
    .lex "&?ROUTINE", $P107 
    perl6_take_dispatcher 
    set $P5004, CALL_SIG
    set $P105, $P5004
    bind_signature 
.annotate 'line', 29
    find_lex $P5007, "$die_on_fail"
    perl6_container_store $P5007, $P101
    perl6_decontainerize_return_value $P5006, $P5007
    nqp_get_sc_object $P5007, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 22
    perl6_type_check_return_value $P5006, $P5007
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "plan" :subid("cuid_6_1372810463.03146") :anon :lex :outer("cuid_2_1372810463.03146")
.annotate 'file', "lib/Test.pm"
.annotate 'line', 34
    .param pmc CALL_SIG :call_sig 
    .const 'Sub' $P5008 = 'cuid_4_1372810463.03146' 
    capture_lex $P5008 
    .const 'Sub' $P5008 = 'cuid_5_1372810463.03146' 
    capture_lex $P5008 
    .lex "$number_of_tests", $P101 
    .lex "$_", $P102 
    .lex "$/", $P103 
    .lex "$!", $P104 
    .lex "call_sig", $P105 
    .lex "$*DISPATCHER", $P106 
    .lex "&?ROUTINE", $P107 
    .local pmc old_topic_1 
    .local pmc sm_result_1 
    perl6_take_dispatcher 
    set $P5004, CALL_SIG
    set $P105, $P5004
    bind_signature 
    root_new $P108, ['parrot';'Continuation']
    set_label $P108, lexotic_14
    .lex "RETURN", $P108
    find_lex $P5006, "$_"
    set old_topic_1, $P5006
.annotate 'line', 35

    store_lex "$_", $P101
    nqp_get_sc_object $P5007, "5C7C172868FA9510BA84BFF074E73D635E54D9D3", 7
    find_lex $P5008, "$_"
    $P5009 = $P5007."ACCEPTS"($P5008)
    set sm_result_1, $P5009
    store_lex "$_", old_topic_1
    unless sm_result_1 goto if12_else16 
    .const 'Sub' $P5006 = 'cuid_4_1372810463.03146' 
    capture_lex $P5006
    $P5007 = $P5006()
    goto if12_end17
  if12_else16:
    .const 'Sub' $P5008 = 'cuid_5_1372810463.03146' 
    capture_lex $P5008
    $P5009 = $P5008()
  if12_end17:
.annotate 'line', 49
    find_lex $P5006, "$time_before"
    time $N5001
    perl6_box_num $P5007, $N5001
    perl6_container_store $P5006, $P5007
.annotate 'line', 50
    find_lex $P5006, "$time_after"
    time $N5001
    perl6_box_num $P5007, $N5001
    perl6_container_store $P5006, $P5007
.annotate 'line', 53
    find_lex $P5006, "$perl6_test_times"
    unless $P5006 goto if13_else18 
.annotate 'line', 51
.annotate 'line', 52
.annotate 'line', 51
    nqp_get_sc_object $P5011, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 33
.annotate 'line', 52
    find_lex $P5018, "$time_after"
    find_lex $P5019, "$time_before"
    find_lex $P5017, "&infix:<->"
    perl6_multi_dispatch_thunk $P5016, $P5017
    $P5020 = $P5016($P5018, $P5019)
    nqp_get_sc_object $P5021, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 34
    find_lex $P5015, "&infix:<*>"
    perl6_multi_dispatch_thunk $P5014, $P5015
    $P5022 = $P5014($P5020, $P5021)
    find_lex $P5013, "&ceiling"
    perl6_multi_dispatch_thunk $P5012, $P5013
    $P5023 = $P5012($P5022)
    find_lex $P5010, "&infix:<~>"
    perl6_multi_dispatch_thunk $P5009, $P5010
    $P5024 = $P5009($P5011, $P5023)
    nqp_get_sc_object $P5025, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 35
    find_lex $P5008, "&infix:<~>"
    perl6_multi_dispatch_thunk $P5007, $P5008
    $P5026 = $P5007($P5024, $P5025)
    $P5027 = "&say"($P5026)
    goto if13_end19
  if13_else18:
    find_lex $P5028, "Nil"
  if13_end19:
.annotate 'line', 55
    find_lex $P5006, "$time_before"
    time $N5001
    perl6_box_num $P5007, $N5001
    perl6_container_store $P5006, $P5007
    perl6_decontainerize_return_value $P5005, $P5006
    goto lexotic_15
  lexotic_14:
    .get_results ($P5005)
  lexotic_15:
    find_lex $P5006, "&EXHAUST"
    store_lex "RETURN", $P5006
    nqp_get_sc_object $P5007, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 27
    perl6_type_check_return_value $P5005, $P5007
    .return ($P5005) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_4_1372810463.03146") :anon :lex :outer("cuid_6_1372810463.03146")
.annotate 'file', "lib/Test.pm"
.annotate 'line', 35
    .param pmc CALL_SIG :call_sig 
    .lex "$_", $P101 
    .lex "call_sig", $P102 
    .lex "$*DISPATCHER", $P103 
    perl6_take_dispatcher 
    set $P5002, CALL_SIG
    set $P102, $P5002
    bind_signature 
.annotate 'line', 36
    find_lex $P5004, "$no_plan"
    nqp_get_sc_object $P5005, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 14
    perl6_container_store $P5004, $P5005
    .return ($P5004) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_5_1372810463.03146") :anon :lex :outer("cuid_6_1372810463.03146")
.annotate 'file', "lib/Test.pm"
.annotate 'line', 38
    .param pmc CALL_SIG :call_sig 
    .lex "$_", $P101 
    .lex "call_sig", $P102 
    .lex "$*DISPATCHER", $P103 
    perl6_take_dispatcher 
    set $P5002, CALL_SIG
    set $P102, $P5002
    bind_signature 
.annotate 'line', 39
    find_lex $P5004, "$num_of_tests_planned"
    find_lex $P5005, "$number_of_tests"
    perl6_container_store $P5004, $P5005
.annotate 'line', 40
    find_lex $P5004, "$no_plan"
    nqp_get_sc_object $P5005, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 7
    perl6_container_store $P5004, $P5005
.annotate 'line', 42
    nqp_get_sc_object $P5006, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 31
    find_lex $P5007, "$number_of_tests"
    find_lex $P5005, "&infix:<~>"
    perl6_multi_dispatch_thunk $P5004, $P5005
    $P5008 = $P5004($P5006, $P5007)
    $P5009 = "&say"($P5008)
    .return ($P5009) 
.end
.HLL "perl6"
.namespace []
.sub "plan" :subid("cuid_7_1372810463.03146") :anon :lex :outer("cuid_2_1372810463.03146")
.annotate 'file', "lib/Test.pm"
.annotate 'line', 34
    .param pmc CALL_SIG :call_sig 
    .lex "call_sig", $P101 
    set $P5001, CALL_SIG
    set $P101, $P5001
    bind_signature 
    perl6_enter_multi_dispatch_from_onlystar_block $P5002
    .return ($P5002) 
.end
.HLL "perl6"
.namespace []
.sub "pass" :subid("cuid_8_1372810463.03146") :anon :lex :outer("cuid_2_1372810463.03146")
.annotate 'file', "lib/Test.pm"
.annotate 'line', 58
    .param pmc CALL_SIG :call_sig 
    .lex "$desc", $P101 
    .lex "$_", $P102 
    .lex "$/", $P103 
    .lex "$!", $P104 
    .lex "call_sig", $P105 
    .lex "$*DISPATCHER", $P106 
    .lex "&?ROUTINE", $P107 
    perl6_take_dispatcher 
    set $P5004, CALL_SIG
    set $P105, $P5004
    bind_signature 
    root_new $P108, ['parrot';'Continuation']
    set_label $P108, lexotic_20
    .lex "RETURN", $P108
.annotate 'line', 59
    find_lex $P5006, "$time_after"
    time $N5001
    perl6_box_num $P5007, $N5001
    perl6_container_store $P5006, $P5007
.annotate 'line', 60
    nqp_get_sc_object $P5006, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 14
    "&proclaim"($P5006, $P101)
.annotate 'line', 61
    find_lex $P5006, "$time_before"
    time $N5001
    perl6_box_num $P5007, $N5001
    perl6_container_store $P5006, $P5007
    perl6_decontainerize_return_value $P5005, $P5006
    goto lexotic_21
  lexotic_20:
    .get_results ($P5005)
  lexotic_21:
    find_lex $P5006, "&EXHAUST"
    store_lex "RETURN", $P5006
    nqp_get_sc_object $P5007, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 48
    perl6_type_check_return_value $P5005, $P5007
    .return ($P5005) 
.end
.HLL "perl6"
.namespace []
.sub "pass" :subid("cuid_9_1372810463.03146") :anon :lex :outer("cuid_2_1372810463.03146")
.annotate 'file', "lib/Test.pm"
.annotate 'line', 58
    .param pmc CALL_SIG :call_sig 
    .lex "call_sig", $P101 
    set $P5001, CALL_SIG
    set $P101, $P5001
    bind_signature 
    perl6_enter_multi_dispatch_from_onlystar_block $P5002
    .return ($P5002) 
.end
.HLL "perl6"
.namespace []
.sub "ok" :subid("cuid_10_1372810463.03146") :anon :lex :outer("cuid_2_1372810463.03146")
.annotate 'file', "lib/Test.pm"
.annotate 'line', 64
    .param pmc CALL_SIG :call_sig 
    .lex "$cond", $P101 
    .lex "$desc", $P102 
    .lex "$_", $P103 
    .lex "$/", $P104 
    .lex "$!", $P105 
    .lex "$ok", $P106 
    .lex "call_sig", $P107 
    .lex "$*DISPATCHER", $P108 
    .lex "&?ROUTINE", $P109 
    perl6_take_dispatcher 
    set $P5004, CALL_SIG
    set $P107, $P5004
    bind_signature 
    root_new $P110, ['parrot';'Continuation']
    set_label $P110, lexotic_22
    .lex "RETURN", $P110
.annotate 'line', 65
    find_lex $P5006, "$time_after"
    time $N5001
    perl6_box_num $P5007, $N5001
    perl6_container_store $P5006, $P5007
.annotate 'line', 66

    find_lex $P5007, "&prefix:<?>"
    perl6_multi_dispatch_thunk $P5006, $P5007
    $P5008 = $P5006($P101)
    $P5009 = "&proclaim"($P5008, $P102)
    perl6_container_store $P106, $P5009
.annotate 'line', 67
    find_lex $P5006, "$time_before"
    time $N5001
    perl6_box_num $P5007, $N5001
    perl6_container_store $P5006, $P5007
.annotate 'line', 68
    $P5006 = "&return"($P106)
    perl6_decontainerize_return_value $P5005, $P5006
    goto lexotic_23
  lexotic_22:
    .get_results ($P5005)
  lexotic_23:
    find_lex $P5006, "&EXHAUST"
    store_lex "RETURN", $P5006
    nqp_get_sc_object $P5007, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 57
    perl6_type_check_return_value $P5005, $P5007
    .return ($P5005) 
.end
.HLL "perl6"
.namespace []
.sub "ok" :subid("cuid_11_1372810463.03146") :anon :lex :outer("cuid_2_1372810463.03146")
.annotate 'file', "lib/Test.pm"
.annotate 'line', 64
    .param pmc CALL_SIG :call_sig 
    .lex "call_sig", $P101 
    set $P5001, CALL_SIG
    set $P101, $P5001
    bind_signature 
    perl6_enter_multi_dispatch_from_onlystar_block $P5002
    .return ($P5002) 
.end
.HLL "perl6"
.namespace []
.sub "nok" :subid("cuid_12_1372810463.03146") :anon :lex :outer("cuid_2_1372810463.03146")
.annotate 'file', "lib/Test.pm"
.annotate 'line', 71
    .param pmc CALL_SIG :call_sig 
    .lex "$cond", $P101 
    .lex "$desc", $P102 
    .lex "$_", $P103 
    .lex "$/", $P104 
    .lex "$!", $P105 
    .lex "$ok", $P106 
    .lex "call_sig", $P107 
    .lex "$*DISPATCHER", $P108 
    .lex "&?ROUTINE", $P109 
    perl6_take_dispatcher 
    set $P5004, CALL_SIG
    set $P107, $P5004
    bind_signature 
    root_new $P110, ['parrot';'Continuation']
    set_label $P110, lexotic_24
    .lex "RETURN", $P110
.annotate 'line', 72
    find_lex $P5006, "$time_after"
    time $N5001
    perl6_box_num $P5007, $N5001
    perl6_container_store $P5006, $P5007
.annotate 'line', 73

    find_lex $P5007, "&prefix:<!>"
    perl6_multi_dispatch_thunk $P5006, $P5007
    $P5008 = $P5006($P101)
    $P5009 = "&proclaim"($P5008, $P102)
    perl6_container_store $P106, $P5009
.annotate 'line', 74
    find_lex $P5006, "$time_before"
    time $N5001
    perl6_box_num $P5007, $N5001
    perl6_container_store $P5006, $P5007
.annotate 'line', 75
    $P5006 = "&return"($P106)
    perl6_decontainerize_return_value $P5005, $P5006
    goto lexotic_25
  lexotic_24:
    .get_results ($P5005)
  lexotic_25:
    find_lex $P5006, "&EXHAUST"
    store_lex "RETURN", $P5006
    nqp_get_sc_object $P5007, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 69
    perl6_type_check_return_value $P5005, $P5007
    .return ($P5005) 
.end
.HLL "perl6"
.namespace []
.sub "nok" :subid("cuid_13_1372810463.03146") :anon :lex :outer("cuid_2_1372810463.03146")
.annotate 'file', "lib/Test.pm"
.annotate 'line', 71
    .param pmc CALL_SIG :call_sig 
    .lex "call_sig", $P101 
    set $P5001, CALL_SIG
    set $P101, $P5001
    bind_signature 
    perl6_enter_multi_dispatch_from_onlystar_block $P5002
    .return ($P5002) 
.end
.HLL "perl6"
.namespace []
.sub "is" :subid("cuid_14_1372810463.03146") :anon :lex :outer("cuid_2_1372810463.03146")
.annotate 'file', "lib/Test.pm"
.annotate 'line', 78
    .param pmc CALL_SIG :call_sig 
    .const 'Sub' $P5008 = 'cuid_15_1372810463.03146' 
    capture_lex $P5008 
    .lex "$got", $P101 
    .lex "$expected", $P102 
    .lex "$desc", $P103 
    .lex "$_", $P104 
    .lex "$/", $P105 
    .lex "$!", $P106 
    .lex "$test", $P107 
    .lex "$ok", $P108 
    .lex "call_sig", $P109 
    .lex "$*DISPATCHER", $P110 
    .lex "&?ROUTINE", $P111 
    perl6_take_dispatcher 
    set $P5004, CALL_SIG
    set $P109, $P5004
    bind_signature 
    root_new $P112, ['parrot';'Continuation']
    set_label $P112, lexotic_26
    .lex "RETURN", $P112
.annotate 'line', 79
    find_lex $P5006, "$time_after"
    time $N5001
    perl6_box_num $P5007, $N5001
    perl6_container_store $P5006, $P5007
.annotate 'line', 80
    $P5007 = $P101."defined"()
    perl6ize_type $P5006, $P5007
.annotate 'line', 81

    find_lex $P5007, "&infix:<eq>"
    perl6_multi_dispatch_thunk $P5006, $P5007
    $P5008 = $P5006($P101, $P102)
    perl6_container_store $P107, $P5008
.annotate 'line', 82

    find_lex $P5007, "&prefix:<?>"
    perl6_multi_dispatch_thunk $P5006, $P5007
    $P5008 = $P5006($P107)
    $P5009 = "&proclaim"($P5008, $P103)
    perl6_container_store $P108, $P5009
.annotate 'line', 83
    find_lex $P5007, "&prefix:<!>"
    perl6_multi_dispatch_thunk $P5006, $P5007
    $P5008 = $P5006($P107)
    unless $P5008 goto if14_else28 
    .const 'Sub' $P5009 = 'cuid_15_1372810463.03146' 
    capture_lex $P5009
    $P5010 = $P5009()
    goto if14_end29
  if14_else28:
    find_lex $P5011, "Nil"
  if14_end29:
.annotate 'line', 87
    find_lex $P5006, "$time_before"
    time $N5001
    perl6_box_num $P5007, $N5001
    perl6_container_store $P5006, $P5007
.annotate 'line', 88
    $P5006 = "&return"($P108)
    perl6_decontainerize_return_value $P5005, $P5006
    goto lexotic_27
  lexotic_26:
    .get_results ($P5005)
  lexotic_27:
    find_lex $P5006, "&EXHAUST"
    store_lex "RETURN", $P5006
    nqp_get_sc_object $P5007, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 81
    perl6_type_check_return_value $P5005, $P5007
    .return ($P5005) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_15_1372810463.03146") :anon :lex :outer("cuid_14_1372810463.03146")
.annotate 'file', "lib/Test.pm"
.annotate 'line', 83
    .param pmc CALL_SIG :call_sig 
    .lex "$_", $P101 
    .lex "call_sig", $P102 
    .lex "$*DISPATCHER", $P103 
    perl6_take_dispatcher 
    set $P5002, CALL_SIG
    set $P102, $P5002
    bind_signature 
.annotate 'line', 84
    nqp_get_sc_object $P5008, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 88
    find_lex $P5009, "$got"
    $P5010 = $P5009."Stringy"()
    find_lex $P5007, "&infix:<~>"
    perl6_multi_dispatch_thunk $P5006, $P5007
    $P5011 = $P5006($P5008, $P5010)
    nqp_get_sc_object $P5012, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 89
    find_lex $P5005, "&infix:<~>"
    perl6_multi_dispatch_thunk $P5004, $P5005
    $P5013 = $P5004($P5011, $P5012)
    "&diag"($P5013)
.annotate 'line', 85
    nqp_get_sc_object $P5008, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 90
    find_lex $P5009, "$expected"
    $P5010 = $P5009."Stringy"()
    find_lex $P5007, "&infix:<~>"
    perl6_multi_dispatch_thunk $P5006, $P5007
    $P5011 = $P5006($P5008, $P5010)
    nqp_get_sc_object $P5012, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 89
    find_lex $P5005, "&infix:<~>"
    perl6_multi_dispatch_thunk $P5004, $P5005
    $P5013 = $P5004($P5011, $P5012)
    $P5014 = "&diag"($P5013)
    .return ($P5014) 
.end
.HLL "perl6"
.namespace []
.sub "is" :subid("cuid_16_1372810463.03146") :anon :lex :outer("cuid_2_1372810463.03146")
.annotate 'file', "lib/Test.pm"
.annotate 'line', 78
    .param pmc CALL_SIG :call_sig 
    .lex "call_sig", $P101 
    set $P5001, CALL_SIG
    set $P101, $P5001
    bind_signature 
    perl6_enter_multi_dispatch_from_onlystar_block $P5002
    .return ($P5002) 
.end
.HLL "perl6"
.namespace []
.sub "isnt" :subid("cuid_17_1372810463.03146") :anon :lex :outer("cuid_2_1372810463.03146")
.annotate 'file', "lib/Test.pm"
.annotate 'line', 91
    .param pmc CALL_SIG :call_sig 
    .lex "$got", $P101 
    .lex "$expected", $P102 
    .lex "$desc", $P103 
    .lex "$_", $P104 
    .lex "$/", $P105 
    .lex "$!", $P106 
    .lex "$test", $P107 
    .lex "$ok", $P108 
    .lex "call_sig", $P109 
    .lex "$*DISPATCHER", $P110 
    .lex "&?ROUTINE", $P111 
    perl6_take_dispatcher 
    set $P5004, CALL_SIG
    set $P109, $P5004
    bind_signature 
    root_new $P112, ['parrot';'Continuation']
    set_label $P112, lexotic_30
    .lex "RETURN", $P112
.annotate 'line', 92
    find_lex $P5006, "$time_after"
    time $N5001
    perl6_box_num $P5007, $N5001
    perl6_container_store $P5006, $P5007
.annotate 'line', 93

    find_lex $P5009, "&infix:<eq>"
    perl6_multi_dispatch_thunk $P5008, $P5009
    $P5010 = $P5008($P101, $P102)
    find_lex $P5007, "&prefix:<!>"
    perl6_multi_dispatch_thunk $P5006, $P5007
    $P5011 = $P5006($P5010)
    perl6_container_store $P107, $P5011
.annotate 'line', 94

    $P5006 = "&proclaim"($P107, $P103)
    perl6_container_store $P108, $P5006
.annotate 'line', 95
    find_lex $P5006, "$time_before"
    time $N5001
    perl6_box_num $P5007, $N5001
    perl6_container_store $P5006, $P5007
.annotate 'line', 96
    $P5006 = "&return"($P108)
    perl6_decontainerize_return_value $P5005, $P5006
    goto lexotic_31
  lexotic_30:
    .get_results ($P5005)
  lexotic_31:
    find_lex $P5006, "&EXHAUST"
    store_lex "RETURN", $P5006
    nqp_get_sc_object $P5007, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 101
    perl6_type_check_return_value $P5005, $P5007
    .return ($P5005) 
.end
.HLL "perl6"
.namespace []
.sub "isnt" :subid("cuid_18_1372810463.03146") :anon :lex :outer("cuid_2_1372810463.03146")
.annotate 'file', "lib/Test.pm"
.annotate 'line', 91
    .param pmc CALL_SIG :call_sig 
    .lex "call_sig", $P101 
    set $P5001, CALL_SIG
    set $P101, $P5001
    bind_signature 
    perl6_enter_multi_dispatch_from_onlystar_block $P5002
    .return ($P5002) 
.end
.HLL "perl6"
.namespace []
.sub "is_approx" :subid("cuid_19_1372810463.03146") :anon :lex :outer("cuid_2_1372810463.03146")
.annotate 'file', "lib/Test.pm"
.annotate 'line', 99
    .param pmc CALL_SIG :call_sig 
    .const 'Sub' $P5008 = 'cuid_20_1372810463.03146' 
    capture_lex $P5008 
    .lex "$got", $P101 
    .lex "$expected", $P102 
    .lex "$desc", $P103 
    .lex "$_", $P104 
    .lex "$/", $P105 
    .lex "$!", $P106 
    .lex "$tol", $P107 
    .lex "$test", $P108 
    .lex "$ok", $P109 
    .lex "call_sig", $P110 
    .lex "$*DISPATCHER", $P111 
    .lex "&?ROUTINE", $P112 
    perl6_take_dispatcher 
    set $P5004, CALL_SIG
    set $P110, $P5004
    bind_signature 
    root_new $P113, ['parrot';'Continuation']
    set_label $P113, lexotic_32
    .lex "RETURN", $P113
.annotate 'line', 100
    find_lex $P5006, "$time_after"
    time $N5001
    perl6_box_num $P5007, $N5001
    perl6_container_store $P5006, $P5007
.annotate 'line', 101

    $P5009 = $P102."abs"()
    perl6ize_type $P5008, $P5009
    nqp_get_sc_object $P5010, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 121
    find_lex $P5007, "&infix:<<>"
    perl6_multi_dispatch_thunk $P5006, $P5007
    $P5011 = $P5006($P5008, $P5010)
    unless $P5011 goto if15_else34 
    nqp_get_sc_object $P5012, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 122
    set $P5019, $P5012
    goto if15_end35
  if15_else34:
    $P5016 = $P102."abs"()
    perl6ize_type $P5015, $P5016
    nqp_get_sc_object $P5017, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 121
    find_lex $P5014, "&infix:<*>"
    perl6_multi_dispatch_thunk $P5013, $P5014
    $P5018 = $P5013($P5015, $P5017)
    set $P5019, $P5018
  if15_end35:
    perl6_container_store $P107, $P5019
.annotate 'line', 102

    find_lex $P5010, "&infix:<->"
    perl6_multi_dispatch_thunk $P5009, $P5010
    $P5011 = $P5009($P101, $P102)
    $P5012 = $P5011."abs"()
    perl6ize_type $P5008, $P5012
    find_lex $P5007, "&infix:<<=>"
    perl6_multi_dispatch_thunk $P5006, $P5007
    $P5013 = $P5006($P5008, $P107)
    perl6_container_store $P108, $P5013
.annotate 'line', 103

    find_lex $P5007, "&prefix:<?>"
    perl6_multi_dispatch_thunk $P5006, $P5007
    $P5008 = $P5006($P108)
    $P5009 = "&proclaim"($P5008, $P103)
    perl6_container_store $P109, $P5009
.annotate 'line', 104

    if $P108 goto unless16_end37 
    .const 'Sub' $P5006 = 'cuid_20_1372810463.03146' 
    capture_lex $P5006
    $P5007 = $P5006()
  unless16_end37:
.annotate 'line', 108
    find_lex $P5006, "$time_before"
    time $N5001
    perl6_box_num $P5007, $N5001
    perl6_container_store $P5006, $P5007
.annotate 'line', 109
    $P5006 = "&return"($P109)
    perl6_decontainerize_return_value $P5005, $P5006
    goto lexotic_33
  lexotic_32:
    .get_results ($P5005)
  lexotic_33:
    find_lex $P5006, "&EXHAUST"
    store_lex "RETURN", $P5006
    nqp_get_sc_object $P5007, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 116
    perl6_type_check_return_value $P5005, $P5007
    .return ($P5005) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_20_1372810463.03146") :anon :lex :outer("cuid_19_1372810463.03146")
.annotate 'file', "lib/Test.pm"
.annotate 'line', 104
    .param pmc CALL_SIG :call_sig 
    .lex "$_", $P101 
    .lex "call_sig", $P102 
    .lex "$*DISPATCHER", $P103 
    perl6_take_dispatcher 
    set $P5002, CALL_SIG
    set $P102, $P5002
    bind_signature 
.annotate 'line', 105
    nqp_get_sc_object $P5006, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 126
    find_lex $P5007, "$got"
    $P5008 = $P5007."Stringy"()
    find_lex $P5005, "&infix:<~>"
    perl6_multi_dispatch_thunk $P5004, $P5005
    $P5009 = $P5004($P5006, $P5008)
    "&diag"($P5009)
.annotate 'line', 106
    nqp_get_sc_object $P5006, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 127
    find_lex $P5007, "$expected"
    $P5008 = $P5007."Stringy"()
    find_lex $P5005, "&infix:<~>"
    perl6_multi_dispatch_thunk $P5004, $P5005
    $P5009 = $P5004($P5006, $P5008)
    $P5010 = "&diag"($P5009)
    .return ($P5010) 
.end
.HLL "perl6"
.namespace []
.sub "is_approx" :subid("cuid_21_1372810463.03146") :anon :lex :outer("cuid_2_1372810463.03146")
.annotate 'file', "lib/Test.pm"
.annotate 'line', 99
    .param pmc CALL_SIG :call_sig 
    .lex "call_sig", $P101 
    set $P5001, CALL_SIG
    set $P101, $P5001
    bind_signature 
    perl6_enter_multi_dispatch_from_onlystar_block $P5002
    .return ($P5002) 
.end
.HLL "perl6"
.namespace []
.sub "todo" :subid("cuid_22_1372810463.03146") :anon :lex :outer("cuid_2_1372810463.03146")
.annotate 'file', "lib/Test.pm"
.annotate 'line', 112
    .param pmc CALL_SIG :call_sig 
    .lex "$reason", $P101 
    .lex "$count", $P102 
    .lex "$_", $P103 
    .lex "$/", $P104 
    .lex "$!", $P105 
    .lex "call_sig", $P106 
    .lex "$*DISPATCHER", $P107 
    .lex "&?ROUTINE", $P108 
    perl6_take_dispatcher 
    set $P5004, CALL_SIG
    set $P106, $P5004
    bind_signature 
    root_new $P109, ['parrot';'Continuation']
    set_label $P109, lexotic_38
    .lex "RETURN", $P109
.annotate 'line', 113
    find_lex $P5006, "$time_after"
    time $N5001
    perl6_box_num $P5007, $N5001
    perl6_container_store $P5006, $P5007
.annotate 'line', 114
    find_lex $P5006, "$todo_upto_test_num"
    find_lex $P5009, "$num_of_tests_run"
    find_lex $P5008, "&infix:<+>"
    perl6_multi_dispatch_thunk $P5007, $P5008
    $P5010 = $P5007($P5009, $P102)
    perl6_container_store $P5006, $P5010
.annotate 'line', 115
    find_lex $P5006, "$todo_reason"
    nqp_get_sc_object $P5009, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 139
    find_lex $P5008, "&infix:<~>"
    perl6_multi_dispatch_thunk $P5007, $P5008
    $P5010 = $P5007($P5009, $P101)
    perl6_container_store $P5006, $P5010
.annotate 'line', 116
    find_lex $P5006, "$time_before"
    time $N5001
    perl6_box_num $P5007, $N5001
    perl6_container_store $P5006, $P5007
    perl6_decontainerize_return_value $P5005, $P5006
    goto lexotic_39
  lexotic_38:
    .get_results ($P5005)
  lexotic_39:
    find_lex $P5006, "&EXHAUST"
    store_lex "RETURN", $P5006
    nqp_get_sc_object $P5007, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 138
    perl6_type_check_return_value $P5005, $P5007
    .return ($P5005) 
.end
.HLL "perl6"
.namespace []
.sub "todo" :subid("cuid_23_1372810463.03146") :anon :lex :outer("cuid_2_1372810463.03146")
.annotate 'file', "lib/Test.pm"
.annotate 'line', 112
    .param pmc CALL_SIG :call_sig 
    .lex "call_sig", $P101 
    set $P5001, CALL_SIG
    set $P101, $P5001
    bind_signature 
    perl6_enter_multi_dispatch_from_onlystar_block $P5002
    .return ($P5002) 
.end
.HLL "perl6"
.namespace []
.sub "skip" :subid("cuid_24_1372810463.03146") :anon :lex :outer("cuid_2_1372810463.03146")
.annotate 'file', "lib/Test.pm"
.annotate 'line', 119
    .param pmc CALL_SIG :call_sig 
    .lex "$_", $P101 
    .lex "$/", $P102 
    .lex "$!", $P103 
    .lex "call_sig", $P104 
    .lex "$*DISPATCHER", $P105 
    .lex "&?ROUTINE", $P106 
    perl6_take_dispatcher 
    set $P5004, CALL_SIG
    set $P104, $P5004
    bind_signature 
    root_new $P107, ['parrot';'Continuation']
    set_label $P107, lexotic_40
    .lex "RETURN", $P107
.annotate 'line', 120
    find_lex $P5006, "$time_after"
    time $N5001
    perl6_box_num $P5007, $N5001
    perl6_container_store $P5006, $P5007
.annotate 'line', 121
    nqp_get_sc_object $P5006, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 14
    nqp_get_sc_object $P5007, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 151
    "&proclaim"($P5006, $P5007)
.annotate 'line', 122
    find_lex $P5006, "$time_before"
    time $N5001
    perl6_box_num $P5007, $N5001
    perl6_container_store $P5006, $P5007
    perl6_decontainerize_return_value $P5005, $P5006
    goto lexotic_41
  lexotic_40:
    .get_results ($P5005)
  lexotic_41:
    find_lex $P5006, "&EXHAUST"
    store_lex "RETURN", $P5006
    nqp_get_sc_object $P5007, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 150
    perl6_type_check_return_value $P5005, $P5007
    .return ($P5005) 
.end
.HLL "perl6"
.namespace []
.sub "skip" :subid("cuid_25_1372810463.03146") :anon :lex :outer("cuid_2_1372810463.03146")
.annotate 'file', "lib/Test.pm"
.annotate 'line', 119
    .param pmc CALL_SIG :call_sig 
    .lex "call_sig", $P101 
    set $P5001, CALL_SIG
    set $P101, $P5001
    bind_signature 
    perl6_enter_multi_dispatch_from_onlystar_block $P5002
    .return ($P5002) 
.end
.HLL "perl6"
.namespace []
.sub "skip" :subid("cuid_26_1372810463.03146") :anon :lex :outer("cuid_2_1372810463.03146")
.annotate 'file', "lib/Test.pm"
.annotate 'line', 124
    .param pmc CALL_SIG :call_sig 
    .const 'Sub' $P5008 = 'cuid_27_1372810463.03146' 
    capture_lex $P5008 
    .lex "$reason", $P101 
    .lex "$count", $P102 
    .lex "$_", $P103 
    .lex "$/", $P104 
    .lex "$!", $P105 
    .lex "$i", $P106 
    .lex "call_sig", $P107 
    .lex "$*DISPATCHER", $P108 
    .lex "&?ROUTINE", $P109 
    .local pmc old_topic_2 
    .local pmc sm_result_2 
    perl6_take_dispatcher 
    set $P5004, CALL_SIG
    set $P107, $P5004
    bind_signature 
    root_new $P110, ['parrot';'Continuation']
    set_label $P110, lexotic_42
    .lex "RETURN", $P110
.annotate 'line', 125
    find_lex $P5006, "$time_after"
    time $N5001
    perl6_box_num $P5007, $N5001
    perl6_container_store $P5006, $P5007
    find_lex $P5006, "$_"
    set old_topic_2, $P5006
.annotate 'line', 126

    store_lex "$_", $P102
    nqp_get_sc_object $P5009, "5C7C172868FA9510BA84BFF074E73D635E54D9D3", 5864
    find_lex $P5010, "$_"
    $P5011 = $P5009."ACCEPTS"($P5010)
    find_lex $P5008, "&prefix:<!>"
    perl6_multi_dispatch_thunk $P5007, $P5008
    $P5012 = $P5007($P5011)
    set sm_result_2, $P5012
    store_lex "$_", old_topic_2
    unless sm_result_2 goto if17_else44 
    nqp_get_sc_object $P5008, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 159
    find_lex $P5007, "&die"
    perl6_multi_dispatch_thunk $P5006, $P5007
    $P5009 = $P5006($P5008)
    goto if17_end45
  if17_else44:
    find_lex $P5010, "Nil"
  if17_end45:
.annotate 'line', 127

    nqp_get_sc_object $P5006, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 14
    perl6_container_store $P106, $P5006
    new $P5012, 'ExceptionHandler', [.CONTROL_LOOP_NEXT;.CONTROL_LOOP_REDO;.CONTROL_LOOP_LAST]
    set_label $P5012, while18_handlers49
    push_eh $P5012
  while18_test46:
.annotate 'line', 128
    find_lex $P5007, "&infix:<<=>"
    perl6_multi_dispatch_thunk $P5006, $P5007
    $P5008 = $P5006($P106, $P102)
    set $P5011, $P5008
    unless $P5008 goto while18_done50 
  while18_redo48:
    .const 'Sub' $P5009 = 'cuid_27_1372810463.03146' 
    capture_lex $P5009
    $P5010 = $P5009()
    set $P5011, $P5010
    goto while18_test46 
  while18_handlers49:
    .get_results ($P5012)
    pop_upto_eh $P5012
    getattribute $P5012, $P5012, 'type'
    eq $P5012, .CONTROL_LOOP_NEXT, while18_test46
    eq $P5012, .CONTROL_LOOP_REDO, while18_redo48
  while18_done50:
    pop_eh 
.annotate 'line', 129
    find_lex $P5006, "$time_before"
    time $N5001
    perl6_box_num $P5007, $N5001
    perl6_container_store $P5006, $P5007
    perl6_decontainerize_return_value $P5005, $P5006
    goto lexotic_43
  lexotic_42:
    .get_results ($P5005)
  lexotic_43:
    find_lex $P5006, "&EXHAUST"
    store_lex "RETURN", $P5006
    nqp_get_sc_object $P5007, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 158
    perl6_type_check_return_value $P5005, $P5007
    .return ($P5005) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_27_1372810463.03146") :anon :lex :outer("cuid_26_1372810463.03146")
.annotate 'file', "lib/Test.pm"
.annotate 'line', 128
    .param pmc CALL_SIG :call_sig 
    .lex "$_", $P101 
    .lex "call_sig", $P102 
    .lex "$*DISPATCHER", $P103 
    perl6_take_dispatcher 
    set $P5002, CALL_SIG
    set $P102, $P5002
    bind_signature 
    nqp_get_sc_object $P5004, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 14
    nqp_get_sc_object $P5007, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 163
    find_lex $P5008, "$reason"
    find_lex $P5006, "&infix:<~>"
    perl6_multi_dispatch_thunk $P5005, $P5006
    $P5009 = $P5005($P5007, $P5008)
    "&proclaim"($P5004, $P5009)
    find_lex $P5004, "$i"
    find_lex $P5007, "$i"
    nqp_get_sc_object $P5008, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 14
    find_lex $P5006, "&infix:<+>"
    perl6_multi_dispatch_thunk $P5005, $P5006
    $P5009 = $P5005($P5007, $P5008)
    perl6_container_store $P5004, $P5009
    .return ($P5004) 
.end
.HLL "perl6"
.namespace []
.sub "skip_rest" :subid("cuid_28_1372810463.03146") :anon :lex :outer("cuid_2_1372810463.03146")
.annotate 'file', "lib/Test.pm"
.annotate 'line', 132
    .param pmc CALL_SIG :call_sig 
    .lex "$reason", $P101 
    .lex "$_", $P102 
    .lex "$/", $P103 
    .lex "$!", $P104 
    .lex "call_sig", $P105 
    .lex "$*DISPATCHER", $P106 
    .lex "&?ROUTINE", $P107 
    perl6_take_dispatcher 
    set $P5004, CALL_SIG
    set $P105, $P5004
    bind_signature 
    root_new $P108, ['parrot';'Continuation']
    set_label $P108, lexotic_51
    .lex "RETURN", $P108
.annotate 'line', 133
    find_lex $P5007, "$time_after"
    time $N5001
    perl6_box_num $P5008, $N5001
    perl6_container_store $P5007, $P5008
.annotate 'line', 134
    find_lex $P5011, "$num_of_tests_planned"
    find_lex $P5012, "$num_of_tests_run"
    find_lex $P5010, "&infix:<->"
    perl6_multi_dispatch_thunk $P5009, $P5010
    $P5013 = $P5009($P5011, $P5012)
    find_lex $P5008, "&skip"
    perl6_multi_dispatch_thunk $P5007, $P5008
    $P5007($P101, $P5013)
.annotate 'line', 135
    find_lex $P5007, "$time_before"
    time $N5001
    perl6_box_num $P5008, $N5001
    perl6_container_store $P5007, $P5008
    perl6_decontainerize_return_value $P5006, $P5007
    goto lexotic_52
  lexotic_51:
    .get_results ($P5006)
  lexotic_52:
    find_lex $P5007, "&EXHAUST"
    store_lex "RETURN", $P5007
    nqp_get_sc_object $P5008, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 170
    perl6_type_check_return_value $P5006, $P5008
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "diag" :subid("cuid_30_1372810463.03146") :anon :lex :outer("cuid_2_1372810463.03146")
.annotate 'file', "lib/Test.pm"
.annotate 'line', 138
    .param pmc CALL_SIG :call_sig 
    .const 'Sub' $P5010 = 'cuid_29_1372810463.03146' 
    capture_lex $P5010 
    .lex "$message", $P101 
    .lex "$_", $P102 
    .lex "$/", $P103 
    .lex "$!", $P104 
    .lex "call_sig", $P105 
    .lex "$*DISPATCHER", $P106 
    .lex "&?ROUTINE", $P107 
    perl6_take_dispatcher 
    .const 'Sub' $P5004 = 'cuid_29_1372810463.03146' 
    capture_lex $P5004
    set $P5005, CALL_SIG
    set $P105, $P5005
    bind_signature 
    root_new $P108, ['parrot';'Continuation']
    set_label $P108, lexotic_64
    .lex "RETURN", $P108
.annotate 'line', 139
    find_lex $P5008, "$time_after"
    time $N5001
    perl6_box_num $P5009, $N5001
    perl6_container_store $P5008, $P5009
.annotate 'line', 140
    $P5010 = $P101."Str"()
    perl6ize_type $P5009, $P5010
    nqp_get_sc_object $P5011, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 177
    $P5012 = $P5011."clone"()
    perl6_capture_lex $P5012
    nqp_get_sc_object $P5013, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 183
    perl6_booleanize $P5014, 1
    $P5015 = $P5009."subst"($P5012, $P5013, $P5014 :named("g"))
    perl6ize_type $P5008, $P5015
    "&say"($P5008)
.annotate 'line', 141
    find_lex $P5008, "$time_before"
    time $N5001
    perl6_box_num $P5009, $N5001
    perl6_container_store $P5008, $P5009
    perl6_decontainerize_return_value $P5007, $P5008
    goto lexotic_65
  lexotic_64:
    .get_results ($P5007)
  lexotic_65:
    find_lex $P5008, "&EXHAUST"
    store_lex "RETURN", $P5008
    nqp_get_sc_object $P5009, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 176
    perl6_type_check_return_value $P5007, $P5009
    .return ($P5007) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_29_1372810463.03146") :anon :lex :outer("cuid_30_1372810463.03146")
.annotate 'file', "lib/Test.pm"
.annotate 'line', 140
    .param pmc CALL_SIG :call_sig 
    .lex "self", $P101 
    .lex "%_", $P102 
    .lex utf8:"$\x{a2}", $P103 
    .lex "$?REGEX", $P104 
    .lex "call_sig", $P105 
    .lex "$*DISPATCHER", $P106 
    .local pmc self 
    perl6_take_dispatcher 
    getinterp $P5003
    set $P5003, $P5003['sub']
    perl6_code_object_from_parrot_sub $P5002, $P5003
    set $P104, $P5002
    set $P5004, CALL_SIG
    set $P105, $P5004
    bind_signature 
    set self, $P101
    .local string rx19_tgt
    .local int rx19_pos
    .local int rx19_off
    .local int rx19_eos
    .local int rx19_rep
    .local pmc rx19_cur
    .local pmc rx19_curclass
    .local pmc rx19_bstack
    .local pmc rx19_cstack
    (rx19_cur, rx19_tgt, rx19_pos, rx19_curclass, rx19_bstack, $I19) = self."!cursor_start"()
    store_lex unicode:"$\x{a2}", rx19_cur
    length rx19_eos, rx19_tgt
    eq $I19, 1, rx19_restart55
    gt rx19_pos, rx19_eos, rx19_fail56
    repr_get_attr_int $I11, self, rx19_curclass, "$!from"
    ne $I11, -1, rxscan20_done62
    goto rxscan20_scan61
  rxscan20_loop60:
    inc rx19_pos
    gt rx19_pos, rx19_eos, rx19_fail56
    repr_bind_attr_int rx19_cur, rx19_curclass, "$!from", rx19_pos
  rxscan20_scan61:
    nqp_rxmark rx19_bstack, rxscan20_loop60, rx19_pos, 0
  rxscan20_done62:
    eq rx19_pos, 0, rxanchor21_done63
    ge rx19_pos, rx19_eos, rx19_fail56
    sub $I11, rx19_pos, 1
    is_cclass $I11, .CCLASS_NEWLINE, rx19_tgt, $I11
    unless $I11, rx19_fail56
  rxanchor21_done63:
    rx19_cur."!cursor_pass"(rx19_pos, 'backtrack'=>1)
    .return (rx19_cur)
  rx19_restart55:
    repr_get_attr_obj rx19_cstack, rx19_cur, rx19_curclass, "$!cstack"
  rx19_fail56:
    unless rx19_bstack, rx19_done54
    pop $I19, rx19_bstack
    if_null rx19_cstack, rx19_cstack_done59
    unless rx19_cstack, rx19_cstack_done59
    dec $I19
    set $P11, rx19_cstack[$I19]
  rx19_cstack_done59:
    pop rx19_rep, rx19_bstack
    pop rx19_pos, rx19_bstack
    pop $I19, rx19_bstack
    lt rx19_pos, -1, rx19_done54
    lt rx19_pos, 0, rx19_fail56
    eq $I19, 0, rx19_fail56
    nqp_islist $I20, rx19_cstack
    unless $I20, rx19_jump57
    elements $I18, rx19_bstack
    le $I18, 0, rx19_cut58
    dec $I18
    set $I18, rx19_bstack[$I18]
  rx19_cut58:
    assign rx19_cstack, $I18
  rx19_jump57:
    jump $I19
  rx19_done54:
    rx19_cur."!cursor_fail"()
    .return (rx19_cur) 
.end
.HLL "perl6"
.namespace []
.sub "flunk" :subid("cuid_31_1372810463.03146") :anon :lex :outer("cuid_2_1372810463.03146")
.annotate 'file', "lib/Test.pm"
.annotate 'line', 144
    .param pmc CALL_SIG :call_sig 
    .lex "$reason", $P101 
    .lex "$_", $P102 
    .lex "$/", $P103 
    .lex "$!", $P104 
    .lex "$ok", $P105 
    .lex "call_sig", $P106 
    .lex "$*DISPATCHER", $P107 
    .lex "&?ROUTINE", $P108 
    perl6_take_dispatcher 
    set $P5004, CALL_SIG
    set $P106, $P5004
    bind_signature 
    root_new $P109, ['parrot';'Continuation']
    set_label $P109, lexotic_66
    .lex "RETURN", $P109
.annotate 'line', 145
    find_lex $P5006, "$time_after"
    time $N5001
    perl6_box_num $P5007, $N5001
    perl6_container_store $P5006, $P5007
.annotate 'line', 146

    nqp_get_sc_object $P5006, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 7
    nqp_get_sc_object $P5009, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 192
    $P5010 = $P101."Stringy"()
    find_lex $P5008, "&infix:<~>"
    perl6_multi_dispatch_thunk $P5007, $P5008
    $P5011 = $P5007($P5009, $P5010)
    $P5012 = "&proclaim"($P5006, $P5011)
    perl6_container_store $P105, $P5012
.annotate 'line', 147
    find_lex $P5006, "$time_before"
    time $N5001
    perl6_box_num $P5007, $N5001
    perl6_container_store $P5006, $P5007
.annotate 'line', 148
    $P5006 = "&return"($P105)
    perl6_decontainerize_return_value $P5005, $P5006
    goto lexotic_67
  lexotic_66:
    .get_results ($P5005)
  lexotic_67:
    find_lex $P5006, "&EXHAUST"
    store_lex "RETURN", $P5006
    nqp_get_sc_object $P5007, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 189
    perl6_type_check_return_value $P5005, $P5007
    .return ($P5005) 
.end
.HLL "perl6"
.namespace []
.sub "flunk" :subid("cuid_32_1372810463.03146") :anon :lex :outer("cuid_2_1372810463.03146")
.annotate 'file', "lib/Test.pm"
.annotate 'line', 144
    .param pmc CALL_SIG :call_sig 
    .lex "call_sig", $P101 
    set $P5001, CALL_SIG
    set $P101, $P5001
    bind_signature 
    perl6_enter_multi_dispatch_from_onlystar_block $P5002
    .return ($P5002) 
.end
.HLL "perl6"
.namespace []
.sub "isa_ok" :subid("cuid_34_1372810463.03146") :anon :lex :outer("cuid_2_1372810463.03146")
.annotate 'file', "lib/Test.pm"
.annotate 'line', 151
    .param pmc CALL_SIG :call_sig 
    .const 'Sub' $P5009 = 'cuid_33_1372810463.03146' 
    capture_lex $P5009 
    .lex "$var", $P101 
    .lex "$type", $P102 
    .lex "$msg", $P103 
    .lex "$_", $P104 
    .lex "$/", $P105 
    .lex "$!", $P106 
    .lex "$ok", $P107 
    .lex "call_sig", $P108 
    .lex "$*DISPATCHER", $P109 
    .lex "&?ROUTINE", $P110 
    perl6_take_dispatcher 
    .const 'Sub' $P5001 = 'cuid_33_1372810463.03146' 
    capture_lex $P5001
    set $P5005, CALL_SIG
    set $P108, $P5005
    bind_signature 
    root_new $P111, ['parrot';'Continuation']
    set_label $P111, lexotic_68
    .lex "RETURN", $P111
.annotate 'line', 152
    find_lex $P5007, "$time_after"
    time $N5001
    perl6_box_num $P5008, $N5001
    perl6_container_store $P5007, $P5008
.annotate 'line', 153

    $P5008 = $P101."isa"($P102)
    perl6ize_type $P5007, $P5008
    $P5009 = "&proclaim"($P5007, $P103)
    perl6_container_store $P107, $P5009
    if $P107 goto unless22_end71 
.annotate 'line', 154
    nqp_get_sc_object $P5012, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 208
    nqp_get_sc_object $P5014, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 209
    $P5015 = $P101."dispatch:<.^>"($P5014)
    perl6ize_type $P5013, $P5015
    find_lex $P5011, "&infix:<~>"
    perl6_multi_dispatch_thunk $P5010, $P5011
    $P5016 = $P5010($P5012, $P5013)
    $P5017 = "&diag"($P5016)
  unless22_end71:
.annotate 'line', 155
    find_lex $P5007, "$time_before"
    time $N5001
    perl6_box_num $P5008, $N5001
    perl6_container_store $P5007, $P5008
.annotate 'line', 156
    $P5007 = "&return"($P107)
    perl6_decontainerize_return_value $P5006, $P5007
    goto lexotic_69
  lexotic_68:
    .get_results ($P5006)
  lexotic_69:
    find_lex $P5007, "&EXHAUST"
    store_lex "RETURN", $P5007
    nqp_get_sc_object $P5008, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 200
    perl6_type_check_return_value $P5006, $P5008
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_33_1372810463.03146") :anon :lex :outer("cuid_34_1372810463.03146")
.annotate 'file', "lib/Test.pm"
.annotate 'line', 151

    nqp_get_sc_object $P5005, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 203
    find_lex $P5007, "$type"
    $P5008 = $P5007."perl"()
    perl6ize_type $P5006, $P5008
    find_lex $P5004, "&infix:<~>"
    perl6_multi_dispatch_thunk $P5003, $P5004
    $P5009 = $P5003($P5005, $P5006)
    nqp_get_sc_object $P5010, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 89
    find_lex $P5002, "&infix:<~>"
    perl6_multi_dispatch_thunk $P5001, $P5002
    $P5011 = $P5001($P5009, $P5010)
    .return ($P5011) 
.end
.HLL "perl6"
.namespace []
.sub "isa_ok" :subid("cuid_35_1372810463.03146") :anon :lex :outer("cuid_2_1372810463.03146")
.annotate 'file', "lib/Test.pm"
.annotate 'line', 151
    .param pmc CALL_SIG :call_sig 
    .lex "call_sig", $P101 
    set $P5001, CALL_SIG
    set $P101, $P5001
    bind_signature 
    perl6_enter_multi_dispatch_from_onlystar_block $P5002
    .return ($P5002) 
.end
.HLL "perl6"
.namespace []
.sub "dies_ok" :subid("cuid_36_1372810463.03146") :anon :lex :outer("cuid_2_1372810463.03146")
.annotate 'file', "lib/Test.pm"
.annotate 'line', 159
    .param pmc CALL_SIG :call_sig 
    .const 'Sub' $P5009 = 'cuid_37_1372810463.03146' 
    capture_lex $P5009 
    .const 'Sub' $P5009 = 'cuid_38_1372810463.03146' 
    capture_lex $P5009 
    .lex "$closure", $P101 
    .lex "$reason", $P102 
    .lex "$_", $P103 
    .lex "$/", $P104 
    .lex "$!", $P105 
    .lex "$death", $P106 
    .lex "$bad_death", $P107 
    .lex "$ok", $P108 
    .lex "call_sig", $P109 
    .lex "$*DISPATCHER", $P110 
    .lex "&?ROUTINE", $P111 
    perl6_take_dispatcher 
    .const 'Sub' $P5004 = 'cuid_37_1372810463.03146' 
    capture_lex $P5004
    set $P5005, CALL_SIG
    set $P109, $P5005
    bind_signature 
    root_new $P112, ['parrot';'Continuation']
    set_label $P112, lexotic_72
    .lex "RETURN", $P112
.annotate 'line', 160
    find_lex $P5007, "$time_after"
    time $N5001
    perl6_box_num $P5008, $N5001
    perl6_container_store $P5007, $P5008
.annotate 'line', 161

    nqp_get_sc_object $P5007, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 14
    perl6_container_store $P106, $P5007
.annotate 'line', 162

    nqp_get_sc_object $P5007, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 7
    perl6_container_store $P107, $P5007
    new $P5007, 'ExceptionHandler'
    set_label $P5007, catch_handler_2475
    $P5007.'handle_types_except'(.CONTROL_ALL)
    push_eh $P5007
    nqp_get_sc_object $P5007, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 224
    $P5008 = $P5007()
    find_lex $P5009, "$!"
    find_lex $P5010, "Any"
    perl6_container_store $P5009, $P5010
    set $P5008, $P5008
    pop_eh 
    goto skip_handler_2374
  catch_handler_2475:
    .get_results ($P5007) 
    find_lex $P10001, "$!"
    $P10002 = "&EXCEPTION"($P5007)
    perl6_container_store $P10001, $P10002
    null $P10003
    perl6_invoke_catchhandler $P10003, $P5007
    finalize $P5007
    pop_upto_eh $P5007
    pop_eh 
    set $P5008, $P10001
    goto skip_handler_2374
  skip_handler_2374:
.annotate 'line', 167

    set $P5013, $P106
    unless $P106 goto if26_end79 
    find_lex $P5009, "$!"
    $P5010 = $P5009."Str"()
    perl6ize_type $P5008, $P5010
    nqp_get_sc_object $P5011, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 226
    $P5012 = $P5008."index"($P5011)
    perl6ize_type $P5007, $P5012
    set $P5013, $P5007
  if26_end79:
    unless $P5013 goto if25_else76 
    .const 'Sub' $P5014 = 'cuid_38_1372810463.03146' 
    capture_lex $P5014
    $P5015 = $P5014()
    goto if25_end77
  if25_else76:
    find_lex $P5016, "Nil"
  if25_end77:
.annotate 'line', 171

    set $P5010, $P106
    unless $P106 goto if27_end81 
    find_lex $P5008, "&prefix:<!>"
    perl6_multi_dispatch_thunk $P5007, $P5008
    $P5009 = $P5007($P107)
    set $P5010, $P5009
  if27_end81:
    $P5011 = "&proclaim"($P5010, $P102)
    perl6_container_store $P108, $P5011
.annotate 'line', 172
    find_lex $P5007, "$time_before"
    time $N5001
    perl6_box_num $P5008, $N5001
    perl6_container_store $P5007, $P5008
.annotate 'line', 173
    $P5007 = "&return"($P108)
    perl6_decontainerize_return_value $P5006, $P5007
    goto lexotic_73
  lexotic_72:
    .get_results ($P5006)
  lexotic_73:
    find_lex $P5007, "&EXHAUST"
    store_lex "RETURN", $P5007
    nqp_get_sc_object $P5008, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 219
    perl6_type_check_return_value $P5006, $P5008
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_37_1372810463.03146") :anon :lex :outer("cuid_36_1372810463.03146")
.annotate 'file', "lib/Test.pm"
.annotate 'line', 163
    .lex "$_", $P101 
.annotate 'line', 164
    find_lex $P5002, "$closure"
    $P5002()
.annotate 'line', 165
    find_lex $P5002, "$death"
    nqp_get_sc_object $P5003, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 7
    perl6_container_store $P5002, $P5003
    .return ($P5002) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_38_1372810463.03146") :anon :lex :outer("cuid_36_1372810463.03146")
.annotate 'file', "lib/Test.pm"
.annotate 'line', 167
    .param pmc CALL_SIG :call_sig 
    .lex "$_", $P101 
    .lex "call_sig", $P102 
    .lex "$*DISPATCHER", $P103 
    perl6_take_dispatcher 
    set $P5002, CALL_SIG
    set $P102, $P5002
    bind_signature 
.annotate 'line', 168
    find_lex $P5004, "$bad_death"
    nqp_get_sc_object $P5005, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 14
    perl6_container_store $P5004, $P5005
.annotate 'line', 169
    nqp_get_sc_object $P5008, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 228
    find_lex $P5009, "$!"
    $P5010 = $P5009."Stringy"()
    find_lex $P5007, "&infix:<~>"
    perl6_multi_dispatch_thunk $P5006, $P5007
    $P5011 = $P5006($P5008, $P5010)
    nqp_get_sc_object $P5012, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 89
    find_lex $P5005, "&infix:<~>"
    perl6_multi_dispatch_thunk $P5004, $P5005
    $P5013 = $P5004($P5011, $P5012)
    $P5014 = "&diag"($P5013)
    .return ($P5014) 
.end
.HLL "perl6"
.namespace []
.sub "dies_ok" :subid("cuid_39_1372810463.03146") :anon :lex :outer("cuid_2_1372810463.03146")
.annotate 'file', "lib/Test.pm"
.annotate 'line', 159
    .param pmc CALL_SIG :call_sig 
    .lex "call_sig", $P101 
    set $P5001, CALL_SIG
    set $P101, $P5001
    bind_signature 
    perl6_enter_multi_dispatch_from_onlystar_block $P5002
    .return ($P5002) 
.end
.HLL "perl6"
.namespace []
.sub "lives_ok" :subid("cuid_41_1372810463.03146") :anon :lex :outer("cuid_2_1372810463.03146")
.annotate 'file', "lib/Test.pm"
.annotate 'line', 176
    .param pmc CALL_SIG :call_sig 
    .const 'Sub' $P5009 = 'cuid_40_1372810463.03146' 
    capture_lex $P5009 
    .lex "$closure", $P101 
    .lex "$reason", $P102 
    .lex "$_", $P103 
    .lex "$/", $P104 
    .lex "$!", $P105 
    .lex "$ok", $P106 
    .lex "call_sig", $P107 
    .lex "$*DISPATCHER", $P108 
    .lex "&?ROUTINE", $P109 
    perl6_take_dispatcher 
    .const 'Sub' $P5004 = 'cuid_40_1372810463.03146' 
    capture_lex $P5004
    set $P5005, CALL_SIG
    set $P107, $P5005
    bind_signature 
    root_new $P110, ['parrot';'Continuation']
    set_label $P110, lexotic_82
    .lex "RETURN", $P110
.annotate 'line', 177
    find_lex $P5007, "$time_after"
    time $N5001
    perl6_box_num $P5008, $N5001
    perl6_container_store $P5007, $P5008
    new $P5007, 'ExceptionHandler'
    set_label $P5007, catch_handler_2985
    $P5007.'handle_types_except'(.CONTROL_ALL)
    push_eh $P5007
    nqp_get_sc_object $P5007, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 241
    $P5008 = $P5007()
    find_lex $P5009, "$!"
    find_lex $P5010, "Any"
    perl6_container_store $P5009, $P5010
    set $P5008, $P5008
    pop_eh 
    goto skip_handler_2884
  catch_handler_2985:
    .get_results ($P5007) 
    find_lex $P10001, "$!"
    $P10002 = "&EXCEPTION"($P5007)
    perl6_container_store $P10001, $P10002
    null $P10003
    perl6_invoke_catchhandler $P10003, $P5007
    finalize $P5007
    pop_upto_eh $P5007
    pop_eh 
    set $P5008, $P10001
    goto skip_handler_2884
  skip_handler_2884:
.annotate 'line', 181

    find_lex $P5011, "$!"
    find_lex $P5010, "&defined"
    perl6_multi_dispatch_thunk $P5009, $P5010
    $P5012 = $P5009($P5011)
    find_lex $P5008, "&prefix:<not>"
    perl6_multi_dispatch_thunk $P5007, $P5008
    $P5013 = $P5007($P5012)
    $P5014 = "&proclaim"($P5013, $P102)
    perl6_container_store $P106, $P5014
    if $P106 goto unless30_end87 
    find_lex $P5015, "$!"
    $P5016 = "&diag"($P5015)
  unless30_end87:
.annotate 'line', 182
    find_lex $P5007, "$time_before"
    time $N5001
    perl6_box_num $P5008, $N5001
    perl6_container_store $P5007, $P5008
.annotate 'line', 183
    $P5007 = "&return"($P106)
    perl6_decontainerize_return_value $P5006, $P5007
    goto lexotic_83
  lexotic_82:
    .get_results ($P5006)
  lexotic_83:
    find_lex $P5007, "&EXHAUST"
    store_lex "RETURN", $P5007
    nqp_get_sc_object $P5008, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 239
    perl6_type_check_return_value $P5006, $P5008
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_40_1372810463.03146") :anon :lex :outer("cuid_41_1372810463.03146")
.annotate 'file', "lib/Test.pm"
.annotate 'line', 178
    .lex "$_", $P101 
.annotate 'line', 179
    find_lex $P5002, "$closure"
    $P5003 = $P5002()
    .return ($P5003) 
.end
.HLL "perl6"
.namespace []
.sub "lives_ok" :subid("cuid_42_1372810463.03146") :anon :lex :outer("cuid_2_1372810463.03146")
.annotate 'file', "lib/Test.pm"
.annotate 'line', 176
    .param pmc CALL_SIG :call_sig 
    .lex "call_sig", $P101 
    set $P5001, CALL_SIG
    set $P101, $P5001
    bind_signature 
    perl6_enter_multi_dispatch_from_onlystar_block $P5002
    .return ($P5002) 
.end
.HLL "perl6"
.namespace []
.sub "eval_dies_ok" :subid("cuid_43_1372810463.03146") :anon :lex :outer("cuid_2_1372810463.03146")
.annotate 'file', "lib/Test.pm"
.annotate 'line', 186
    .param pmc CALL_SIG :call_sig 
    .const 'Sub' $P5008 = 'cuid_44_1372810463.03146' 
    capture_lex $P5008 
    .const 'Sub' $P5008 = 'cuid_46_1372810463.03146' 
    capture_lex $P5008 
    .lex "$code", $P101 
    .lex "$reason", $P102 
    .lex "$_", $P103 
    .lex "$/", $P104 
    .lex "$!", $P105 
    .lex "$ee", $P106 
    .lex "$ok", $P107 
    .lex "call_sig", $P108 
    .lex "$*DISPATCHER", $P109 
    .lex "&?ROUTINE", $P110 
    .local pmc _inline_arg_1 
    perl6_take_dispatcher 
    set $P5004, CALL_SIG
    set $P108, $P5004
    bind_signature 
    root_new $P111, ['parrot';'Continuation']
    set_label $P111, lexotic_88
    .lex "RETURN", $P111
.annotate 'line', 187
    find_lex $P5006, "$time_after"
    time $N5001
    perl6_box_num $P5007, $N5001
    perl6_container_store $P5006, $P5007
.annotate 'line', 188

    $P5006 = "&eval_exception"($P101)
    perl6_container_store $P106, $P5006
.annotate 'line', 190
    set _inline_arg_1, $P106
    $P5008 = _inline_arg_1."defined"()
    perl6ize_type $P5007, $P5008
    perl6_decontainerize_return_value $P5006, $P5007
    nqp_get_sc_object $P5007, "5C7C172868FA9510BA84BFF074E73D635E54D9D3", 1831
    perl6_type_check_return_value $P5006, $P5007
    unless $P5006 goto if31_else90 
    .const 'Sub' $P5008 = 'cuid_44_1372810463.03146' 
    capture_lex $P5008
    $P5009 = $P5008()
    goto if31_end91
  if31_else90:
    .const 'Sub' $P5010 = 'cuid_46_1372810463.03146' 
    capture_lex $P5010
    $P5011 = $P5010()
  if31_end91:
.annotate 'line', 201
    find_lex $P5006, "$time_before"
    time $N5001
    perl6_box_num $P5007, $N5001
    perl6_container_store $P5006, $P5007
.annotate 'line', 202
    $P5006 = "&return"($P107)
    perl6_decontainerize_return_value $P5005, $P5006
    goto lexotic_89
  lexotic_88:
    .get_results ($P5005)
  lexotic_89:
    find_lex $P5006, "&EXHAUST"
    store_lex "RETURN", $P5006
    nqp_get_sc_object $P5007, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 253
    perl6_type_check_return_value $P5005, $P5007
    .return ($P5005) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_44_1372810463.03146") :anon :lex :outer("cuid_43_1372810463.03146")
.annotate 'file', "lib/Test.pm"
.annotate 'line', 190
    .param pmc CALL_SIG :call_sig 
    .const 'Sub' $P5004 = 'cuid_45_1372810463.03146' 
    capture_lex $P5004 
    .lex "$_", $P101 
    .lex "$bad_death", $P102 
    .lex "call_sig", $P103 
    .lex "$*DISPATCHER", $P104 
    perl6_take_dispatcher 
    set $P5002, CALL_SIG
    set $P103, $P5002
    bind_signature 
.annotate 'line', 192

    find_lex $P5007, "$ee"
    $P5008 = $P5007."Str"()
    perl6ize_type $P5006, $P5008
    nqp_get_sc_object $P5009, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 261
    $P5010 = $P5006."index"($P5009)
    perl6ize_type $P5005, $P5010
    $P5011 = $P5005."defined"()
    perl6ize_type $P5004, $P5011
    perl6_container_store $P102, $P5004
.annotate 'line', 193

    unless $P102 goto if32_else92 
    .const 'Sub' $P5004 = 'cuid_45_1372810463.03146' 
    capture_lex $P5004
    $P5005 = $P5004()
    goto if32_end93
  if32_else92:
    find_lex $P5006, "Nil"
  if32_end93:
.annotate 'line', 196
    find_lex $P5004, "$ok"
    find_lex $P5006, "&prefix:<!>"
    perl6_multi_dispatch_thunk $P5005, $P5006
    $P5007 = $P5005($P102)
    find_lex $P5008, "$reason"
    $P5009 = "&proclaim"($P5007, $P5008)
    perl6_container_store $P5004, $P5009
    .return ($P5004) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_45_1372810463.03146") :anon :lex :outer("cuid_44_1372810463.03146")
.annotate 'file', "lib/Test.pm"
.annotate 'line', 193
    .param pmc CALL_SIG :call_sig 
    .lex "$_", $P101 
    .lex "call_sig", $P102 
    .lex "$*DISPATCHER", $P103 
    perl6_take_dispatcher 
    set $P5002, CALL_SIG
    set $P102, $P5002
    bind_signature 
.annotate 'line', 194
    nqp_get_sc_object $P5008, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 263
    find_lex $P5009, "$ee"
    $P5010 = $P5009."Stringy"()
    find_lex $P5007, "&infix:<~>"
    perl6_multi_dispatch_thunk $P5006, $P5007
    $P5011 = $P5006($P5008, $P5010)
    nqp_get_sc_object $P5012, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 89
    find_lex $P5005, "&infix:<~>"
    perl6_multi_dispatch_thunk $P5004, $P5005
    $P5013 = $P5004($P5011, $P5012)
    $P5014 = "&diag"($P5013)
    .return ($P5014) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_46_1372810463.03146") :anon :lex :outer("cuid_43_1372810463.03146")
.annotate 'file', "lib/Test.pm"
.annotate 'line', 198
    .param pmc CALL_SIG :call_sig 
    .lex "$_", $P101 
    .lex "call_sig", $P102 
    .lex "$*DISPATCHER", $P103 
    perl6_take_dispatcher 
    set $P5002, CALL_SIG
    set $P102, $P5002
    bind_signature 
.annotate 'line', 199
    find_lex $P5004, "$ok"
    nqp_get_sc_object $P5005, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 7
    find_lex $P5006, "$reason"
    $P5007 = "&proclaim"($P5005, $P5006)
    perl6_container_store $P5004, $P5007
    .return ($P5004) 
.end
.HLL "perl6"
.namespace []
.sub "eval_dies_ok" :subid("cuid_47_1372810463.03146") :anon :lex :outer("cuid_2_1372810463.03146")
.annotate 'file', "lib/Test.pm"
.annotate 'line', 186
    .param pmc CALL_SIG :call_sig 
    .lex "call_sig", $P101 
    set $P5001, CALL_SIG
    set $P101, $P5001
    bind_signature 
    perl6_enter_multi_dispatch_from_onlystar_block $P5002
    .return ($P5002) 
.end
.HLL "perl6"
.namespace []
.sub "eval_lives_ok" :subid("cuid_48_1372810463.03146") :anon :lex :outer("cuid_2_1372810463.03146")
.annotate 'file', "lib/Test.pm"
.annotate 'line', 205
    .param pmc CALL_SIG :call_sig 
    .lex "$code", $P101 
    .lex "$reason", $P102 
    .lex "$_", $P103 
    .lex "$/", $P104 
    .lex "$!", $P105 
    .lex "$ee", $P106 
    .lex "$ok", $P107 
    .lex "call_sig", $P108 
    .lex "$*DISPATCHER", $P109 
    .lex "&?ROUTINE", $P110 
    .local pmc _inline_arg_2 
    perl6_take_dispatcher 
    set $P5004, CALL_SIG
    set $P108, $P5004
    bind_signature 
    root_new $P111, ['parrot';'Continuation']
    set_label $P111, lexotic_94
    .lex "RETURN", $P111
.annotate 'line', 206
    find_lex $P5006, "$time_after"
    time $N5001
    perl6_box_num $P5007, $N5001
    perl6_container_store $P5006, $P5007
.annotate 'line', 207

    $P5006 = "&eval_exception"($P101)
    perl6_container_store $P106, $P5006
.annotate 'line', 208

    set _inline_arg_2, $P106
    $P5010 = _inline_arg_2."defined"()
    perl6ize_type $P5009, $P5010
    perl6_decontainerize_return_value $P5008, $P5009
    nqp_get_sc_object $P5009, "5C7C172868FA9510BA84BFF074E73D635E54D9D3", 1831
    perl6_type_check_return_value $P5008, $P5009
    find_lex $P5007, "&prefix:<not>"
    perl6_multi_dispatch_thunk $P5006, $P5007
    $P5010 = $P5006($P5008)
    $P5011 = "&proclaim"($P5010, $P102)
    perl6_container_store $P107, $P5011
    if $P107 goto unless33_end97 
.annotate 'line', 209
    nqp_get_sc_object $P5014, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 281
    $P5015 = $P106."Stringy"()
    find_lex $P5013, "&infix:<~>"
    perl6_multi_dispatch_thunk $P5012, $P5013
    $P5016 = $P5012($P5014, $P5015)
    $P5017 = "&diag"($P5016)
  unless33_end97:
.annotate 'line', 210
    find_lex $P5006, "$time_before"
    time $N5001
    perl6_box_num $P5007, $N5001
    perl6_container_store $P5006, $P5007
.annotate 'line', 211
    $P5006 = "&return"($P107)
    perl6_decontainerize_return_value $P5005, $P5006
    goto lexotic_95
  lexotic_94:
    .get_results ($P5005)
  lexotic_95:
    find_lex $P5006, "&EXHAUST"
    store_lex "RETURN", $P5006
    nqp_get_sc_object $P5007, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 276
    perl6_type_check_return_value $P5005, $P5007
    .return ($P5005) 
.end
.HLL "perl6"
.namespace []
.sub "eval_lives_ok" :subid("cuid_49_1372810463.03146") :anon :lex :outer("cuid_2_1372810463.03146")
.annotate 'file', "lib/Test.pm"
.annotate 'line', 205
    .param pmc CALL_SIG :call_sig 
    .lex "call_sig", $P101 
    set $P5001, CALL_SIG
    set $P101, $P5001
    bind_signature 
    perl6_enter_multi_dispatch_from_onlystar_block $P5002
    .return ($P5002) 
.end
.HLL "perl6"
.namespace []
.sub "is_deeply" :subid("cuid_50_1372810463.03146") :anon :lex :outer("cuid_2_1372810463.03146")
.annotate 'file', "lib/Test.pm"
.annotate 'line', 215
    .param pmc CALL_SIG :call_sig 
    .const 'Sub' $P5008 = 'cuid_51_1372810463.03146' 
    capture_lex $P5008 
    .lex "$got", $P101 
    .lex "$expected", $P102 
    .lex "$reason", $P103 
    .lex "$_", $P104 
    .lex "$/", $P105 
    .lex "$!", $P106 
    .lex "$test", $P107 
    .lex "$ok", $P108 
    .lex "call_sig", $P109 
    .lex "$*DISPATCHER", $P110 
    .lex "&?ROUTINE", $P111 
    .local pmc _inline_arg_3 
    .local pmc _inline_arg_4 
    perl6_take_dispatcher 
    set $P5004, CALL_SIG
    set $P109, $P5004
    bind_signature 
    root_new $P112, ['parrot';'Continuation']
    set_label $P112, lexotic_98
    .lex "RETURN", $P112
.annotate 'line', 216
    find_lex $P5006, "$time_after"
    time $N5001
    perl6_box_num $P5007, $N5001
    perl6_container_store $P5006, $P5007
.annotate 'line', 217

    set _inline_arg_3, $P101
    set _inline_arg_4, $P102
    $P5007 = "&infix:<eqv>"(_inline_arg_3, _inline_arg_4)
  chain_end_34100:
    perl6_decontainerize_return_value $P5006, $P5007
    nqp_get_sc_object $P5007, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 317
    perl6_type_check_return_value $P5006, $P5007
    perl6_container_store $P107, $P5006
.annotate 'line', 218

    $P5006 = "&proclaim"($P107, $P103)
    perl6_container_store $P108, $P5006
.annotate 'line', 219
    find_lex $P5007, "&prefix:<!>"
    perl6_multi_dispatch_thunk $P5006, $P5007
    $P5008 = $P5006($P107)
    unless $P5008 goto if35_else101 
    .const 'Sub' $P5009 = 'cuid_51_1372810463.03146' 
    capture_lex $P5009
    $P5010 = $P5009()
    goto if35_end102
  if35_else101:
    find_lex $P5011, "Nil"
  if35_end102:
.annotate 'line', 227
    find_lex $P5006, "$time_before"
    time $N5001
    perl6_box_num $P5007, $N5001
    perl6_container_store $P5006, $P5007
.annotate 'line', 228
    $P5006 = "&return"($P108)
    perl6_decontainerize_return_value $P5005, $P5006
    goto lexotic_99
  lexotic_98:
    .get_results ($P5005)
  lexotic_99:
    find_lex $P5006, "&EXHAUST"
    store_lex "RETURN", $P5006
    nqp_get_sc_object $P5007, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 290
    perl6_type_check_return_value $P5005, $P5007
    .return ($P5005) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_51_1372810463.03146") :anon :lex :outer("cuid_50_1372810463.03146")
.annotate 'file', "lib/Test.pm"
.annotate 'line', 219
    .param pmc CALL_SIG :call_sig 
    .const 'Sub' $P5006 = 'cuid_52_1372810463.03146' 
    capture_lex $P5006 
    .const 'Sub' $P5006 = 'cuid_53_1372810463.03146' 
    capture_lex $P5006 
    .const 'Sub' $P5006 = 'cuid_54_1372810463.03146' 
    capture_lex $P5006 
    .lex "$_", $P101 
    .lex "$got_perl", $P102 
    .lex "$expected_perl", $P103 
    .lex "call_sig", $P104 
    .lex "$*DISPATCHER", $P105 
    perl6_take_dispatcher 
    .const 'Sub' $P5002 = 'cuid_52_1372810463.03146' 
    capture_lex $P5002
    .const 'Sub' $P5003 = 'cuid_53_1372810463.03146' 
    capture_lex $P5003
    set $P5004, CALL_SIG
    set $P104, $P5004
    bind_signature 
.annotate 'line', 220

    new $P5006, 'ExceptionHandler'
    set_label $P5006, catch_handler_37104
    $P5006.'handle_types_except'(.CONTROL_ALL)
    push_eh $P5006
    nqp_get_sc_object $P5006, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 299
    $P5007 = $P5006()
    find_lex $P5008, "$!"
    find_lex $P5009, "Any"
    perl6_container_store $P5008, $P5009
    set $P5007, $P5007
    pop_eh 
    goto skip_handler_36103
  catch_handler_37104:
    .get_results ($P5006) 
    find_lex $P10001, "$!"
    $P10002 = "&EXCEPTION"($P5006)
    perl6_container_store $P10001, $P10002
    null $P10003
    perl6_invoke_catchhandler $P10003, $P5006
    finalize $P5006
    pop_upto_eh $P5006
    pop_eh 
    set $P5007, $P10001
    goto skip_handler_36103
  skip_handler_36103:
    perl6_container_store $P102, $P5007
.annotate 'line', 221

    new $P5006, 'ExceptionHandler'
    set_label $P5006, catch_handler_39106
    $P5006.'handle_types_except'(.CONTROL_ALL)
    push_eh $P5006
    nqp_get_sc_object $P5006, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 302
    $P5007 = $P5006()
    find_lex $P5008, "$!"
    find_lex $P5009, "Any"
    perl6_container_store $P5008, $P5009
    set $P5007, $P5007
    pop_eh 
    goto skip_handler_38105
  catch_handler_39106:
    .get_results ($P5006) 
    find_lex $P10001, "$!"
    $P10002 = "&EXCEPTION"($P5006)
    perl6_container_store $P10001, $P10002
    null $P10003
    perl6_invoke_catchhandler $P10003, $P5006
    finalize $P5006
    pop_upto_eh $P5006
    pop_eh 
    set $P5007, $P10001
    goto skip_handler_38105
  skip_handler_38105:
    perl6_container_store $P103, $P5007
.annotate 'line', 222
    $P5007 = $P102."defined"()
    perl6ize_type $P5006, $P5007
    set $P5010, $P5006
    unless $P5006 goto if41_end110 
    $P5009 = $P103."defined"()
    perl6ize_type $P5008, $P5009
    set $P5010, $P5008
  if41_end110:
    unless $P5010 goto if40_else107 
    .const 'Sub' $P5011 = 'cuid_54_1372810463.03146' 
    capture_lex $P5011
    $P5012 = $P5011()
    set $P5014, $P5012
    goto if40_end108
  if40_else107:
    find_lex $P5013, "Nil"
    set $P5014, $P5013
  if40_end108:
    .return ($P5014) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_52_1372810463.03146") :anon :lex :outer("cuid_51_1372810463.03146")
.annotate 'file', "lib/Test.pm"
.annotate 'line', 220
    .lex "$_", $P101 
    find_lex $P5003, "$got"
    $P5004 = $P5003."perl"()
    perl6ize_type $P5002, $P5004
    .return ($P5002) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_53_1372810463.03146") :anon :lex :outer("cuid_51_1372810463.03146")
.annotate 'file', "lib/Test.pm"
.annotate 'line', 221
    .lex "$_", $P101 
    find_lex $P5003, "$expected"
    $P5004 = $P5003."perl"()
    perl6ize_type $P5002, $P5004
    .return ($P5002) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_54_1372810463.03146") :anon :lex :outer("cuid_51_1372810463.03146")
.annotate 'file', "lib/Test.pm"
.annotate 'line', 222
    .param pmc CALL_SIG :call_sig 
    .lex "$_", $P101 
    .lex "call_sig", $P102 
    .lex "$*DISPATCHER", $P103 
    perl6_take_dispatcher 
    set $P5002, CALL_SIG
    set $P102, $P5002
    bind_signature 
.annotate 'line', 223
    nqp_get_sc_object $P5006, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 305
    find_lex $P5007, "$got_perl"
    $P5008 = $P5007."Stringy"()
    find_lex $P5005, "&infix:<~>"
    perl6_multi_dispatch_thunk $P5004, $P5005
    $P5009 = $P5004($P5006, $P5008)
    "&diag"($P5009)
.annotate 'line', 224
    nqp_get_sc_object $P5006, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 127
    find_lex $P5007, "$expected_perl"
    $P5008 = $P5007."Stringy"()
    find_lex $P5005, "&infix:<~>"
    perl6_multi_dispatch_thunk $P5004, $P5005
    $P5009 = $P5004($P5006, $P5008)
    $P5010 = "&diag"($P5009)
    .return ($P5010) 
.end
.HLL "perl6"
.namespace []
.sub "is_deeply" :subid("cuid_55_1372810463.03146") :anon :lex :outer("cuid_2_1372810463.03146")
.annotate 'file', "lib/Test.pm"
.annotate 'line', 214
    .param pmc CALL_SIG :call_sig 
    .lex "call_sig", $P101 
    set $P5001, CALL_SIG
    set $P101, $P5001
    bind_signature 
    perl6_enter_multi_dispatch_from_onlystar_block $P5002
    .return ($P5002) 
.end
.HLL "perl6"
.namespace []
.sub "_is_deeply" :subid("cuid_56_1372810463.03146") :anon :lex :outer("cuid_2_1372810463.03146")
.annotate 'file', "lib/Test.pm"
.annotate 'line', 231
    .param pmc CALL_SIG :call_sig 
    .lex "$got", $P101 
    .lex "$expected", $P102 
    .lex "$_", $P103 
    .lex "$/", $P104 
    .lex "$!", $P105 
    .lex "call_sig", $P106 
    .lex "$*DISPATCHER", $P107 
    .lex "&?ROUTINE", $P108 
    perl6_take_dispatcher 
    set $P5004, CALL_SIG
    set $P106, $P5004
    bind_signature 
.annotate 'line', 232
    find_lex $P5008, "&infix:<eqv>"
    perl6_multi_dispatch_thunk $P5007, $P5008
    $P5009 = $P5007($P101, $P102)
    perl6_decontainerize_return_value $P5006, $P5009
    nqp_get_sc_object $P5007, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 317
    perl6_type_check_return_value $P5006, $P5007
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "eval_exception" :subid("cuid_58_1372810463.03146") :anon :lex :outer("cuid_2_1372810463.03146")
.annotate 'file', "lib/Test.pm"
.annotate 'line', 238
    .param pmc CALL_SIG :call_sig 
    .const 'Sub' $P5010 = 'cuid_57_1372810463.03146' 
    capture_lex $P5010 
    .lex "$code", $P101 
    .lex "$_", $P102 
    .lex "$/", $P103 
    .lex "$!", $P104 
    .lex "call_sig", $P105 
    .lex "$*DISPATCHER", $P106 
    .lex "&?ROUTINE", $P107 
    perl6_take_dispatcher 
    .const 'Sub' $P5004 = 'cuid_57_1372810463.03146' 
    capture_lex $P5004
    set $P5005, CALL_SIG
    set $P105, $P5005
    bind_signature 
    root_new $P108, ['parrot';'Continuation']
    set_label $P108, lexotic_111
    .lex "RETURN", $P108
    new $P5008, 'ExceptionHandler'
    set_label $P5008, catch_handler_43114
    $P5008.'handle_types_except'(.CONTROL_ALL)
    push_eh $P5008
    nqp_get_sc_object $P5008, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 325
    $P5009 = $P5008()
    find_lex $P5010, "$!"
    find_lex $P5011, "Any"
    perl6_container_store $P5010, $P5011
    set $P5009, $P5009
    pop_eh 
    goto skip_handler_42113
  catch_handler_43114:
    .get_results ($P5008) 
    find_lex $P10001, "$!"
    $P10002 = "&EXCEPTION"($P5008)
    perl6_container_store $P10001, $P10002
    null $P10003
    perl6_invoke_catchhandler $P10003, $P5008
    finalize $P5008
    pop_upto_eh $P5008
    pop_eh 
    set $P5009, $P10001
    goto skip_handler_42113
  skip_handler_42113:
.annotate 'line', 242
    find_lex $P5008, "$!"
    perl6_decontainerize_return_value $P5007, $P5008
    goto lexotic_112
  lexotic_111:
    .get_results ($P5007)
  lexotic_112:
    find_lex $P5008, "&EXHAUST"
    store_lex "RETURN", $P5008
    nqp_get_sc_object $P5009, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 324
    perl6_type_check_return_value $P5007, $P5009
    .return ($P5007) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_57_1372810463.03146") :anon :lex :outer("cuid_58_1372810463.03146")
.annotate 'file', "lib/Test.pm"
.annotate 'line', 239
    .lex "$_", $P101 
.annotate 'line', 240
    find_lex $P5004, "$code"
    find_lex $P5003, "&eval"
    perl6_multi_dispatch_thunk $P5002, $P5003
    $P5005 = $P5002($P5004)
    .return ($P5005) 
.end
.HLL "perl6"
.namespace []
.sub "proclaim" :subid("cuid_64_1372810463.03146") :anon :lex :outer("cuid_2_1372810463.03146")
.annotate 'file', "lib/Test.pm"
.annotate 'line', 245
    .param pmc CALL_SIG :call_sig 
    .const 'Sub' $P5009 = 'cuid_60_1372810463.03146' 
    capture_lex $P5009 
    .const 'Sub' $P5009 = 'cuid_61_1372810463.03146' 
    capture_lex $P5009 
    .const 'Sub' $P5009 = 'cuid_62_1372810463.03146' 
    capture_lex $P5009 
    .const 'Sub' $P5009 = 'cuid_63_1372810463.03146' 
    capture_lex $P5009 
    .lex "$cond", $P101 
    .lex "$desc", $P102 
    .lex "$_", $P103 
    .lex "$/", $P104 
    .lex "$!", $P105 
    .lex "call_sig", $P106 
    .lex "$*DISPATCHER", $P107 
    .lex "&?ROUTINE", $P108 
    perl6_take_dispatcher 
    set $P5004, CALL_SIG
    set $P106, $P5004
    bind_signature 
    root_new $P109, ['parrot';'Continuation']
    set_label $P109, lexotic_115
    .lex "RETURN", $P109
.annotate 'line', 247
    find_lex $P5007, "$num_of_tests_run"
    find_lex $P5010, "$num_of_tests_run"
    nqp_get_sc_object $P5011, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 14
    find_lex $P5009, "&infix:<+>"
    perl6_multi_dispatch_thunk $P5008, $P5009
    $P5012 = $P5008($P5010, $P5011)
    perl6_container_store $P5007, $P5012
.annotate 'line', 249

    if $P101 goto unless44_end118 
    .const 'Sub' $P5007 = 'cuid_60_1372810463.03146' 
    capture_lex $P5007
    $P5008 = $P5007()
  unless44_end118:
.annotate 'line', 255
    nqp_get_sc_object $P5007, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 337
    find_lex $P5008, "$num_of_tests_run"
    nqp_get_sc_object $P5009, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 338
    "&print"($P5007, $P5008, $P5009, $P102)
.annotate 'line', 256
    find_lex $P5007, "$todo_reason"
    set $P5013, $P5007
    unless $P5007 goto if47_end124 
    find_lex $P5010, "$num_of_tests_run"
    find_lex $P5011, "$todo_upto_test_num"
    find_lex $P5009, "&infix:<<=>"
    perl6_multi_dispatch_thunk $P5008, $P5009
    $P5012 = $P5008($P5010, $P5011)
    set $P5013, $P5012
  if47_end124:
    unless $P5013 goto if46_else121 
    .const 'Sub' $P5014 = 'cuid_61_1372810463.03146' 
    capture_lex $P5014
    $P5015 = $P5014()
    goto if46_end122
  if46_else121:
    find_lex $P5016, "Nil"
  if46_end122:
.annotate 'line', 259
    nqp_get_sc_object $P5007, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 341
    "&print"($P5007)
.annotate 'line', 261
    find_lex $P5007, "$perl6_test_times"
    unless $P5007 goto if48_else125 
.annotate 'line', 260
    nqp_get_sc_object $P5012, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 342
    find_lex $P5019, "$time_after"
    find_lex $P5020, "$time_before"
    find_lex $P5018, "&infix:<->"
    perl6_multi_dispatch_thunk $P5017, $P5018
    $P5021 = $P5017($P5019, $P5020)
    nqp_get_sc_object $P5022, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 34
    find_lex $P5016, "&infix:<*>"
    perl6_multi_dispatch_thunk $P5015, $P5016
    $P5023 = $P5015($P5021, $P5022)
    find_lex $P5014, "&ceiling"
    perl6_multi_dispatch_thunk $P5013, $P5014
    $P5024 = $P5013($P5023)
    find_lex $P5011, "&infix:<~>"
    perl6_multi_dispatch_thunk $P5010, $P5011
    $P5025 = $P5010($P5012, $P5024)
    nqp_get_sc_object $P5026, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 341
    find_lex $P5009, "&infix:<~>"
    perl6_multi_dispatch_thunk $P5008, $P5009
    $P5027 = $P5008($P5025, $P5026)
    $P5028 = "&print"($P5027)
    goto if48_end126
  if48_else125:
    find_lex $P5029, "Nil"
  if48_end126:
.annotate 'line', 263
    find_lex $P5008, "&prefix:<!>"
    perl6_multi_dispatch_thunk $P5007, $P5008
    $P5009 = $P5007($P101)
    set $P5011, $P5009
    unless $P5009 goto if51_end132 
    find_lex $P5010, "$die_on_fail"
    set $P5011, $P5010
  if51_end132:
    set $P5016, $P5011
    unless $P5011 goto if50_end130 
    find_lex $P5014, "$todo_reason"
    find_lex $P5013, "&prefix:<!>"
    perl6_multi_dispatch_thunk $P5012, $P5013
    $P5015 = $P5012($P5014)
    set $P5016, $P5015
  if50_end130:
    unless $P5016 goto if49_else127 
    .const 'Sub' $P5017 = 'cuid_62_1372810463.03146' 
    capture_lex $P5017
    $P5018 = $P5017()
    goto if49_end128
  if49_else127:
    find_lex $P5019, "Nil"
  if49_end128:
.annotate 'line', 267
    find_lex $P5009, "$todo_upto_test_num"
    find_lex $P5010, "$num_of_tests_run"
    find_lex $P5008, "&infix:<==>"
    perl6_multi_dispatch_thunk $P5007, $P5008
    $P5011 = $P5007($P5009, $P5010)
    unless $P5011 goto if52_else133 
    .const 'Sub' $P5012 = 'cuid_63_1372810463.03146' 
    capture_lex $P5012
    $P5013 = $P5012()
    goto if52_end134
  if52_else133:
    find_lex $P5014, "Nil"
  if52_end134:
.annotate 'line', 268

    perl6_decontainerize_return_value $P5006, $P101
    goto lexotic_116
  lexotic_115:
    .get_results ($P5006)
  lexotic_116:
    find_lex $P5007, "&EXHAUST"
    store_lex "RETURN", $P5007
    nqp_get_sc_object $P5008, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 331
    perl6_type_check_return_value $P5006, $P5008
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_60_1372810463.03146") :anon :lex :outer("cuid_64_1372810463.03146")
.annotate 'file', "lib/Test.pm"
.annotate 'line', 249
    .param pmc CALL_SIG :call_sig 
    .const 'Sub' $P5004 = 'cuid_59_1372810463.03146' 
    capture_lex $P5004 
    .lex "$_", $P101 
    .lex "call_sig", $P102 
    .lex "$*DISPATCHER", $P103 
    perl6_take_dispatcher 
    set $P5002, CALL_SIG
    set $P102, $P5002
    bind_signature 
.annotate 'line', 250
    nqp_get_sc_object $P5004, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 333
    "&print"($P5004)
.annotate 'line', 251
    find_lex $P5006, "$num_of_tests_run"
    find_lex $P5007, "$todo_upto_test_num"
    find_lex $P5005, "&infix:<<=>"
    perl6_multi_dispatch_thunk $P5004, $P5005
    $P5008 = $P5004($P5006, $P5007)
    set $P5011, $P5008
    if $P5008 goto unless45_end120 
    .const 'Sub' $P5009 = 'cuid_59_1372810463.03146' 
    capture_lex $P5009
    $P5010 = $P5009()
    set $P5011, $P5010
  unless45_end120:
    .return ($P5011) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_59_1372810463.03146") :anon :lex :outer("cuid_60_1372810463.03146")
.annotate 'file', "lib/Test.pm"
.annotate 'line', 251
    .param pmc CALL_SIG :call_sig 
    .lex "$_", $P101 
    .lex "call_sig", $P102 
    .lex "$*DISPATCHER", $P103 
    perl6_take_dispatcher 
    set $P5002, CALL_SIG
    set $P102, $P5002
    bind_signature 
.annotate 'line', 252
    find_lex $P5004, "$num_of_tests_failed"
    find_lex $P5007, "$num_of_tests_failed"
    nqp_get_sc_object $P5008, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 14
    find_lex $P5006, "&infix:<+>"
    perl6_multi_dispatch_thunk $P5005, $P5006
    $P5009 = $P5005($P5007, $P5008)
    perl6_container_store $P5004, $P5009
    .return ($P5004) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_61_1372810463.03146") :anon :lex :outer("cuid_64_1372810463.03146")
.annotate 'file', "lib/Test.pm"
.annotate 'line', 256
    .param pmc CALL_SIG :call_sig 
    .lex "$_", $P101 
    .lex "call_sig", $P102 
    .lex "$*DISPATCHER", $P103 
    perl6_take_dispatcher 
    set $P5002, CALL_SIG
    set $P102, $P5002
    bind_signature 
.annotate 'line', 257
    find_lex $P5004, "$todo_reason"
    $P5005 = "&print"($P5004)
    .return ($P5005) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_62_1372810463.03146") :anon :lex :outer("cuid_64_1372810463.03146")
.annotate 'file', "lib/Test.pm"
.annotate 'line', 263
    .param pmc CALL_SIG :call_sig 
    .lex "$_", $P101 
    .lex "call_sig", $P102 
    .lex "$*DISPATCHER", $P103 
    perl6_take_dispatcher 
    set $P5002, CALL_SIG
    set $P102, $P5002
    bind_signature 
.annotate 'line', 264
    nqp_get_sc_object $P5006, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 344
    find_lex $P5005, "&die"
    perl6_multi_dispatch_thunk $P5004, $P5005
    $P5007 = $P5004($P5006)
    .return ($P5007) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_63_1372810463.03146") :anon :lex :outer("cuid_64_1372810463.03146")
.annotate 'file', "lib/Test.pm"
.annotate 'line', 267
    .param pmc CALL_SIG :call_sig 
    .lex "$_", $P101 
    .lex "call_sig", $P102 
    .lex "$*DISPATCHER", $P103 
    perl6_take_dispatcher 
    set $P5002, CALL_SIG
    set $P102, $P5002
    bind_signature 
    find_lex $P5004, "$todo_reason"
    nqp_get_sc_object $P5005, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 11
    perl6_container_store $P5004, $P5005
    .return ($P5004) 
.end
.HLL "perl6"
.namespace []
.sub "done_testing" :subid("cuid_65_1372810463.03146") :anon :lex :outer("cuid_2_1372810463.03146")
.annotate 'file', "lib/Test.pm"
.annotate 'line', 271
    .param pmc CALL_SIG :call_sig 
    .lex "$_", $P101 
    .lex "$/", $P102 
    .lex "$!", $P103 
    .lex "call_sig", $P104 
    .lex "$*DISPATCHER", $P105 
    .lex "&?ROUTINE", $P106 
    perl6_take_dispatcher 
    set $P5004, CALL_SIG
    set $P104, $P5004
    bind_signature 
    root_new $P107, ['parrot';'Continuation']
    set_label $P107, lexotic_135
    .lex "RETURN", $P107
.annotate 'line', 272
    nqp_get_sc_object $P5009, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 355
    find_lex $P5008, "&die"
    perl6_multi_dispatch_thunk $P5007, $P5008
    $P5010 = $P5007($P5009)
    perl6_decontainerize_return_value $P5006, $P5010
    goto lexotic_136
  lexotic_135:
    .get_results ($P5006)
  lexotic_136:
    find_lex $P5007, "&EXHAUST"
    store_lex "RETURN", $P5007
    nqp_get_sc_object $P5008, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 354
    perl6_type_check_return_value $P5006, $P5008
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "done" :subid("cuid_69_1372810463.03146") :anon :lex :outer("cuid_2_1372810463.03146")
.annotate 'file', "lib/Test.pm"
.annotate 'line', 275
    .param pmc CALL_SIG :call_sig 
    .const 'Sub' $P5009 = 'cuid_66_1372810463.03146' 
    capture_lex $P5009 
    .const 'Sub' $P5009 = 'cuid_67_1372810463.03146' 
    capture_lex $P5009 
    .const 'Sub' $P5009 = 'cuid_68_1372810463.03146' 
    capture_lex $P5009 
    .lex "$_", $P101 
    .lex "$/", $P102 
    .lex "$!", $P103 
    .lex "call_sig", $P104 
    .lex "$*DISPATCHER", $P105 
    .lex "&?ROUTINE", $P106 
    perl6_take_dispatcher 
    set $P5004, CALL_SIG
    set $P104, $P5004
    bind_signature 
    root_new $P107, ['parrot';'Continuation']
    set_label $P107, lexotic_137
    .lex "RETURN", $P107
.annotate 'line', 276
    find_lex $P5007, "$done_testing_has_been_run"
    nqp_get_sc_object $P5008, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 14
    perl6_container_store $P5007, $P5008
.annotate 'line', 278
    find_lex $P5007, "$no_plan"
    unless $P5007 goto if53_else139 
    .const 'Sub' $P5008 = 'cuid_66_1372810463.03146' 
    capture_lex $P5008
    $P5009 = $P5008()
    goto if53_end140
  if53_else139:
    find_lex $P5010, "Nil"
  if53_end140:
.annotate 'line', 283
    find_lex $P5009, "$num_of_tests_planned"
    find_lex $P5010, "$num_of_tests_run"
    find_lex $P5008, "&infix:<!=>"
    perl6_multi_dispatch_thunk $P5007, $P5008
    $P5011 = $P5007($P5009, $P5010)
    unless $P5011 goto if54_else141 
    .const 'Sub' $P5012 = 'cuid_67_1372810463.03146' 
    capture_lex $P5012
    $P5013 = $P5012()
    goto if54_end142
  if54_else141:
    find_lex $P5014, "Nil"
  if54_end142:
.annotate 'line', 286
    find_lex $P5007, "$num_of_tests_failed"
    unless $P5007 goto if55_else143 
    .const 'Sub' $P5008 = 'cuid_68_1372810463.03146' 
    capture_lex $P5008
    $P5009 = $P5008()
    set $P5011, $P5009
    goto if55_end144
  if55_else143:
    find_lex $P5010, "Nil"
    set $P5011, $P5010
  if55_end144:
    perl6_decontainerize_return_value $P5006, $P5011
    goto lexotic_138
  lexotic_137:
    .get_results ($P5006)
  lexotic_138:
    find_lex $P5007, "&EXHAUST"
    store_lex "RETURN", $P5007
    nqp_get_sc_object $P5008, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 358
    perl6_type_check_return_value $P5006, $P5008
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_66_1372810463.03146") :anon :lex :outer("cuid_69_1372810463.03146")
.annotate 'file', "lib/Test.pm"
.annotate 'line', 278
    .param pmc CALL_SIG :call_sig 
    .lex "$_", $P101 
    .lex "call_sig", $P102 
    .lex "$*DISPATCHER", $P103 
    perl6_take_dispatcher 
    set $P5002, CALL_SIG
    set $P102, $P5002
    bind_signature 
.annotate 'line', 279
    find_lex $P5004, "$num_of_tests_planned"
    find_lex $P5005, "$num_of_tests_run"
    perl6_container_store $P5004, $P5005
.annotate 'line', 280
    nqp_get_sc_object $P5006, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 31
    find_lex $P5007, "$num_of_tests_planned"
    $P5008 = $P5007."Stringy"()
    find_lex $P5005, "&infix:<~>"
    perl6_multi_dispatch_thunk $P5004, $P5005
    $P5009 = $P5004($P5006, $P5008)
    $P5010 = "&say"($P5009)
    .return ($P5010) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_67_1372810463.03146") :anon :lex :outer("cuid_69_1372810463.03146")
.annotate 'file', "lib/Test.pm"
.annotate 'line', 283
    .param pmc CALL_SIG :call_sig 
    .lex "$_", $P101 
    .lex "call_sig", $P102 
    .lex "$*DISPATCHER", $P103 
    perl6_take_dispatcher 
    set $P5002, CALL_SIG
    set $P102, $P5002
    bind_signature 
.annotate 'line', 284
    nqp_get_sc_object $P5010, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 362
    find_lex $P5011, "$num_of_tests_planned"
    $P5012 = $P5011."Stringy"()
    find_lex $P5009, "&infix:<~>"
    perl6_multi_dispatch_thunk $P5008, $P5009
    $P5013 = $P5008($P5010, $P5012)
    nqp_get_sc_object $P5014, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 363
    find_lex $P5007, "&infix:<~>"
    perl6_multi_dispatch_thunk $P5006, $P5007
    $P5015 = $P5006($P5013, $P5014)
    find_lex $P5016, "$num_of_tests_run"
    $P5017 = $P5016."Stringy"()
    find_lex $P5005, "&infix:<~>"
    perl6_multi_dispatch_thunk $P5004, $P5005
    $P5018 = $P5004($P5015, $P5017)
    $P5019 = "&diag"($P5018)
    .return ($P5019) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_68_1372810463.03146") :anon :lex :outer("cuid_69_1372810463.03146")
.annotate 'file', "lib/Test.pm"
.annotate 'line', 286
    .param pmc CALL_SIG :call_sig 
    .lex "$_", $P101 
    .lex "call_sig", $P102 
    .lex "$*DISPATCHER", $P103 
    perl6_take_dispatcher 
    set $P5002, CALL_SIG
    set $P102, $P5002
    bind_signature 
.annotate 'line', 287
    nqp_get_sc_object $P5010, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 366
    find_lex $P5011, "$num_of_tests_failed"
    $P5012 = $P5011."Stringy"()
    find_lex $P5009, "&infix:<~>"
    perl6_multi_dispatch_thunk $P5008, $P5009
    $P5013 = $P5008($P5010, $P5012)
    nqp_get_sc_object $P5014, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 367
    find_lex $P5007, "&infix:<~>"
    perl6_multi_dispatch_thunk $P5006, $P5007
    $P5015 = $P5006($P5013, $P5014)
    find_lex $P5016, "$num_of_tests_run"
    $P5017 = $P5016."Stringy"()
    find_lex $P5005, "&infix:<~>"
    perl6_multi_dispatch_thunk $P5004, $P5005
    $P5018 = $P5004($P5015, $P5017)
    $P5019 = "&diag"($P5018)
    .return ($P5019) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_71_1372810463.03146") :anon :lex :outer("cuid_2_1372810463.03146")
.annotate 'file', "lib/Test.pm"
.annotate 'line', 291
    .const 'Sub' $P5002 = 'cuid_70_1372810463.03146' 
    capture_lex $P5002 
    .lex "$_", $P101 
.annotate 'line', 294
    find_lex $P5004, "$done_testing_has_been_run"
    find_lex $P5003, "&prefix:<!>"
    perl6_multi_dispatch_thunk $P5002, $P5003
    $P5005 = $P5002($P5004)
    set $P5010, $P5005
    unless $P5005 goto if57_end148 
    find_lex $P5008, "$no_plan"
    find_lex $P5007, "&prefix:<!>"
    perl6_multi_dispatch_thunk $P5006, $P5007
    $P5009 = $P5006($P5008)
    set $P5010, $P5009
  if57_end148:
    unless $P5010 goto if56_else145 
    .const 'Sub' $P5011 = 'cuid_70_1372810463.03146' 
    capture_lex $P5011
    $P5012 = $P5011()
    set $P5014, $P5012
    goto if56_end146
  if56_else145:
    find_lex $P5013, "Nil"
    set $P5014, $P5013
  if56_end146:
    .return ($P5014) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_70_1372810463.03146") :anon :lex :outer("cuid_71_1372810463.03146")
.annotate 'file', "lib/Test.pm"
.annotate 'line', 294
    .param pmc CALL_SIG :call_sig 
    .lex "$_", $P101 
    .lex "call_sig", $P102 
    .lex "$*DISPATCHER", $P103 
    perl6_take_dispatcher 
    set $P5002, CALL_SIG
    set $P102, $P5002
    bind_signature 
.annotate 'line', 295
    $P5004 = "&done"()
    .return ($P5004) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_74_1372810463.03146") :load :init
.annotate 'file', "lib/Test.pm"
    .const 'Sub' $P5001 = 'cuid_73_1372810463.03146' 
    capture_lex $P5001 
    .local pmc cur_sc 
    .local pmc conflicts 
    nqp_dynop_setup 
    nqp_bigint_setup 
    nqp_native_call_setup 
    rakudo_dynop_setup 
    getinterp $P5001
    get_class $P5002, "LexPad"
    get_class $P5003, "Perl6LexPad"
    $P5001."hll_map"($P5002, $P5003)
    load_bytecode "ModuleLoader.pbc"
    get_root_namespace $P5003
    set $P5002, $P5003["nqp"]
    set $P5001, $P5002["ModuleLoader"]
    $P5001."load_module"("Perl6::ModuleLoader")
    .const 'Sub' $P5001 = "cuid_72_1372810463.03146" 
    get_hll_global $P5002, "ModuleLoader"
    $P5003 = $P5002."load_setting"("CORE")
    $P5001."set_outer_ctx"($P5003)
    nqp_create_sc $P5001, "3F93BE68EB295025816D031E870C2DA17DAA27BB"
    set cur_sc, $P5001
    cur_sc."set_description"("lib/Test.pm")
    new $P5002, 'ResizablePMCArray'
    set conflicts, $P5002
    new $P5003, 'ResizableStringArray'
    null $S5001
    push $P5003, $S5001
    push $P5003, "Uninstantiable"
    push $P5003, "25B76D5348C2A22A9722D68A7288B5D268CF8F4E-1372810229.31343"
    push $P5003, "src/gen/Metamodel.pm"
    push $P5003, "GLOBALish"
    push $P5003, "EXPORT"
    push $P5003, "$?PACKAGE"
    push $P5003, "::?PACKAGE"
    push $P5003, "Test"
    push $P5003, "$=pod"
    push $P5003, "!UNIT_MARKER"
    push $P5003, "5C7C172868FA9510BA84BFF074E73D635E54D9D3"
    push $P5003, "src/gen/CORE.setting"
    push $P5003, "$num_of_tests_run"
    push $P5003, "$num_of_tests_failed"
    push $P5003, "$todo_upto_test_num"
    push $P5003, "$todo_reason"
    push $P5003, "$num_of_tests_planned"
    push $P5003, "$no_plan"
    push $P5003, "$die_on_fail"
    push $P5003, "$perl6_test_times"
    push $P5003, "$time_before"
    push $P5003, "$time_after"
    push $P5003, "$done_testing_has_been_run"
    push $P5003, "&die_on_fail"
    push $P5003, "&plan"
    push $P5003, "&pass"
    push $P5003, "&ok"
    push $P5003, "&nok"
    push $P5003, "&is"
    push $P5003, "&isnt"
    push $P5003, "&is_approx"
    push $P5003, "&todo"
    push $P5003, "&skip"
    push $P5003, "&skip_rest"
    push $P5003, "&diag"
    push $P5003, "&flunk"
    push $P5003, "&isa_ok"
    push $P5003, "&dies_ok"
    push $P5003, "&lives_ok"
    push $P5003, "&eval_dies_ok"
    push $P5003, "&eval_lives_ok"
    push $P5003, "&is_deeply"
    push $P5003, "&_is_deeply"
    push $P5003, "&eval_exception"
    push $P5003, "&proclaim"
    push $P5003, "&done_testing"
    push $P5003, "&done"
    push $P5003, "27420382D80CEF05775E7415279171A93892A1F1-1372810242.10453"
    push $P5003, "src/gen/BOOTSTRAP.pm"
    push $P5003, "0"
    push $P5003, ""
    push $P5003, "1"
    push $P5003, "%*ENV"
    push $P5003, "PERL6_TEST_TIMES"
    push $P5003, "$fail"
    push $P5003, "&?ROUTINE"
    push $P5003, "1.."
    push $P5003, "# between two timestamps "
    push $P5003, "1000000"
    push $P5003, " microseconds"
    push $P5003, "$number_of_tests"
    push $P5003, "$*DISPATCHER"
    push $P5003, "$desc"
    push $P5003, "$cond"
    push $P5003, "$ok"
    push $P5003, "$got"
    push $P5003, "$expected"
    push $P5003, "$test"
    push $P5003, "     got: '"
    push $P5003, "'"
    push $P5003, "expected: '"
    push $P5003, "$tol"
    push $P5003, "got:      "
    push $P5003, "expected: "
    push $P5003, "# TODO "
    push $P5003, "$reason"
    push $P5003, "$count"
    push $P5003, "# SKIP"
    push $P5003, "skip() was passed a non-numeric number of tests.  Did you get the arguments backwards?"
    push $P5003, "$i"
    push $P5003, "# SKIP "
    push $P5003, "<unknown>"
    push $P5003, "%_"
    push $P5003, "# "
    push $P5003, "g"
    push $P5003, "$message"
    push $P5003, "flunk "
    push $P5003, "$var"
    push $P5003, "$type"
    push $P5003, "The object is-a '"
    push $P5003, "Actual type: "
    push $P5003, "name"
    push $P5003, "$msg"
    push $P5003, "$closure"
    push $P5003, "$death"
    push $P5003, "$bad_death"
    push $P5003, "Null PMC access"
    push $P5003, "Wrong way to die: '"
    push $P5003, "$code"
    push $P5003, "$ee"
    push $P5003, "Null PMC access "
    push $P5003, "wrong way to die: '"
    push $P5003, "Error: "
    push $P5003, "$got_perl"
    push $P5003, "$expected_perl"
    push $P5003, "     got: "
    push $P5003, "not "
    push $P5003, "ok "
    push $P5003, " - "
    push $P5003, "\n"
    push $P5003, "# t="
    push $P5003, "Test failed.  Stopping test"
    push $P5003, "done_testing() has been renamed to done(), please change your test code"
    push $P5003, "Looks like you planned "
    push $P5003, " tests, but ran "
    push $P5003, "Looks like you failed "
    push $P5003, " tests of "
    push $P5003, "GLOBAL"
    push $P5003, "ALL"
    push $P5003, "DEFAULT"
    push $P5003, "3B5823CF115D2D332A76E16C0814B4A030A2FFA1-1372810037.12773"
    push $P5003, "src/stage2/QASTNode.nqp"
    push $P5003, "28FAC381EB59BA79DA1D75F70404C20E0548F4F5-1372810034.5696"
    push $P5003, "src/stage2/NQPCORE.setting"
    push $P5003, "p6typecheckrv"
    push $P5003, "p6decontrv"
    push $P5003, "&infix:<eqv>"
    push $P5003, "chain"
    .const 'Sub' $P5004 = 'cuid_73_1372810463.03146' 
    capture_lex $P5004
    $P5005 = $P5004()
    nqp_deserialize_sc "[encoded data, 34708 characters]", cur_sc, $P5003, $P5005, conflicts
    unless conflicts goto if58_end150 
    get_hll_global $P5006, "ModuleLoader"
    $P5007 = $P5006."resolve_repossession_conflicts"(conflicts)
  if58_end150:
    .const "LexInfo" $P5001 = "cuid_1_1372810463.03146"
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 2
    $P5001."set_static_lexpad"($P5002)
    .const "LexInfo" $P5001 = "cuid_2_1372810463.03146"
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 5
    $P5001."set_static_lexpad"($P5002)
    .const "LexInfo" $P5001 = "cuid_3_1372810463.03146"
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 26
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_3_1372810463.03146" 
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 22
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_4_1372810463.03146" 
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 28
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_5_1372810463.03146" 
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 30
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_6_1372810463.03146"
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 39
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_6_1372810463.03146" 
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 27
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_7_1372810463.03146"
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 43
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_7_1372810463.03146" 
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 42
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_8_1372810463.03146"
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 52
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_8_1372810463.03146" 
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 48
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_9_1372810463.03146"
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 56
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_9_1372810463.03146" 
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 55
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_10_1372810463.03146"
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 60
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_10_1372810463.03146" 
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 57
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_11_1372810463.03146"
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 68
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_11_1372810463.03146" 
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 67
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_12_1372810463.03146"
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 72
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_12_1372810463.03146" 
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 69
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_13_1372810463.03146"
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 80
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_13_1372810463.03146" 
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 79
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_14_1372810463.03146"
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 85
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_15_1372810463.03146" 
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 87
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_14_1372810463.03146" 
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 81
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_16_1372810463.03146"
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 100
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_16_1372810463.03146" 
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 99
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_17_1372810463.03146"
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 105
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_17_1372810463.03146" 
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 101
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_18_1372810463.03146"
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 115
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_18_1372810463.03146" 
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 114
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_19_1372810463.03146"
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 120
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_20_1372810463.03146" 
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 125
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_19_1372810463.03146" 
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 116
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_21_1372810463.03146"
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 137
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_21_1372810463.03146" 
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 136
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_22_1372810463.03146"
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 145
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_22_1372810463.03146" 
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 138
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_23_1372810463.03146"
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 149
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_23_1372810463.03146" 
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 148
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_24_1372810463.03146"
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 153
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_24_1372810463.03146" 
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 150
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_25_1372810463.03146"
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 157
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_25_1372810463.03146" 
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 156
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_26_1372810463.03146"
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 161
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_27_1372810463.03146" 
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 162
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_26_1372810463.03146" 
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 158
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_28_1372810463.03146"
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 175
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_28_1372810463.03146" 
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 170
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_29_1372810463.03146"
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 182
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_29_1372810463.03146" 
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 177
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_30_1372810463.03146"
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 188
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_30_1372810463.03146" 
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 176
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_31_1372810463.03146"
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 191
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_31_1372810463.03146" 
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 189
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_32_1372810463.03146"
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 199
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_32_1372810463.03146" 
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 198
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_33_1372810463.03146" 
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 205
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_34_1372810463.03146"
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 207
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_34_1372810463.03146" 
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 200
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_35_1372810463.03146"
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 218
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_35_1372810463.03146" 
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 217
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_36_1372810463.03146"
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 222
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_37_1372810463.03146" 
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 224
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_38_1372810463.03146" 
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 227
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_36_1372810463.03146" 
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 219
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_39_1372810463.03146"
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 238
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_39_1372810463.03146" 
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 237
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_40_1372810463.03146" 
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 241
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_41_1372810463.03146"
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 244
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_41_1372810463.03146" 
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 239
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_42_1372810463.03146"
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 252
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_42_1372810463.03146" 
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 251
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_43_1372810463.03146"
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 256
    $P5001."set_static_lexpad"($P5002)
    .const "LexInfo" $P5001 = "cuid_44_1372810463.03146"
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 260
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_45_1372810463.03146" 
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 262
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_44_1372810463.03146" 
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 258
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_46_1372810463.03146" 
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 266
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_43_1372810463.03146" 
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 253
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_47_1372810463.03146"
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 275
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_47_1372810463.03146" 
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 274
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_48_1372810463.03146"
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 279
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_48_1372810463.03146" 
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 276
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_49_1372810463.03146"
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 289
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_49_1372810463.03146" 
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 288
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_50_1372810463.03146"
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 294
    $P5001."set_static_lexpad"($P5002)
    .const "LexInfo" $P5001 = "cuid_51_1372810463.03146"
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 298
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_52_1372810463.03146" 
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 299
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_53_1372810463.03146" 
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 302
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_54_1372810463.03146" 
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 304
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_51_1372810463.03146" 
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 296
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_50_1372810463.03146" 
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 290
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_55_1372810463.03146"
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 316
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_55_1372810463.03146" 
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 315
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_56_1372810463.03146"
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 323
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_56_1372810463.03146" 
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 317
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_57_1372810463.03146" 
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 325
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_58_1372810463.03146"
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 330
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_58_1372810463.03146" 
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 324
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_59_1372810463.03146" 
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 334
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_60_1372810463.03146" 
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 332
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_61_1372810463.03146" 
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 339
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_62_1372810463.03146" 
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 343
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_63_1372810463.03146" 
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 346
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_64_1372810463.03146"
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 353
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_64_1372810463.03146" 
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 331
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_65_1372810463.03146"
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 357
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_65_1372810463.03146" 
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 354
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_66_1372810463.03146" 
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 359
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_67_1372810463.03146" 
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 361
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_68_1372810463.03146" 
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 365
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_69_1372810463.03146"
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 370
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_69_1372810463.03146" 
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 358
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_70_1372810463.03146" 
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 372
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_71_1372810463.03146" 
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 371
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_2_1372810463.03146" 
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 376
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_1_1372810463.03146" 
    nqp_get_sc_object $P5002, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 3
    perl6_associate_sub_code_object $P5001, $P5002
    nqp_get_sc_object $P5001, "3F93BE68EB295025816D031E870C2DA17DAA27BB", 0
    set_hll_global "GLOBAL", $P5001
    .return () 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_73_1372810463.03146") :anon :lex :outer("cuid_74_1372810463.03146")
.annotate 'file', "lib/Test.pm"
    new $P5001, 'ResizablePMCArray'
    .const 'Sub' $P5002 = "cuid_3_1372810463.03146" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_4_1372810463.03146" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_5_1372810463.03146" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_6_1372810463.03146" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_7_1372810463.03146" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_8_1372810463.03146" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_9_1372810463.03146" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_10_1372810463.03146" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_11_1372810463.03146" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_12_1372810463.03146" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_13_1372810463.03146" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_15_1372810463.03146" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_14_1372810463.03146" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_16_1372810463.03146" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_17_1372810463.03146" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_18_1372810463.03146" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_20_1372810463.03146" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_19_1372810463.03146" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_21_1372810463.03146" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_22_1372810463.03146" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_23_1372810463.03146" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_24_1372810463.03146" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_25_1372810463.03146" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_27_1372810463.03146" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_26_1372810463.03146" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_28_1372810463.03146" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_29_1372810463.03146" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_30_1372810463.03146" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_31_1372810463.03146" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_32_1372810463.03146" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_33_1372810463.03146" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_34_1372810463.03146" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_35_1372810463.03146" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_37_1372810463.03146" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_38_1372810463.03146" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_36_1372810463.03146" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_39_1372810463.03146" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_40_1372810463.03146" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_41_1372810463.03146" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_42_1372810463.03146" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_45_1372810463.03146" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_44_1372810463.03146" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_46_1372810463.03146" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_43_1372810463.03146" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_47_1372810463.03146" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_48_1372810463.03146" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_49_1372810463.03146" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_52_1372810463.03146" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_53_1372810463.03146" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_54_1372810463.03146" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_51_1372810463.03146" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_50_1372810463.03146" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_55_1372810463.03146" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_56_1372810463.03146" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_57_1372810463.03146" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_58_1372810463.03146" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_59_1372810463.03146" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_60_1372810463.03146" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_61_1372810463.03146" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_62_1372810463.03146" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_63_1372810463.03146" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_64_1372810463.03146" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_65_1372810463.03146" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_66_1372810463.03146" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_67_1372810463.03146" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_68_1372810463.03146" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_69_1372810463.03146" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_70_1372810463.03146" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_71_1372810463.03146" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_2_1372810463.03146" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_1_1372810463.03146" 
    push $P5001, $P5002
    .return ($P5001) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_75_1372810463.03146") :load
.annotate 'file', "lib/Test.pm"
    .const 'Sub' $P5001 = "cuid_72_1372810463.03146" 
    $P5002 = $P5001()
    .return ($P5002) 
.end