.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_51_1372810515.85045") :anon :lex
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/URI.pm"
.annotate 'line', 1
    .const 'Sub' $P5003 = 'cuid_1_1372810515.85045' 
    capture_lex $P5003 
    .const 'Sub' $P5001 = 'cuid_1_1372810515.85045' 
    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_1372810515.85045") :anon :lex :outer("cuid_51_1372810515.85045")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/URI.pm"
.annotate 'line', 1
    .const 'Sub' $P5005 = 'cuid_2_1372810515.85045' 
    capture_lex $P5005 
    .lex "GLOBALish", $P101 
    .lex "EXPORT", $P102 
    .lex "$?PACKAGE", $P103 
    .lex "::?PACKAGE", $P104 
    .lex "$_", $P105 
    .lex "$/", $P106 
    .lex "$!", $P107 
    .lex "URI", $P108 
    .lex "$=pod", $P109 
    .lex "!UNIT_MARKER", $P110 
    .local pmc ctxsave 
    find_dynamic_lex $P5004, "$*CTXSAVE"
    set ctxsave, $P5004
    isnull $I5001, ctxsave
    if $I5001 goto unless10_end11 
    can $I5002, ctxsave, "ctxsave"
    perl6_box_int $P5007, $I5002
    set $P5006, $P5007
    unless $I5002 goto if11_end13 
    $P5005 = ctxsave."ctxsave"()
    set $P5006, $P5005
  if11_end13:
  unless10_end11:
    nqp_get_sc_object $P5004, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 327
    .const 'Sub' $P5005 = 'cuid_2_1372810515.85045' 
    capture_lex $P5005
    $P5006 = $P5005()
    nqp_get_sc_object $P5007, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 4
    .return ($P5007) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_2_1372810515.85045") :anon :lex :outer("cuid_1_1372810515.85045")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/URI.pm"
.annotate 'line', 1
    .const 'Sub' $P5050 = 'cuid_3_1372810515.85045' 
    capture_lex $P5050 
    .const 'Sub' $P5050 = 'cuid_4_1372810515.85045' 
    capture_lex $P5050 
    .const 'Sub' $P5050 = 'cuid_18_1372810515.85045' 
    capture_lex $P5050 
    .const 'Sub' $P5050 = 'cuid_28_1372810515.85045' 
    capture_lex $P5050 
    .const 'Sub' $P5050 = 'cuid_29_1372810515.85045' 
    capture_lex $P5050 
    .const 'Sub' $P5050 = 'cuid_30_1372810515.85045' 
    capture_lex $P5050 
    .const 'Sub' $P5050 = 'cuid_34_1372810515.85045' 
    capture_lex $P5050 
    .const 'Sub' $P5050 = 'cuid_35_1372810515.85045' 
    capture_lex $P5050 
    .const 'Sub' $P5050 = 'cuid_36_1372810515.85045' 
    capture_lex $P5050 
    .const 'Sub' $P5050 = 'cuid_37_1372810515.85045' 
    capture_lex $P5050 
    .const 'Sub' $P5050 = 'cuid_38_1372810515.85045' 
    capture_lex $P5050 
    .const 'Sub' $P5050 = 'cuid_39_1372810515.85045' 
    capture_lex $P5050 
    .const 'Sub' $P5050 = 'cuid_40_1372810515.85045' 
    capture_lex $P5050 
    .const 'Sub' $P5050 = 'cuid_41_1372810515.85045' 
    capture_lex $P5050 
    .const 'Sub' $P5050 = 'cuid_42_1372810515.85045' 
    capture_lex $P5050 
    .const 'Sub' $P5050 = 'cuid_43_1372810515.85045' 
    capture_lex $P5050 
    .const 'Sub' $P5050 = 'cuid_44_1372810515.85045' 
    capture_lex $P5050 
    .const 'Sub' $P5050 = 'cuid_45_1372810515.85045' 
    capture_lex $P5050 
    .const 'Sub' $P5050 = 'cuid_46_1372810515.85045' 
    capture_lex $P5050 
    .const 'Sub' $P5050 = 'cuid_47_1372810515.85045' 
    capture_lex $P5050 
    .const 'Sub' $P5050 = 'cuid_48_1372810515.85045' 
    capture_lex $P5050 
    .const 'Sub' $P5050 = 'cuid_49_1372810515.85045' 
    capture_lex $P5050 
    .const 'Sub' $P5050 = 'cuid_50_1372810515.85045' 
    capture_lex $P5050 
    .lex "$?PACKAGE", $P101 
    .lex "::?PACKAGE", $P102 
    .lex "$?CLASS", $P103 
    .lex "::?CLASS", $P104 
    .lex "$_", $P105 
    .lex "&uri_escape", $P106 
    .lex "&uri_unescape", $P107 
    .lex "&split_query", $P108 
    .const 'Sub' $P5002 = 'cuid_3_1372810515.85045' 
    capture_lex $P5002
    .const 'Sub' $P5003 = 'cuid_4_1372810515.85045' 
    capture_lex $P5003
    .const 'Sub' $P5004 = 'cuid_18_1372810515.85045' 
    capture_lex $P5004
    $P5004 = $P108."clone"()
    set $P108, $P5004
    nqp_get_sc_object $P5006, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 4
    get_who $P5005, $P5006
    set $P5005["&split_query"], $P108
    .const 'Sub' $P5007 = 'cuid_28_1372810515.85045' 
    capture_lex $P5007
    .const 'Sub' $P5008 = 'cuid_29_1372810515.85045' 
    capture_lex $P5008
    .const 'Sub' $P5009 = 'cuid_30_1372810515.85045' 
    capture_lex $P5009
    .const 'Sub' $P5010 = 'cuid_34_1372810515.85045' 
    capture_lex $P5010
    .const 'Sub' $P5011 = 'cuid_35_1372810515.85045' 
    capture_lex $P5011
    .const 'Sub' $P5012 = 'cuid_36_1372810515.85045' 
    capture_lex $P5012
    .const 'Sub' $P5013 = 'cuid_37_1372810515.85045' 
    capture_lex $P5013
    .const 'Sub' $P5014 = 'cuid_38_1372810515.85045' 
    capture_lex $P5014
    .const 'Sub' $P5015 = 'cuid_39_1372810515.85045' 
    capture_lex $P5015
    .const 'Sub' $P5016 = 'cuid_40_1372810515.85045' 
    capture_lex $P5016
    .const 'Sub' $P5017 = 'cuid_41_1372810515.85045' 
    capture_lex $P5017
    .const 'Sub' $P5018 = 'cuid_42_1372810515.85045' 
    capture_lex $P5018
    .const 'Sub' $P5019 = 'cuid_43_1372810515.85045' 
    capture_lex $P5019
    .const 'Sub' $P5020 = 'cuid_44_1372810515.85045' 
    capture_lex $P5020
    .const 'Sub' $P5021 = 'cuid_45_1372810515.85045' 
    capture_lex $P5021
    .const 'Sub' $P5022 = 'cuid_46_1372810515.85045' 
    capture_lex $P5022
    .const 'Sub' $P5023 = 'cuid_47_1372810515.85045' 
    capture_lex $P5023
    .const 'Sub' $P5024 = 'cuid_48_1372810515.85045' 
    capture_lex $P5024
    .const 'Sub' $P5025 = 'cuid_49_1372810515.85045' 
    capture_lex $P5025
    .const 'Sub' $P5026 = 'cuid_50_1372810515.85045' 
    capture_lex $P5026
.annotate 'line', 3
    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
    nqp_get_sc_object $P5048, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 284
    $P5049 = $P5048."clone"()
    perl6_capture_lex $P5049
    .return ($P5049) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_3_1372810515.85045") :anon :lex :outer("cuid_2_1372810515.85045")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/URI.pm"
.annotate 'line', 9
    .param pmc CALL_SIG :call_sig 
    .lex "self", $P101 
    .lex "$_", $P102 
    .lex "call_sig", $P103 
    set $P5001, CALL_SIG
    set $P103, $P5001
    bind_signature 
    perl6_booleanize $P5002, 0
    .return ($P5002) 
.end
.HLL "perl6"
.namespace []
.sub "parse" :subid("cuid_4_1372810515.85045") :anon :lex :outer("cuid_2_1372810515.85045")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/URI.pm"
.annotate 'line', 21
    .param pmc CALL_SIG :call_sig 
    .const 'Sub' $P5014 = 'cuid_5_1372810515.85045' 
    capture_lex $P5014 
    .const 'Sub' $P5014 = 'cuid_6_1372810515.85045' 
    capture_lex $P5014 
    .const 'Sub' $P5014 = 'cuid_11_1372810515.85045' 
    capture_lex $P5014 
    .const 'Sub' $P5014 = 'cuid_12_1372810515.85045' 
    capture_lex $P5014 
    .const 'Sub' $P5014 = 'cuid_17_1372810515.85045' 
    capture_lex $P5014 
    .const 'Sub' $P5014 = 'cuid_13_1372810515.85045' 
    capture_lex $P5014 
    .const 'Sub' $P5014 = 'cuid_14_1372810515.85045' 
    capture_lex $P5014 
    .lex "self", $P101 
    .lex "%_", $P102 
    .lex "$str", $P103 
    .lex "$_", $P104 
    .lex "$/", $P105 
    .lex "$!", $P106 
    .lex "$c_str", $P107 
    .lex "$comp_container", $P108 
    .lex "$first_chunk", $P109 
    .lex "call_sig", $P110 
    .lex "$*DISPATCHER", $P111 
    .lex "&?ROUTINE", $P112 
    perl6_take_dispatcher 
    .const 'Sub' $P5005 = 'cuid_5_1372810515.85045' 
    capture_lex $P5005
    .const 'Sub' $P5006 = 'cuid_6_1372810515.85045' 
    capture_lex $P5006
    .const 'Sub' $P5007 = 'cuid_11_1372810515.85045' 
    capture_lex $P5007
    .const 'Sub' $P5008 = 'cuid_12_1372810515.85045' 
    capture_lex $P5008
    .const 'Sub' $P5009 = 'cuid_17_1372810515.85045' 
    capture_lex $P5009
    set $P5010, CALL_SIG
    set $P110, $P5010
    bind_signature 
    root_new $P113, ['parrot';'Continuation']
    set_label $P113, lexotic_72
    .lex "RETURN", $P113
.annotate 'line', 24

    perl6_container_store $P107, $P103
.annotate 'line', 25
    nqp_get_sc_object $P5012, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 49
    nqp_get_sc_object $P5013, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 42
    $P5014 = $P5013."clone"()
    perl6_capture_lex $P5014
    nqp_get_sc_object $P5015, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 48
    $P107."dispatch:<.=>"($P5012, $P5014, $P5015)
.annotate 'line', 26
    nqp_get_sc_object $P5012, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 49
    nqp_get_sc_object $P5013, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 51
    $P5014 = $P5013."clone"()
    perl6_capture_lex $P5014
    nqp_get_sc_object $P5015, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 48
    $P107."dispatch:<.=>"($P5012, $P5014, $P5015)
.annotate 'line', 28
    nqp_get_sc_object $P5012, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 4
    repr_get_attr_obj $P5013, $P101, $P5012, "$!uri"
    nqp_get_sc_object $P5014, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 4
    repr_get_attr_obj $P5015, $P101, $P5014, "$!path"
    nqp_get_sc_object $P5016, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 4
    repr_get_attr_obj $P5017, $P101, $P5016, "$!is_absolute"
    nqp_get_sc_object $P5018, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 4
    repr_get_attr_obj $P5019, $P101, $P5018, "$!scheme"
    nqp_get_sc_object $P5020, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 4
    repr_get_attr_obj $P5021, $P101, $P5020, "$!authority"
    nqp_get_sc_object $P5022, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 4
    repr_get_attr_obj $P5023, $P101, $P5022, "$!query"
.annotate 'line', 29
    nqp_get_sc_object $P5024, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 4
    repr_get_attr_obj $P5025, $P101, $P5024, "$!frag"
    nqp_get_sc_object $P5026, "27420382D80CEF05775E7415279171A93892A1F1-1372810242.10453", 14
    perl6_container_store $P5025, $P5026
    perl6_container_store $P5023, $P5025
    perl6_container_store $P5021, $P5023
    perl6_container_store $P5019, $P5021
    perl6_container_store $P5017, $P5019
    perl6_container_store $P5015, $P5017
    perl6_container_store $P5013, $P5015
.annotate 'line', 30
    nqp_get_sc_object $P5012, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 4
    repr_get_attr_obj $P5013, $P101, $P5012, "%!query_form"
    nqp_get_sc_object $P5014, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 4
    repr_get_attr_obj $P5015, $P101, $P5014, "@!segments"
    nqp_get_sc_object $P5016, "5C7C172868FA9510BA84BFF074E73D635E54D9D3", 869
    $P5017 = $P5015."STORE"($P5016)
    $P5013."STORE"($P5017)
    nqp_get_sc_object $P5012, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 57
    $P5012()
.annotate 'line', 48
    nqp_get_sc_object $P5012, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 4
    repr_get_attr_obj $P5013, $P101, $P5012, "$!uri"
    nqp_get_sc_object $P5015, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 4
    repr_get_attr_obj $P5016, $P101, $P5015, "$!grammar"
    $P5017 = $P5016."parse_result"()
    perl6ize_type $P5014, $P5017
    perl6_container_store $P5013, $P5014
.annotate 'line', 50

    nqp_get_sc_object $P5015, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 4
    repr_get_attr_obj $P5016, $P101, $P5015, "$!grammar"
    $P5017 = $P5016."parse_result"()
    perl6ize_type $P5014, $P5017
    nqp_get_sc_object $P5018, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 69
    $P5019 = $P5014."postcircumfix:<{ }>"($P5018)
    perl6ize_type $P5013, $P5019
    nqp_get_sc_object $P5020, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 70
    $P5021 = $P5013."postcircumfix:<{ }>"($P5020)
    perl6ize_type $P5012, $P5021
    set $P5032, $P5012
    if $P5012 goto unless45_end75 
.annotate 'line', 51
    nqp_get_sc_object $P5025, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 4
    repr_get_attr_obj $P5026, $P101, $P5025, "$!grammar"
    $P5027 = $P5026."parse_result"()
    perl6ize_type $P5024, $P5027
    nqp_get_sc_object $P5028, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 69
    $P5029 = $P5024."postcircumfix:<{ }>"($P5028)
    perl6ize_type $P5023, $P5029
    nqp_get_sc_object $P5030, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 71
    $P5031 = $P5023."postcircumfix:<{ }>"($P5030)
    perl6ize_type $P5022, $P5031
    set $P5032, $P5022
  unless45_end75:
    perl6_container_store $P108, $P5032
.annotate 'line', 52
    nqp_get_sc_object $P5012, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 4
    repr_get_attr_obj $P5013, $P101, $P5012, "$!scheme"
    nqp_get_sc_object $P5015, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 72
    $P5016 = $P108."postcircumfix:<{ }>"($P5015)
    perl6ize_type $P5014, $P5016
    perl6_container_store $P5013, $P5014
.annotate 'line', 53
    nqp_get_sc_object $P5012, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 4
    repr_get_attr_obj $P5013, $P101, $P5012, "$!query"
    nqp_get_sc_object $P5015, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 73
    $P5016 = $P108."postcircumfix:<{ }>"($P5015)
    perl6ize_type $P5014, $P5016
    perl6_container_store $P5013, $P5014
.annotate 'line', 54
    nqp_get_sc_object $P5012, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 4
    repr_get_attr_obj $P5013, $P101, $P5012, "$!frag"
    nqp_get_sc_object $P5015, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 74
    $P5016 = $P108."postcircumfix:<{ }>"($P5015)
    perl6ize_type $P5014, $P5016
    perl6_container_store $P5013, $P5014
.annotate 'line', 55

    nqp_get_sc_object $P5013, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 75
    $P5014 = $P108."postcircumfix:<{ }>"($P5013)
    perl6ize_type $P5012, $P5014
    set $P5018, $P5012
    if $P5012 goto unless46_end77 
    nqp_get_sc_object $P5016, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 76
    $P5017 = $P108."postcircumfix:<{ }>"($P5016)
    perl6ize_type $P5015, $P5017
    set $P5018, $P5015
  unless46_end77:
    perl6_container_store $P108, $P5018
.annotate 'line', 57
    nqp_get_sc_object $P5012, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 4
    repr_get_attr_obj $P5013, $P101, $P5012, "$!authority"
    nqp_get_sc_object $P5015, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 77
    $P5016 = $P108."postcircumfix:<{ }>"($P5015)
    perl6ize_type $P5014, $P5016
    perl6_container_store $P5013, $P5014
.annotate 'line', 58
    nqp_get_sc_object $P5012, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 4
    repr_get_attr_obj $P5013, $P101, $P5012, "$!path"
    nqp_get_sc_object $P5015, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 78
    $P5016 = $P108."postcircumfix:<{ }>"($P5015)
    perl6ize_type $P5014, $P5016
    set $P5020, $P5014
    if $P5014 goto unless47_end79 
.annotate 'line', 59
    nqp_get_sc_object $P5018, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 79
    $P5019 = $P108."postcircumfix:<{ }>"($P5018)
    perl6ize_type $P5017, $P5019
    set $P5020, $P5017
  unless47_end79:
    perl6_container_store $P5013, $P5020
.annotate 'line', 60
    nqp_get_sc_object $P5012, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 4
    repr_get_attr_obj $P5013, $P101, $P5012, "$!is_absolute"
    nqp_get_sc_object $P5016, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 4
    repr_get_attr_obj $P5017, $P101, $P5016, "$!path"
    set $P5020, $P5017
    if $P5017 goto unless48_end81 
    nqp_get_sc_object $P5018, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 4
    repr_get_attr_obj $P5019, $P101, $P5018, "$!scheme"
    set $P5020, $P5019
  unless48_end81:
    find_lex $P5015, "&prefix:<?>"
    perl6_multi_dispatch_thunk $P5014, $P5015
    $P5021 = $P5014($P5020)
    perl6_container_store $P5013, $P5021
.annotate 'line', 62
    nqp_get_sc_object $P5012, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 4
    repr_get_attr_obj $P5013, $P101, $P5012, "$!path"
    nqp_get_sc_object $P5014, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 83
    "&METAOP_TEST_ASSIGN:<||>"($P5013, $P5014)
.annotate 'line', 65
    nqp_get_sc_object $P5012, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 4
    repr_get_attr_obj $P5013, $P101, $P5012, "@!segments"
    nqp_get_sc_object $P5016, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 4
    repr_get_attr_obj $P5017, $P101, $P5016, "$!path"
    nqp_get_sc_object $P5018, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 84
    $P5019 = $P5017."postcircumfix:<{ }>"($P5018)
    perl6ize_type $P5015, $P5019
    $P5020 = $P5015."list"()
    perl6ize_type $P5014, $P5020
    set $P5022, $P5014
    if $P5014 goto unless49_end83 
    nqp_get_sc_object $P5021, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 48
    set $P5022, $P5021
  unless49_end83:
    $P5013."STORE"($P5022)
.annotate 'line', 66

    nqp_get_sc_object $P5013, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 4
    repr_get_attr_obj $P5014, $P101, $P5013, "$!path"
    nqp_get_sc_object $P5015, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 86
    $P5016 = $P5014."postcircumfix:<{ }>"($P5015)
    perl6ize_type $P5012, $P5016
    set $P5022, $P5012
    if $P5012 goto unless51_end87 
    nqp_get_sc_object $P5018, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 4
    repr_get_attr_obj $P5019, $P101, $P5018, "$!path"
    nqp_get_sc_object $P5020, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 87
    $P5021 = $P5019."postcircumfix:<{ }>"($P5020)
    perl6ize_type $P5017, $P5021
    set $P5022, $P5017
  unless51_end87:
    perl6_container_store $P109, $P5022
    unless $P109 goto if50_else84 
    .const 'Sub' $P5023 = 'cuid_13_1372810515.85045' 
    capture_lex $P5023
    $P5024 = $P5023()
    goto if50_end85
  if50_else84:
    find_lex $P5025, "Nil"
  if50_end85:
.annotate 'line', 69
    nqp_get_sc_object $P5015, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 4
    repr_get_attr_obj $P5016, $P101, $P5015, "@!segments"
    $P5017 = $P5016."elems"()
    perl6ize_type $P5014, $P5017
    nqp_get_sc_object $P5018, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 90
    find_lex $P5013, "&infix:<==>"
    perl6_multi_dispatch_thunk $P5012, $P5013
    $P5019 = $P5012($P5014, $P5018)
    unless $P5019 goto if52_else88 
    .const 'Sub' $P5020 = 'cuid_14_1372810515.85045' 
    capture_lex $P5020
    $P5021 = $P5020()
    goto if52_end89
  if52_else88:
    find_lex $P5022, "Nil"
  if52_end89:
    nqp_get_sc_object $P5012, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 93
    $P5013 = $P5012()
    perl6_decontainerize_return_value $P5011, $P5013
    goto lexotic_73
  lexotic_72:
    .get_results ($P5011)
  lexotic_73:
    find_lex $P5012, "&EXHAUST"
    store_lex "RETURN", $P5012
    nqp_get_sc_object $P5013, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 36
    perl6_type_check_return_value $P5011, $P5013
    .return ($P5011) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_5_1372810515.85045") :anon :lex :outer("cuid_4_1372810515.85045")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/URI.pm"
.annotate 'line', 25
    .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 rx12_tgt
    .local int rx12_pos
    .local int rx12_off
    .local int rx12_eos
    .local int rx12_rep
    .local pmc rx12_cur
    .local pmc rx12_curclass
    .local pmc rx12_bstack
    .local pmc rx12_cstack
    (rx12_cur, rx12_tgt, rx12_pos, rx12_curclass, rx12_bstack, $I19) = self."!cursor_start"()
    store_lex unicode:"$\x{a2}", rx12_cur
    length rx12_eos, rx12_tgt
    eq $I19, 1, rx12_restart16
    gt rx12_pos, rx12_eos, rx12_fail17
    repr_get_attr_int $I11, self, rx12_curclass, "$!from"
    ne $I11, -1, rxscan13_done23
    goto rxscan13_scan22
  rxscan13_loop21:
    inc rx12_pos
    gt rx12_pos, rx12_eos, rx12_fail17
    repr_bind_attr_int rx12_cur, rx12_curclass, "$!from", rx12_pos
  rxscan13_scan22:
    nqp_rxmark rx12_bstack, rxscan13_loop21, rx12_pos, 0
  rxscan13_done23:
    ne rx12_pos, 0, rx12_fail17
    nqp_rxmark rx12_bstack, rxquantg15_done26, rx12_pos, 0
  rxquantg15_loop25:
    ge rx12_pos, rx12_eos, rx12_fail17
    is_cclass $I11, .CCLASS_WHITESPACE, rx12_tgt, rx12_pos
    unless $I11, rx12_fail17
    add rx12_pos, 1
    nqp_rxmark rx12_bstack, rxquantg15_done26, rx12_pos, rx12_rep
    goto rxquantg15_loop25
  rxquantg15_done26:
    new $P11, "ResizableIntegerArray"
    nqp_push_label $P11, alt16_028
    nqp_push_label $P11, alt16_129
    nqp_rxmark rx12_bstack, alt16_end27, -1, 0
    rx12_cur."!alt"(rx12_pos, "alt_nfa__1_1372810516.67028", $P11)
    goto rx12_fail17
  alt16_028:
    add $I11, rx12_pos, 1
    gt $I11, rx12_eos, rx12_fail17
    substr $S10, rx12_tgt, rx12_pos, 1
    ne $S10, ucs4:"<", rx12_fail17
    add rx12_pos, 1
    goto alt16_end27
  alt16_129:
    add $I11, rx12_pos, 1
    gt $I11, rx12_eos, rx12_fail17
    substr $S10, rx12_tgt, rx12_pos, 1
    ne $S10, ucs4:"\"", rx12_fail17
    add rx12_pos, 1
    goto alt16_end27
  alt16_end27:
    rx12_cur."!cursor_pass"(rx12_pos, 'backtrack'=>1)
    .return (rx12_cur)
  rx12_restart16:
    repr_get_attr_obj rx12_cstack, rx12_cur, rx12_curclass, "$!cstack"
  rx12_fail17:
    unless rx12_bstack, rx12_done15
    pop $I19, rx12_bstack
    if_null rx12_cstack, rx12_cstack_done20
    unless rx12_cstack, rx12_cstack_done20
    dec $I19
    set $P11, rx12_cstack[$I19]
  rx12_cstack_done20:
    pop rx12_rep, rx12_bstack
    pop rx12_pos, rx12_bstack
    pop $I19, rx12_bstack
    lt rx12_pos, -1, rx12_done15
    lt rx12_pos, 0, rx12_fail17
    eq $I19, 0, rx12_fail17
    nqp_islist $I20, rx12_cstack
    unless $I20, rx12_jump18
    elements $I18, rx12_bstack
    le $I18, 0, rx12_cut19
    dec $I18
    set $I18, rx12_bstack[$I18]
  rx12_cut19:
    assign rx12_cstack, $I18
  rx12_jump18:
    jump $I19
  rx12_done15:
    rx12_cur."!cursor_fail"()
    .return (rx12_cur) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_6_1372810515.85045") :anon :lex :outer("cuid_4_1372810515.85045")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/URI.pm"
.annotate 'line', 26
    .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 rx17_tgt
    .local int rx17_pos
    .local int rx17_off
    .local int rx17_eos
    .local int rx17_rep
    .local pmc rx17_cur
    .local pmc rx17_curclass
    .local pmc rx17_bstack
    .local pmc rx17_cstack
    (rx17_cur, rx17_tgt, rx17_pos, rx17_curclass, rx17_bstack, $I19) = self."!cursor_start"()
    store_lex unicode:"$\x{a2}", rx17_cur
    length rx17_eos, rx17_tgt
    eq $I19, 1, rx17_restart32
    gt rx17_pos, rx17_eos, rx17_fail33
    repr_get_attr_int $I11, self, rx17_curclass, "$!from"
    ne $I11, -1, rxscan18_done39
    goto rxscan18_scan38
  rxscan18_loop37:
    inc rx17_pos
    gt rx17_pos, rx17_eos, rx17_fail33
    repr_bind_attr_int rx17_cur, rx17_curclass, "$!from", rx17_pos
  rxscan18_scan38:
    nqp_rxmark rx17_bstack, rxscan18_loop37, rx17_pos, 0
  rxscan18_done39:
    new $P11, "ResizableIntegerArray"
    nqp_push_label $P11, alt19_041
    nqp_push_label $P11, alt19_142
    nqp_rxmark rx17_bstack, alt19_end40, -1, 0
    rx17_cur."!alt"(rx17_pos, "alt_nfa__2_1372810516.6945", $P11)
    goto rx17_fail33
  alt19_041:
    add $I11, rx17_pos, 1
    gt $I11, rx17_eos, rx17_fail33
    substr $S10, rx17_tgt, rx17_pos, 1
    ne $S10, ucs4:">", rx17_fail33
    add rx17_pos, 1
    goto alt19_end40
  alt19_142:
    add $I11, rx17_pos, 1
    gt $I11, rx17_eos, rx17_fail33
    substr $S10, rx17_tgt, rx17_pos, 1
    ne $S10, ucs4:"\"", rx17_fail33
    add rx17_pos, 1
    goto alt19_end40
  alt19_end40:
    nqp_rxmark rx17_bstack, rxquantg20_done44, rx17_pos, 0
  rxquantg20_loop43:
    ge rx17_pos, rx17_eos, rx17_fail33
    is_cclass $I11, .CCLASS_WHITESPACE, rx17_tgt, rx17_pos
    unless $I11, rx17_fail33
    add rx17_pos, 1
    nqp_rxmark rx17_bstack, rxquantg20_done44, rx17_pos, rx17_rep
    goto rxquantg20_loop43
  rxquantg20_done44:
    lt rx17_pos, rx17_eos, rx17_fail33
    rx17_cur."!cursor_pass"(rx17_pos, 'backtrack'=>1)
    .return (rx17_cur)
  rx17_restart32:
    repr_get_attr_obj rx17_cstack, rx17_cur, rx17_curclass, "$!cstack"
  rx17_fail33:
    unless rx17_bstack, rx17_done31
    pop $I19, rx17_bstack
    if_null rx17_cstack, rx17_cstack_done36
    unless rx17_cstack, rx17_cstack_done36
    dec $I19
    set $P11, rx17_cstack[$I19]
  rx17_cstack_done36:
    pop rx17_rep, rx17_bstack
    pop rx17_pos, rx17_bstack
    pop $I19, rx17_bstack
    lt rx17_pos, -1, rx17_done31
    lt rx17_pos, 0, rx17_fail33
    eq $I19, 0, rx17_fail33
    nqp_islist $I20, rx17_cstack
    unless $I20, rx17_jump34
    elements $I18, rx17_bstack
    le $I18, 0, rx17_cut35
    dec $I18
    set $I18, rx17_bstack[$I18]
  rx17_cut35:
    assign rx17_cstack, $I18
  rx17_jump34:
    jump $I19
  rx17_done31:
    rx17_cur."!cursor_fail"()
    .return (rx17_cur) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_11_1372810515.85045") :anon :lex :outer("cuid_4_1372810515.85045")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/URI.pm"
.annotate 'line', 32
    .const 'Sub' $P5005 = 'cuid_10_1372810515.85045' 
    capture_lex $P5005 
    .const 'Sub' $P5005 = 'cuid_7_1372810515.85045' 
    capture_lex $P5005 
    .const 'Sub' $P5005 = 'cuid_8_1372810515.85045' 
    capture_lex $P5005 
    .lex "$_", $P101 
    .const 'Sub' $P5002 = 'cuid_10_1372810515.85045' 
    capture_lex $P5002
    new $P5003, 'ExceptionHandler'
    set_label $P5003, catch_handler_3257
    $P5003.'handle_types_except'(.CONTROL_ALL)
    push_eh $P5003
.annotate 'line', 33
    find_lex $P5003, "self"
    $P5004 = $P5003."is_validating"()
    $P5005 = $P5004."item"()
    unless $P5005 goto if30_else54 
    .const 'Sub' $P5006 = 'cuid_7_1372810515.85045' 
    capture_lex $P5006
    $P5007 = $P5006()
    goto if30_end55
  if30_else54:
    .const 'Sub' $P5008 = 'cuid_8_1372810515.85045' 
    capture_lex $P5008
    $P5009 = $P5008()
  if30_end55:
    find_lex $P5003, "Nil"
    set $P5004, $P5003
    pop_eh 
    goto skip_handler_3156
  catch_handler_3257:
    .get_results ($P5003) 
.annotate 'line', 40
    nqp_get_sc_object $P10001, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 62
    perl6_invoke_catchhandler $P10001, $P5003
    find_lex $P10002, "$!"
    finalize $P5003
    pop_upto_eh $P5003
    pop_eh 
    set $P5004, $P10002
    goto skip_handler_3156
  skip_handler_3156:
    .return ($P5004) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_10_1372810515.85045") :anon :lex :outer("cuid_11_1372810515.85045")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/URI.pm"
.annotate 'line', 40
    .param pmc exception__1 
    .const 'Sub' $P5008 = 'cuid_9_1372810515.85045' 
    capture_lex $P5008 
    .lex "$_", $P101 
    .lex "$!", $P102 
    .lex "$/", $P103 
    new $P5006, 'ExceptionHandler'
    set_label $P5006, catch_handler_2953
    $P5006.'handle_types_except'(.CONTROL_ALL)
    push_eh $P5006
    $P5001 = "&EXCEPTION"(exception__1)
    set $P101, $P5001
    find_lex_skip_current $P5002, "$!"
    perl6_container_store $P5002, $P101
    .const 'Sub' $P5003 = 'cuid_9_1372810515.85045' 
    capture_lex $P5003
    new $P5004, 'ExceptionHandler', [.CONTROL_BREAK]
    set_label $P5004, catch_handler_2650
    push_eh $P5004
    new $P5007, 'ExceptionHandler', [.CONTROL_CONTINUE]
    set_label $P5007, catch_handler_2347
    push_eh $P5007
    nqp_get_sc_object $P5004, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 63
    $P5005 = $P5004()
    $P5006 = "&succeed"($P5005)
    set $P5008, $P5006
    pop_eh 
    goto skip_handler_2246
  catch_handler_2347:
    .get_results ($P5007) 
    set $I10001, $P5007["type"]
    eq $I10001, .CONTROL_CONTINUE, handle_type_2448
  handle_type_2448:
    getattribute $P10001, $P5007, "payload"
    finalize $P5007
    pop_upto_eh $P5007
    pop_eh 
    set $P5008, $P10001
    goto skip_handler_2246
  skip_handler_2246:
    set $P5005, $P5008
    pop_eh 
    goto skip_handler_2549
  catch_handler_2650:
    .get_results ($P5004) 
    set $I10001, $P5004["type"]
    eq $I10001, .CONTROL_BREAK, handle_type_2751
  handle_type_2751:
    getattribute $P10001, $P5004, "payload"
    nqp_get_sc_object $P10002, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 62
    perl6_type_check_return_value $P10001, $P10002
    perl6_returncc $P10001
    finalize $P5004
    pop_upto_eh $P5004
    pop_eh 
    set $P5005, $P10001
    goto skip_handler_2549
  skip_handler_2549:
    set $P5007, $P5005
    pop_eh 
    goto skip_handler_2852
  catch_handler_2953:
    .get_results ($P5006) 
    perl6_based_rethrow $P5006, exception__1
    finalize $P5006
    pop_upto_eh $P5006
    pop_eh 
    set $P5007, exception__1
    goto skip_handler_2852
  skip_handler_2852:
    rethrow exception__1
    .return (exception__1) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_9_1372810515.85045") :anon :lex :outer("cuid_10_1372810515.85045")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/URI.pm"
.annotate 'line', 41
    .lex "$_", $P101 
.annotate 'line', 42
    nqp_get_sc_object $P5006, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 64
    find_lex $P5007, "$str"
    $P5008 = $P5007."Stringy"()
    find_lex $P5005, "&infix:<~>"
    perl6_multi_dispatch_thunk $P5004, $P5005
    $P5009 = $P5004($P5006, $P5008)
    find_lex $P5003, "&die"
    perl6_multi_dispatch_thunk $P5002, $P5003
    $P5010 = $P5002($P5009)
    .return ($P5010) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_7_1372810515.85045") :anon :lex :outer("cuid_11_1372810515.85045")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/URI.pm"
.annotate 'line', 33
    .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', 34
    find_lex $P5005, "self"
    nqp_get_sc_object $P5006, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 4
    repr_get_attr_obj $P5007, $P5005, $P5006, "$!grammar"
    find_lex $P5008, "$c_str"
    $P5009 = $P5007."parse_validating"($P5008)
    perl6ize_type $P5004, $P5009
    .return ($P5004) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_8_1372810515.85045") :anon :lex :outer("cuid_11_1372810515.85045")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/URI.pm"
.annotate 'line', 36
    .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', 37
    find_lex $P5005, "self"
    nqp_get_sc_object $P5006, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 4
    repr_get_attr_obj $P5007, $P5005, $P5006, "$!grammar"
    find_lex $P5008, "$c_str"
    $P5009 = $P5007."parse"($P5008)
    perl6ize_type $P5004, $P5009
    .return ($P5004) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_12_1372810515.85045") :anon :lex :outer("cuid_4_1372810515.85045")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/URI.pm"
.annotate 'line', 62

    find_lex $P5002, "$comp_container"
    nqp_get_sc_object $P5003, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 80
    $P5004 = $P5002."postcircumfix:<{ }>"($P5003)
    perl6ize_type $P5001, $P5004
    set $P5009, $P5001
    if $P5001 goto unless33_end59 
.annotate 'line', 63
    find_lex $P5006, "$comp_container"
    nqp_get_sc_object $P5007, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 81
    $P5008 = $P5006."postcircumfix:<{ }>"($P5007)
    perl6ize_type $P5005, $P5008
    set $P5009, $P5005
  unless33_end59:
    .return ($P5009) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_17_1372810515.85045") :anon :lex :outer("cuid_4_1372810515.85045")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/URI.pm"
.annotate 'line', 74
    .const 'Sub' $P5005 = 'cuid_16_1372810515.85045' 
    capture_lex $P5005 
    .lex "$_", $P101 
    .const 'Sub' $P5002 = 'cuid_16_1372810515.85045' 
    capture_lex $P5002
    new $P5003, 'ExceptionHandler'
    set_label $P5003, catch_handler_4471
    $P5003.'handle_types_except'(.CONTROL_ALL)
    push_eh $P5003
.annotate 'line', 75
    find_lex $P5003, "self"
    nqp_get_sc_object $P5004, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 4
    repr_get_attr_obj $P5005, $P5003, $P5004, "$!query"
    unless $P5005 goto if42_else68 
    find_lex $P5006, "self"
    nqp_get_sc_object $P5007, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 4
    repr_get_attr_obj $P5008, $P5006, $P5007, "%!query_form"
    find_lex $P5011, "self"
    nqp_get_sc_object $P5012, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 4
    repr_get_attr_obj $P5013, $P5011, $P5012, "$!query"
    find_lex $P5010, "&prefix:<~>"
    perl6_multi_dispatch_thunk $P5009, $P5010
    $P5014 = $P5009($P5013)
    $P5015 = "&split_query"($P5014)
    $P5016 = $P5008."STORE"($P5015)
    goto if42_end69
  if42_else68:
    find_lex $P5017, "Nil"
  if42_end69:
    find_lex $P5003, "Nil"
    set $P5004, $P5003
    pop_eh 
    goto skip_handler_4370
  catch_handler_4471:
    .get_results ($P5003) 
.annotate 'line', 76
    nqp_get_sc_object $P10001, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 94
    perl6_invoke_catchhandler $P10001, $P5003
    find_lex $P10002, "$!"
    finalize $P5003
    pop_upto_eh $P5003
    pop_eh 
    set $P5004, $P10002
    goto skip_handler_4370
  skip_handler_4370:
    .return ($P5004) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_16_1372810515.85045") :anon :lex :outer("cuid_17_1372810515.85045")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/URI.pm"
.annotate 'line', 76
    .param pmc exception__2 
    .const 'Sub' $P5008 = 'cuid_15_1372810515.85045' 
    capture_lex $P5008 
    .lex "$_", $P101 
    .lex "$!", $P102 
    .lex "$/", $P103 
    new $P5006, 'ExceptionHandler'
    set_label $P5006, catch_handler_4167
    $P5006.'handle_types_except'(.CONTROL_ALL)
    push_eh $P5006
    $P5001 = "&EXCEPTION"(exception__2)
    set $P101, $P5001
    find_lex_skip_current $P5002, "$!"
    perl6_container_store $P5002, $P101
    .const 'Sub' $P5003 = 'cuid_15_1372810515.85045' 
    capture_lex $P5003
    new $P5004, 'ExceptionHandler', [.CONTROL_BREAK]
    set_label $P5004, catch_handler_3864
    push_eh $P5004
    new $P5007, 'ExceptionHandler', [.CONTROL_CONTINUE]
    set_label $P5007, catch_handler_3561
    push_eh $P5007
    nqp_get_sc_object $P5004, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 95
    $P5005 = $P5004()
    $P5006 = "&succeed"($P5005)
    set $P5008, $P5006
    pop_eh 
    goto skip_handler_3460
  catch_handler_3561:
    .get_results ($P5007) 
    set $I10001, $P5007["type"]
    eq $I10001, .CONTROL_CONTINUE, handle_type_3662
  handle_type_3662:
    getattribute $P10001, $P5007, "payload"
    finalize $P5007
    pop_upto_eh $P5007
    pop_eh 
    set $P5008, $P10001
    goto skip_handler_3460
  skip_handler_3460:
    set $P5005, $P5008
    pop_eh 
    goto skip_handler_3763
  catch_handler_3864:
    .get_results ($P5004) 
    set $I10001, $P5004["type"]
    eq $I10001, .CONTROL_BREAK, handle_type_3965
  handle_type_3965:
    getattribute $P10001, $P5004, "payload"
    nqp_get_sc_object $P10002, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 94
    perl6_type_check_return_value $P10001, $P10002
    perl6_returncc $P10001
    finalize $P5004
    pop_upto_eh $P5004
    pop_eh 
    set $P5005, $P10001
    goto skip_handler_3763
  skip_handler_3763:
    set $P5007, $P5005
    pop_eh 
    goto skip_handler_4066
  catch_handler_4167:
    .get_results ($P5006) 
    perl6_based_rethrow $P5006, exception__2
    finalize $P5006
    pop_upto_eh $P5006
    pop_eh 
    set $P5007, exception__2
    goto skip_handler_4066
  skip_handler_4066:
    rethrow exception__2
    .return (exception__2) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_15_1372810515.85045") :anon :lex :outer("cuid_16_1372810515.85045")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/URI.pm"
.annotate 'line', 77
    .lex "$_", $P101 
.annotate 'line', 78
    find_lex $P5002, "self"
    nqp_get_sc_object $P5003, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 4
    repr_get_attr_obj $P5004, $P5002, $P5003, "%!query_form"
    $P5005 = "&infix:<,>"()
    $P5006 = $P5004."STORE"($P5005)
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_13_1372810515.85045") :anon :lex :outer("cuid_4_1372810515.85045")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/URI.pm"
.annotate 'line', 66
    .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', 67
    find_lex $P5006, "self"
    nqp_get_sc_object $P5007, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 4
    repr_get_attr_obj $P5008, $P5006, $P5007, "@!segments"
    find_lex $P5009, "$first_chunk"
    find_lex $P5005, "&unshift"
    perl6_multi_dispatch_cand_thunk $P5004, $P5005, 0
    $P5010 = $P5004($P5008, $P5009)
    .return ($P5010) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_14_1372810515.85045") :anon :lex :outer("cuid_4_1372810515.85045")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/URI.pm"
.annotate 'line', 69
    .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', 70
    find_lex $P5004, "self"
    nqp_get_sc_object $P5005, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 4
    repr_get_attr_obj $P5006, $P5004, $P5005, "@!segments"
    nqp_get_sc_object $P5007, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 48
    $P5008 = $P5006."STORE"($P5007)
    .return ($P5008) 
.end
.HLL "perl6"
.namespace []
.sub "split_query" :subid("cuid_18_1372810515.85045") :anon :lex :outer("cuid_2_1372810515.85045")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/URI.pm"
.annotate 'line', 84
    .param pmc CALL_SIG :call_sig 
    .const 'Sub' $P5012 = 'cuid_20_1372810515.85045' 
    capture_lex $P5012 
    .const 'Sub' $P5012 = 'cuid_21_1372810515.85045' 
    capture_lex $P5012 
    .const 'Sub' $P5012 = 'cuid_27_1372810515.85045' 
    capture_lex $P5012 
    .lex "$query", $P101 
    .lex "$_", $P102 
    .lex "$/", $P103 
    .lex "$!", $P104 
    .lex "%query_form", $P105 
    .lex "call_sig", $P106 
    .lex "$*DISPATCHER", $P107 
    .lex "&?ROUTINE", $P108 
    perl6_take_dispatcher 
    .const 'Sub' $P5004 = 'cuid_20_1372810515.85045' 
    capture_lex $P5004
    .const 'Sub' $P5005 = 'cuid_21_1372810515.85045' 
    capture_lex $P5005
    .const 'Sub' $P5006 = 'cuid_27_1372810515.85045' 
    capture_lex $P5006
    set $P5007, CALL_SIG
    set $P106, $P5007
    bind_signature 
    root_new $P109, ['parrot';'Continuation']
    set_label $P109, lexotic_114
    .lex "RETURN", $P109
.annotate 'line', 87
    nqp_get_sc_object $P5012, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 108
    $P5013 = $P5012."clone"()
    perl6_capture_lex $P5013
    nqp_get_sc_object $P5014, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 118
    $P5015 = $P5014."clone"()
    perl6_capture_lex $P5015
    $P5016 = "&split"($P5015, $P101)
    find_lex $P5011, "&map"
    perl6_multi_dispatch_thunk $P5010, $P5011
    $P5017 = $P5010($P5013, $P5016)
    $P5018 = "&infix:<,>"($P5017)
    nqp_get_sc_object $P5019, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 124
    $P5020 = $P5019."clone"()
    perl6_capture_lex $P5020
    $P5021 = $P5018."map"($P5020)
    "&eager"($P5021)
.annotate 'line', 106
    $P5010 = "&return"($P105)
    perl6_decontainerize_return_value $P5009, $P5010
    goto lexotic_115
  lexotic_114:
    .get_results ($P5009)
  lexotic_115:
    find_lex $P5010, "&EXHAUST"
    store_lex "RETURN", $P5010
    nqp_get_sc_object $P5011, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 104
    perl6_type_check_return_value $P5009, $P5011
    .return ($P5009) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_20_1372810515.85045") :anon :lex :outer("cuid_18_1372810515.85045")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/URI.pm"
.annotate 'line', 87
    .param pmc CALL_SIG :call_sig 
    .const 'Sub' $P5005 = 'cuid_19_1372810515.85045' 
    capture_lex $P5005 
    .lex "$_", $P101 
    .lex "call_sig", $P102 
    .lex "$*DISPATCHER", $P103 
    perl6_take_dispatcher 
    .const 'Sub' $P5001 = 'cuid_19_1372810515.85045' 
    capture_lex $P5001
    set $P5003, CALL_SIG
    set $P102, $P5003
    bind_signature 
    nqp_get_sc_object $P5005, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 109
    $P5006 = $P5005."clone"()
    perl6_capture_lex $P5006
    find_lex $P5007, "$_"
    $P5008 = "&split"($P5006, $P5007)
    $P5009 = "&circumfix:<[ ]>"($P5008)
    .return ($P5009) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_19_1372810515.85045") :anon :lex :outer("cuid_20_1372810515.85045")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/URI.pm"
.annotate 'line', 87
    .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 rx53_tgt
    .local int rx53_pos
    .local int rx53_off
    .local int rx53_eos
    .local int rx53_rep
    .local pmc rx53_cur
    .local pmc rx53_curclass
    .local pmc rx53_bstack
    .local pmc rx53_cstack
    (rx53_cur, rx53_tgt, rx53_pos, rx53_curclass, rx53_bstack, $I19) = self."!cursor_start"()
    store_lex unicode:"$\x{a2}", rx53_cur
    length rx53_eos, rx53_tgt
    eq $I19, 1, rx53_restart92
    gt rx53_pos, rx53_eos, rx53_fail93
    repr_get_attr_int $I11, self, rx53_curclass, "$!from"
    ne $I11, -1, rxscan54_done99
    goto rxscan54_scan98
  rxscan54_loop97:
    inc rx53_pos
    gt rx53_pos, rx53_eos, rx53_fail93
    repr_bind_attr_int rx53_cur, rx53_curclass, "$!from", rx53_pos
  rxscan54_scan98:
    nqp_rxmark rx53_bstack, rxscan54_loop97, rx53_pos, 0
  rxscan54_done99:
    ge rx53_pos, rx53_eos, rx53_fail93
    substr $S11, rx53_tgt, rx53_pos, 1
    index $I11, ucs4:"=", $S11
    lt $I11, 0, rx53_fail93
    inc rx53_pos
    rx53_cur."!cursor_pass"(rx53_pos, 'backtrack'=>1)
    .return (rx53_cur)
  rx53_restart92:
    repr_get_attr_obj rx53_cstack, rx53_cur, rx53_curclass, "$!cstack"
  rx53_fail93:
    unless rx53_bstack, rx53_done91
    pop $I19, rx53_bstack
    if_null rx53_cstack, rx53_cstack_done96
    unless rx53_cstack, rx53_cstack_done96
    dec $I19
    set $P11, rx53_cstack[$I19]
  rx53_cstack_done96:
    pop rx53_rep, rx53_bstack
    pop rx53_pos, rx53_bstack
    pop $I19, rx53_bstack
    lt rx53_pos, -1, rx53_done91
    lt rx53_pos, 0, rx53_fail93
    eq $I19, 0, rx53_fail93
    nqp_islist $I20, rx53_cstack
    unless $I20, rx53_jump94
    elements $I18, rx53_bstack
    le $I18, 0, rx53_cut95
    dec $I18
    set $I18, rx53_bstack[$I18]
  rx53_cut95:
    assign rx53_cstack, $I18
  rx53_jump94:
    jump $I19
  rx53_done91:
    rx53_cur."!cursor_fail"()
    .return (rx53_cur) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_21_1372810515.85045") :anon :lex :outer("cuid_18_1372810515.85045")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/URI.pm"
.annotate 'line', 87
    .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 rx55_tgt
    .local int rx55_pos
    .local int rx55_off
    .local int rx55_eos
    .local int rx55_rep
    .local pmc rx55_cur
    .local pmc rx55_curclass
    .local pmc rx55_bstack
    .local pmc rx55_cstack
    (rx55_cur, rx55_tgt, rx55_pos, rx55_curclass, rx55_bstack, $I19) = self."!cursor_start"()
    store_lex unicode:"$\x{a2}", rx55_cur
    length rx55_eos, rx55_tgt
    eq $I19, 1, rx55_restart102
    gt rx55_pos, rx55_eos, rx55_fail103
    repr_get_attr_int $I11, self, rx55_curclass, "$!from"
    ne $I11, -1, rxscan56_done109
    goto rxscan56_scan108
  rxscan56_loop107:
    inc rx55_pos
    gt rx55_pos, rx55_eos, rx55_fail103
    repr_bind_attr_int rx55_cur, rx55_curclass, "$!from", rx55_pos
  rxscan56_scan108:
    nqp_rxmark rx55_bstack, rxscan56_loop107, rx55_pos, 0
  rxscan56_done109:
    ge rx55_pos, rx55_eos, rx55_fail103
    substr $S11, rx55_tgt, rx55_pos, 1
    index $I11, ucs4:"&;", $S11
    lt $I11, 0, rx55_fail103
    inc rx55_pos
    rx55_cur."!cursor_pass"(rx55_pos, 'backtrack'=>1)
    .return (rx55_cur)
  rx55_restart102:
    repr_get_attr_obj rx55_cstack, rx55_cur, rx55_curclass, "$!cstack"
  rx55_fail103:
    unless rx55_bstack, rx55_done101
    pop $I19, rx55_bstack
    if_null rx55_cstack, rx55_cstack_done106
    unless rx55_cstack, rx55_cstack_done106
    dec $I19
    set $P11, rx55_cstack[$I19]
  rx55_cstack_done106:
    pop rx55_rep, rx55_bstack
    pop rx55_pos, rx55_bstack
    pop $I19, rx55_bstack
    lt rx55_pos, -1, rx55_done101
    lt rx55_pos, 0, rx55_fail103
    eq $I19, 0, rx55_fail103
    nqp_islist $I20, rx55_cstack
    unless $I20, rx55_jump104
    elements $I18, rx55_bstack
    le $I18, 0, rx55_cut105
    dec $I18
    set $I18, rx55_bstack[$I18]
  rx55_cut105:
    assign rx55_cstack, $I18
  rx55_jump104:
    jump $I19
  rx55_done101:
    rx55_cur."!cursor_fail"()
    .return (rx55_cur) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_27_1372810515.85045") :anon :lex :outer("cuid_18_1372810515.85045")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/URI.pm"
.annotate 'line', 87
    .param pmc CALL_SIG :call_sig 
    .const 'Sub' $P5004 = 'cuid_22_1372810515.85045' 
    capture_lex $P5004 
    .const 'Sub' $P5004 = 'cuid_25_1372810515.85045' 
    capture_lex $P5004 
    .const 'Sub' $P5004 = 'cuid_26_1372810515.85045' 
    capture_lex $P5004 
    .lex "$qmap", $P101 
    .lex "call_sig", $P102 
    .lex "$*DISPATCHER", $P103 
    perl6_take_dispatcher 
    .const 'Sub' $P5001 = 'cuid_22_1372810515.85045' 
    capture_lex $P5001
    set $P5002, CALL_SIG
    set $P102, $P5002
    bind_signature 
.annotate 'line', 88
    nqp_get_sc_object $P5004, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 90
    nqp_get_sc_object $P5005, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 17
    $P5006 = "&infix:<,>"($P5004, $P5005)
    $P5007 = "&infix:<,>"($P5006)
    nqp_get_sc_object $P5008, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 125
    $P5009 = $P5008."clone"()
    perl6_capture_lex $P5009
    $P5010 = $P5007."map"($P5009)
    "&eager"($P5010)
.annotate 'line', 91
    find_lex $P5005, "%query_form"
    nqp_get_sc_object $P5007, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 90
    $P5008 = $P101."postcircumfix:<[ ]>"($P5007)
    perl6ize_type $P5006, $P5008
    $P5009 = $P5005."exists"($P5006)
    perl6ize_type $P5004, $P5009
    unless $P5004 goto if57_else110 
    .const 'Sub' $P5010 = 'cuid_25_1372810515.85045' 
    capture_lex $P5010
    $P5011 = $P5010()
    set $P5014, $P5011
    goto if57_end111
  if57_else110:
    .const 'Sub' $P5012 = 'cuid_26_1372810515.85045' 
    capture_lex $P5012
    $P5013 = $P5012()
    set $P5014, $P5013
  if57_end111:
    .return ($P5014) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_22_1372810515.85045") :anon :lex :outer("cuid_27_1372810515.85045")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/URI.pm"
.annotate 'line', 88
    .param pmc CALL_SIG :call_sig 
    .lex "$i", $P101 
    .lex "call_sig", $P102 
    .lex "$*DISPATCHER", $P103 
    perl6_take_dispatcher 
    set $P5001, CALL_SIG
    set $P102, $P5001
    bind_signature 
.annotate 'line', 89
    find_lex $P5004, "$qmap"
    $P5005 = $P5004."postcircumfix:<[ ]>"($P101)
    perl6ize_type $P5003, $P5005
    find_lex $P5007, "$qmap"
    $P5008 = $P5007."postcircumfix:<[ ]>"($P101)
    perl6ize_type $P5006, $P5008
    $P5009 = "&uri_unescape"($P5006)
    perl6_container_store $P5003, $P5009
    .return ($P5003) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_25_1372810515.85045") :anon :lex :outer("cuid_27_1372810515.85045")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/URI.pm"
.annotate 'line', 91
    .param pmc CALL_SIG :call_sig 
    .const 'Sub' $P5004 = 'cuid_23_1372810515.85045' 
    capture_lex $P5004 
    .const 'Sub' $P5004 = 'cuid_24_1372810515.85045' 
    capture_lex $P5004 
    .lex "$_", $P101 
    .lex "call_sig", $P102 
    .lex "$*DISPATCHER", $P103 
    .local pmc old_topic_1 
    .local pmc sm_result_1 
    perl6_take_dispatcher 
    set $P5002, CALL_SIG
    set $P102, $P5002
    bind_signature 
    find_lex $P5004, "$_"
    set old_topic_1, $P5004
.annotate 'line', 92
    find_lex $P5006, "%query_form"
    find_lex $P5008, "$qmap"
    nqp_get_sc_object $P5009, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 90
    $P5010 = $P5008."postcircumfix:<[ ]>"($P5009)
    perl6ize_type $P5007, $P5010
    $P5011 = $P5006."postcircumfix:<{ }>"($P5007)
    perl6ize_type $P5005, $P5011
    store_lex "$_", $P5005
    nqp_get_sc_object $P5012, "27420382D80CEF05775E7415279171A93892A1F1-1372810242.10453", 38
    find_lex $P5013, "$_"
    $P5014 = $P5012."ACCEPTS"($P5013)
    set sm_result_1, $P5014
    store_lex "$_", old_topic_1
    unless sm_result_1 goto if58_else112 
    .const 'Sub' $P5004 = 'cuid_23_1372810515.85045' 
    capture_lex $P5004
    $P5005 = $P5004()
    set $P5008, $P5005
    goto if58_end113
  if58_else112:
    .const 'Sub' $P5006 = 'cuid_24_1372810515.85045' 
    capture_lex $P5006
    $P5007 = $P5006()
    set $P5008, $P5007
  if58_end113:
    .return ($P5008) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_23_1372810515.85045") :anon :lex :outer("cuid_25_1372810515.85045")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/URI.pm"
.annotate 'line', 92
    .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', 93
    find_lex $P5006, "%query_form"
    find_lex $P5008, "$qmap"
    nqp_get_sc_object $P5009, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 90
    $P5010 = $P5008."postcircumfix:<[ ]>"($P5009)
    perl6ize_type $P5007, $P5010
    $P5011 = $P5006."postcircumfix:<{ }>"($P5007)
    perl6ize_type $P5005, $P5011
    find_lex $P5013, "$qmap"
    nqp_get_sc_object $P5014, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 17
    $P5015 = $P5013."postcircumfix:<[ ]>"($P5014)
    perl6ize_type $P5012, $P5015
    $P5016 = $P5005."push"($P5012)
    perl6ize_type $P5004, $P5016
    .return ($P5004) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_24_1372810515.85045") :anon :lex :outer("cuid_25_1372810515.85045")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/URI.pm"
.annotate 'line', 95
    .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', 96
    find_lex $P5005, "%query_form"
    find_lex $P5007, "$qmap"
    nqp_get_sc_object $P5008, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 90
    $P5009 = $P5007."postcircumfix:<[ ]>"($P5008)
    perl6ize_type $P5006, $P5009
    $P5010 = $P5005."postcircumfix:<{ }>"($P5006)
    perl6ize_type $P5004, $P5010
.annotate 'line', 97
    find_lex $P5012, "%query_form"
    find_lex $P5014, "$qmap"
    nqp_get_sc_object $P5015, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 90
    $P5016 = $P5014."postcircumfix:<[ ]>"($P5015)
    perl6ize_type $P5013, $P5016
    $P5017 = $P5012."postcircumfix:<{ }>"($P5013)
    perl6ize_type $P5011, $P5017
    find_lex $P5019, "$qmap"
    nqp_get_sc_object $P5020, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 17
    $P5021 = $P5019."postcircumfix:<[ ]>"($P5020)
    perl6ize_type $P5018, $P5021
    $P5022 = "&infix:<,>"($P5011, $P5018)
    $P5023 = "&circumfix:<[ ]>"($P5022)
    perl6_container_store $P5004, $P5023
    .return ($P5004) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_26_1372810515.85045") :anon :lex :outer("cuid_27_1372810515.85045")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/URI.pm"
.annotate 'line', 101
    .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', 102
    find_lex $P5005, "%query_form"
    find_lex $P5007, "$qmap"
    nqp_get_sc_object $P5008, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 90
    $P5009 = $P5007."postcircumfix:<[ ]>"($P5008)
    perl6ize_type $P5006, $P5009
    $P5010 = $P5005."postcircumfix:<{ }>"($P5006)
    perl6ize_type $P5004, $P5010
    find_lex $P5012, "$qmap"
    nqp_get_sc_object $P5013, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 17
    $P5014 = $P5012."postcircumfix:<[ ]>"($P5013)
    perl6ize_type $P5011, $P5014
    perl6_container_store $P5004, $P5011
    .return ($P5004) 
.end
.HLL "perl6"
.namespace []
.sub "init" :subid("cuid_28_1372810515.85045") :anon :lex :outer("cuid_2_1372810515.85045")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/URI.pm"
.annotate 'line', 110
    .param pmc CALL_SIG :call_sig 
    .lex "self", $P101 
    .lex "%_", $P102 
    .lex "$str", $P103 
    .lex "$_", $P104 
    .lex "$/", $P105 
    .lex "$!", $P106 
    .lex "call_sig", $P107 
    .lex "$*DISPATCHER", $P108 
    .lex "&?ROUTINE", $P109 
    perl6_take_dispatcher 
    set $P5005, CALL_SIG
    set $P107, $P5005
    bind_signature 
    root_new $P110, ['parrot';'Continuation']
    set_label $P110, lexotic_116
    .lex "RETURN", $P110
.annotate 'line', 111
    nqp_get_sc_object $P5009, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 143
    find_lex $P5008, "&warn"
    perl6_multi_dispatch_cand_thunk $P5007, $P5008, 0
    $P5007($P5009)
.annotate 'line', 112
    $P5007 = $P101."parse"($P103)
    $P5008 = $P5007."item"()
    perl6_decontainerize_return_value $P5006, $P5008
    goto lexotic_117
  lexotic_116:
    .get_results ($P5006)
  lexotic_117:
    find_lex $P5007, "&EXHAUST"
    store_lex "RETURN", $P5007
    nqp_get_sc_object $P5008, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 142
    perl6_type_check_return_value $P5006, $P5008
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "BUILD" :subid("cuid_29_1372810515.85045") :anon :lex :outer("cuid_2_1372810515.85045")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/URI.pm"
.annotate 'line', 116
    .param pmc CALL_SIG :call_sig 
    .lex "self", $P101 
    .lex "%_", $P102 
    .lex "$_", $P103 
    .lex "$/", $P104 
    .lex "$!", $P105 
    .lex "call_sig", $P106 
    .lex "$*DISPATCHER", $P107 
    .lex "&?ROUTINE", $P108 
    perl6_take_dispatcher 
    set $P5005, CALL_SIG
    set $P106, $P5005
    bind_signature 
.annotate 'line', 117
    nqp_get_sc_object $P5007, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 4
    repr_get_attr_obj $P5008, $P101, $P5007, "$!grammar"
    nqp_get_sc_object $P5010, "9E2C07BAF5CD0D3B97FF1D1A065814DD33A335C2", 4
    nqp_get_sc_object $P5011, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 152
    $P5012 = $P5010."new"($P5011)
    perl6ize_type $P5009, $P5012
    perl6_container_store $P5008, $P5009
    perl6_decontainerize_return_value $P5006, $P5008
    nqp_get_sc_object $P5007, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 151
    perl6_type_check_return_value $P5006, $P5007
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "new" :subid("cuid_30_1372810515.85045") :anon :lex :outer("cuid_2_1372810515.85045")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/URI.pm"
.annotate 'line', 120
    .param pmc CALL_SIG :call_sig 
    .const 'Sub' $P5009 = 'cuid_31_1372810515.85045' 
    capture_lex $P5009 
    .const 'Sub' $P5009 = 'cuid_32_1372810515.85045' 
    capture_lex $P5009 
    .const 'Sub' $P5009 = 'cuid_33_1372810515.85045' 
    capture_lex $P5009 
    .lex "self", $P101 
    .lex "%_", $P102 
    .lex "$uri_pos1", $P103 
    .lex "$uri", $P104 
    .lex "$is_validating", $P105 
    .lex "$_", $P106 
    .lex "$/", $P107 
    .lex "$!", $P108 
    .lex "$obj", $P109 
    .lex "call_sig", $P110 
    .lex "$*DISPATCHER", $P111 
    .lex "&?ROUTINE", $P112 
    perl6_take_dispatcher 
    set $P5005, CALL_SIG
    set $P110, $P5005
    bind_signature 
    root_new $P113, ['parrot';'Continuation']
    set_label $P113, lexotic_118
    .lex "RETURN", $P113
.annotate 'line', 121

    find_lex $P5008, "Whatever"
    $P5009 = $P5008."new"()
    $P5010 = $P101."bless"($P5009)
    perl6ize_type $P5007, $P5010
    perl6_container_store $P109, $P5007
.annotate 'line', 123
    $P5008 = $P105."defined"()
    perl6ize_type $P5007, $P5008
    unless $P5007 goto if59_else120 
    .const 'Sub' $P5009 = 'cuid_31_1372810515.85045' 
    capture_lex $P5009
    $P5010 = $P5009()
    goto if59_end121
  if59_else120:
    find_lex $P5011, "Nil"
  if59_end121:
.annotate 'line', 127
    $P5008 = $P104."defined"()
    perl6ize_type $P5007, $P5008
    set $P5011, $P5007
    unless $P5007 goto if61_end125 
    $P5010 = $P103."defined"()
    perl6ize_type $P5009, $P5010
    set $P5011, $P5009
  if61_end125:
    unless $P5011 goto if60_else122 
    .const 'Sub' $P5012 = 'cuid_32_1372810515.85045' 
    capture_lex $P5012
    $P5013 = $P5012()
    goto if60_end123
  if60_else122:
.annotate 'line', 130
    $P5015 = $P104."defined"()
    perl6ize_type $P5014, $P5015
    set $P5018, $P5014
    if $P5014 goto unless63_end129 
    $P5017 = $P103."defined"()
    perl6ize_type $P5016, $P5017
    set $P5018, $P5016
  unless63_end129:
    unless $P5018 goto if62_else126 
    .const 'Sub' $P5019 = 'cuid_33_1372810515.85045' 
    capture_lex $P5019
    $P5020 = $P5019()
    set $P5022, $P5020
    goto if62_end127
  if62_else126:
    find_lex $P5021, "Nil"
    set $P5022, $P5021
  if62_end127:
  if60_end123:
.annotate 'line', 134
    $P5007 = "&return"($P109)
    perl6_decontainerize_return_value $P5006, $P5007
    goto lexotic_119
  lexotic_118:
    .get_results ($P5006)
  lexotic_119:
    find_lex $P5007, "&EXHAUST"
    store_lex "RETURN", $P5007
    nqp_get_sc_object $P5008, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 159
    perl6_type_check_return_value $P5006, $P5008
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_31_1372810515.85045") :anon :lex :outer("cuid_30_1372810515.85045")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/URI.pm"
.annotate 'line', 123
    .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', 124
    find_lex $P5005, "$obj"
    $P5006 = $P5005."is_validating"()
    perl6ize_type $P5004, $P5006
    find_lex $P5009, "$is_validating"
    find_lex $P5008, "&prefix:<?>"
    perl6_multi_dispatch_thunk $P5007, $P5008
    $P5010 = $P5007($P5009)
    perl6_container_store $P5004, $P5010
    .return ($P5004) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_32_1372810515.85045") :anon :lex :outer("cuid_30_1372810515.85045")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/URI.pm"
.annotate 'line', 127
    .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', 128
    nqp_get_sc_object $P5006, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 167
    find_lex $P5005, "&die"
    perl6_multi_dispatch_thunk $P5004, $P5005
    $P5007 = $P5004($P5006)
    .return ($P5007) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_33_1372810515.85045") :anon :lex :outer("cuid_30_1372810515.85045")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/URI.pm"
.annotate 'line', 130
    .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', 131
    find_lex $P5005, "$obj"
    find_lex $P5007, "$uri"
    set $P5006, $P5007
    defined $I5001, $P5006
    if $I5001, defor130
    find_lex $P5008, "$uri_pos1"
    set $P5006, $P5008
  defor130:
    $P5009 = $P5005."parse"($P5006)
    perl6ize_type $P5004, $P5009
    .return ($P5004) 
.end
.HLL "perl6"
.namespace []
.sub "scheme" :subid("cuid_34_1372810515.85045") :anon :lex :outer("cuid_2_1372810515.85045")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/URI.pm"
.annotate 'line', 137
    .param pmc CALL_SIG :call_sig 
    .lex "self", $P101 
    .lex "%_", $P102 
    .lex "$_", $P103 
    .lex "$/", $P104 
    .lex "$!", $P105 
    .lex "call_sig", $P106 
    .lex "$*DISPATCHER", $P107 
    .lex "&?ROUTINE", $P108 
    perl6_take_dispatcher 
    set $P5005, CALL_SIG
    set $P106, $P5005
    bind_signature 
    root_new $P109, ['parrot';'Continuation']
    set_label $P109, lexotic_131
    .lex "RETURN", $P109
.annotate 'line', 138
    nqp_get_sc_object $P5010, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 4
    repr_get_attr_obj $P5011, $P101, $P5010, "$!scheme"
    $P5012 = $P5011."lc"()
    perl6ize_type $P5009, $P5012
    find_lex $P5008, "&prefix:<~>"
    perl6_multi_dispatch_thunk $P5007, $P5008
    $P5013 = $P5007($P5009)
    $P5014 = "&return"($P5013)
    perl6_decontainerize_return_value $P5006, $P5014
    goto lexotic_132
  lexotic_131:
    .get_results ($P5006)
  lexotic_132:
    find_lex $P5007, "&EXHAUST"
    store_lex "RETURN", $P5007
    nqp_get_sc_object $P5008, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 179
    perl6_type_check_return_value $P5006, $P5008
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "authority" :subid("cuid_35_1372810515.85045") :anon :lex :outer("cuid_2_1372810515.85045")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/URI.pm"
.annotate 'line', 141
    .param pmc CALL_SIG :call_sig 
    .lex "self", $P101 
    .lex "%_", $P102 
    .lex "$_", $P103 
    .lex "$/", $P104 
    .lex "$!", $P105 
    .lex "call_sig", $P106 
    .lex "$*DISPATCHER", $P107 
    .lex "&?ROUTINE", $P108 
    perl6_take_dispatcher 
    set $P5005, CALL_SIG
    set $P106, $P5005
    bind_signature 
    root_new $P109, ['parrot';'Continuation']
    set_label $P109, lexotic_133
    .lex "RETURN", $P109
.annotate 'line', 142
    nqp_get_sc_object $P5010, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 4
    repr_get_attr_obj $P5011, $P101, $P5010, "$!authority"
    $P5012 = $P5011."lc"()
    perl6ize_type $P5009, $P5012
    find_lex $P5008, "&prefix:<~>"
    perl6_multi_dispatch_thunk $P5007, $P5008
    $P5013 = $P5007($P5009)
    $P5014 = "&return"($P5013)
    perl6_decontainerize_return_value $P5006, $P5014
    goto lexotic_134
  lexotic_133:
    .get_results ($P5006)
  lexotic_134:
    find_lex $P5007, "&EXHAUST"
    store_lex "RETURN", $P5007
    nqp_get_sc_object $P5008, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 185
    perl6_type_check_return_value $P5006, $P5008
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "host" :subid("cuid_36_1372810515.85045") :anon :lex :outer("cuid_2_1372810515.85045")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/URI.pm"
.annotate 'line', 145
    .param pmc CALL_SIG :call_sig 
    .lex "self", $P101 
    .lex "%_", $P102 
    .lex "$_", $P103 
    .lex "$/", $P104 
    .lex "$!", $P105 
    .lex "call_sig", $P106 
    .lex "$*DISPATCHER", $P107 
    .lex "&?ROUTINE", $P108 
    perl6_take_dispatcher 
    set $P5005, CALL_SIG
    set $P106, $P5005
    bind_signature 
    root_new $P109, ['parrot';'Continuation']
    set_label $P109, lexotic_135
    .lex "RETURN", $P109
.annotate 'line', 146
    nqp_get_sc_object $P5009, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 4
    repr_get_attr_obj $P5010, $P101, $P5009, "$!authority"
    nqp_get_sc_object $P5011, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 192
    $P5012 = $P5010."postcircumfix:<{ }>"($P5011)
    perl6ize_type $P5008, $P5012
    set $P5014, $P5008
    if $P5008 goto unless64_end138 
    nqp_get_sc_object $P5013, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 48
    set $P5014, $P5013
  unless64_end138:
    $P5015 = $P5014."lc"()
    perl6ize_type $P5007, $P5015
    $P5016 = "&return"($P5007)
    perl6_decontainerize_return_value $P5006, $P5016
    goto lexotic_136
  lexotic_135:
    .get_results ($P5006)
  lexotic_136:
    find_lex $P5007, "&EXHAUST"
    store_lex "RETURN", $P5007
    nqp_get_sc_object $P5008, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 191
    perl6_type_check_return_value $P5006, $P5008
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "default_port" :subid("cuid_37_1372810515.85045") :anon :lex :outer("cuid_2_1372810515.85045")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/URI.pm"
.annotate 'line', 149
    .param pmc CALL_SIG :call_sig 
    .lex "self", $P101 
    .lex "%_", $P102 
    .lex "$_", $P103 
    .lex "$/", $P104 
    .lex "$!", $P105 
    .lex "call_sig", $P106 
    .lex "$*DISPATCHER", $P107 
    .lex "&?ROUTINE", $P108 
    perl6_take_dispatcher 
    set $P5005, CALL_SIG
    set $P106, $P5005
    bind_signature 
    root_new $P109, ['parrot';'Continuation']
    set_label $P109, lexotic_139
    .lex "RETURN", $P109
.annotate 'line', 150
    $P5013 = $P101."scheme"()
    $P5014 = $P5013."item"()
    find_lex $P5009, "URI"
    perl6_get_package_through_who $P5008, $P5009, "DefaultPort"
    get_who $P5007, $P5008
    nqp_get_sc_object $P5010, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 199
    nqp_get_sc_object $P5011, "27420382D80CEF05775E7415279171A93892A1F1-1372810242.10453", 121
    $P5012 = $P5007."at_key"($P5010, $P5011 :named("global_fallback"))
    $P5015 = $P5012($P5014)
    perl6_decontainerize_return_value $P5006, $P5015
    goto lexotic_140
  lexotic_139:
    .get_results ($P5006)
  lexotic_140:
    find_lex $P5007, "&EXHAUST"
    store_lex "RETURN", $P5007
    nqp_get_sc_object $P5008, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 198
    perl6_type_check_return_value $P5006, $P5008
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "_port" :subid("cuid_38_1372810515.85045") :anon :lex :outer("cuid_2_1372810515.85045")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/URI.pm"
.annotate 'line', 153
    .param pmc CALL_SIG :call_sig 
    .lex "self", $P101 
    .lex "%_", $P102 
    .lex "$_", $P103 
    .lex "$/", $P104 
    .lex "$!", $P105 
    .lex "call_sig", $P106 
    .lex "$*DISPATCHER", $P107 
    .lex "&?ROUTINE", $P108 
    perl6_take_dispatcher 
    set $P5005, CALL_SIG
    set $P106, $P5005
    bind_signature 
    root_new $P109, ['parrot';'Continuation']
    set_label $P109, lexotic_141
    .lex "RETURN", $P109
.annotate 'line', 156
    nqp_get_sc_object $P5008, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 4
    repr_get_attr_obj $P5009, $P101, $P5008, "$!authority"
    nqp_get_sc_object $P5010, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 206
    $P5011 = $P5009."postcircumfix:<{ }>"($P5010)
    perl6ize_type $P5007, $P5011
    unless $P5007 goto if65_else143 
    nqp_get_sc_object $P5016, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 4
    repr_get_attr_obj $P5017, $P101, $P5016, "$!authority"
    nqp_get_sc_object $P5018, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 206
    $P5019 = $P5017."postcircumfix:<{ }>"($P5018)
    perl6ize_type $P5015, $P5019
    nqp_get_sc_object $P5020, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 48
    find_lex $P5014, "&infix:<~>"
    perl6_multi_dispatch_thunk $P5013, $P5014
    $P5021 = $P5013($P5015, $P5020)
    $P5022 = $P5021."Int"()
    perl6ize_type $P5012, $P5022
    set $P5024, $P5012
    goto if65_end144
  if65_else143:
    nqp_get_sc_object $P5023, "27420382D80CEF05775E7415279171A93892A1F1-1372810242.10453", 31
    set $P5024, $P5023
  if65_end144:
    perl6_decontainerize_return_value $P5006, $P5024
    goto lexotic_142
  lexotic_141:
    .get_results ($P5006)
  lexotic_142:
    find_lex $P5007, "&EXHAUST"
    store_lex "RETURN", $P5007
    nqp_get_sc_object $P5008, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 205
    perl6_type_check_return_value $P5006, $P5008
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "port" :subid("cuid_39_1372810515.85045") :anon :lex :outer("cuid_2_1372810515.85045")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/URI.pm"
.annotate 'line', 159
    .param pmc CALL_SIG :call_sig 
    .lex "self", $P101 
    .lex "%_", $P102 
    .lex "$_", $P103 
    .lex "$/", $P104 
    .lex "$!", $P105 
    .lex "call_sig", $P106 
    .lex "$*DISPATCHER", $P107 
    .lex "&?ROUTINE", $P108 
    perl6_take_dispatcher 
    set $P5005, CALL_SIG
    set $P106, $P5005
    bind_signature 
    $P5008 = $P101."_port"()
    $P5009 = $P5008."item"()
    set $P5007, $P5009
    defined $I5001, $P5007
    if $I5001, defor145
    $P5010 = $P101."default_port"()
    $P5011 = $P5010."item"()
    set $P5007, $P5011
  defor145:
    perl6_decontainerize_return_value $P5006, $P5007
    nqp_get_sc_object $P5007, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 212
    perl6_type_check_return_value $P5006, $P5007
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "path" :subid("cuid_40_1372810515.85045") :anon :lex :outer("cuid_2_1372810515.85045")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/URI.pm"
.annotate 'line', 163
    .param pmc CALL_SIG :call_sig 
    .lex "self", $P101 
    .lex "%_", $P102 
    .lex "$_", $P103 
    .lex "$/", $P104 
    .lex "$!", $P105 
    .lex "call_sig", $P106 
    .lex "$*DISPATCHER", $P107 
    .lex "&?ROUTINE", $P108 
    perl6_take_dispatcher 
    set $P5005, CALL_SIG
    set $P106, $P5005
    bind_signature 
    root_new $P109, ['parrot';'Continuation']
    set_label $P109, lexotic_146
    .lex "RETURN", $P109
.annotate 'line', 164
    nqp_get_sc_object $P5009, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 4
    repr_get_attr_obj $P5010, $P101, $P5009, "$!path"
    set $P5012, $P5010
    if $P5010 goto unless66_end149 
    nqp_get_sc_object $P5011, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 48
    set $P5012, $P5011
  unless66_end149:
    find_lex $P5008, "&prefix:<~>"
    perl6_multi_dispatch_thunk $P5007, $P5008
    $P5013 = $P5007($P5012)
    $P5014 = "&return"($P5013)
    perl6_decontainerize_return_value $P5006, $P5014
    goto lexotic_147
  lexotic_146:
    .get_results ($P5006)
  lexotic_147:
    find_lex $P5007, "&EXHAUST"
    store_lex "RETURN", $P5007
    nqp_get_sc_object $P5008, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 218
    perl6_type_check_return_value $P5006, $P5008
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "absolute" :subid("cuid_41_1372810515.85045") :anon :lex :outer("cuid_2_1372810515.85045")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/URI.pm"
.annotate 'line', 167
    .param pmc CALL_SIG :call_sig 
    .lex "self", $P101 
    .lex "%_", $P102 
    .lex "$_", $P103 
    .lex "$/", $P104 
    .lex "$!", $P105 
    .lex "call_sig", $P106 
    .lex "$*DISPATCHER", $P107 
    .lex "&?ROUTINE", $P108 
    perl6_take_dispatcher 
    set $P5005, CALL_SIG
    set $P106, $P5005
    bind_signature 
    root_new $P109, ['parrot';'Continuation']
    set_label $P109, lexotic_150
    .lex "RETURN", $P109
.annotate 'line', 168
    nqp_get_sc_object $P5007, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 4
    repr_get_attr_obj $P5008, $P101, $P5007, "$!is_absolute"
    $P5009 = "&return"($P5008)
    perl6_decontainerize_return_value $P5006, $P5009
    goto lexotic_151
  lexotic_150:
    .get_results ($P5006)
  lexotic_151:
    find_lex $P5007, "&EXHAUST"
    store_lex "RETURN", $P5007
    nqp_get_sc_object $P5008, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 224
    perl6_type_check_return_value $P5006, $P5008
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "relative" :subid("cuid_42_1372810515.85045") :anon :lex :outer("cuid_2_1372810515.85045")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/URI.pm"
.annotate 'line', 171
    .param pmc CALL_SIG :call_sig 
    .lex "self", $P101 
    .lex "%_", $P102 
    .lex "$_", $P103 
    .lex "$/", $P104 
    .lex "$!", $P105 
    .lex "call_sig", $P106 
    .lex "$*DISPATCHER", $P107 
    .lex "&?ROUTINE", $P108 
    perl6_take_dispatcher 
    set $P5005, CALL_SIG
    set $P106, $P5005
    bind_signature 
    root_new $P109, ['parrot';'Continuation']
    set_label $P109, lexotic_152
    .lex "RETURN", $P109
.annotate 'line', 172
    $P5009 = $P101."absolute"()
    $P5010 = $P5009."item"()
    find_lex $P5008, "&prefix:<!>"
    perl6_multi_dispatch_thunk $P5007, $P5008
    $P5011 = $P5007($P5010)
    $P5012 = "&return"($P5011)
    perl6_decontainerize_return_value $P5006, $P5012
    goto lexotic_153
  lexotic_152:
    .get_results ($P5006)
  lexotic_153:
    find_lex $P5007, "&EXHAUST"
    store_lex "RETURN", $P5007
    nqp_get_sc_object $P5008, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 230
    perl6_type_check_return_value $P5006, $P5008
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "query" :subid("cuid_43_1372810515.85045") :anon :lex :outer("cuid_2_1372810515.85045")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/URI.pm"
.annotate 'line', 175
    .param pmc CALL_SIG :call_sig 
    .lex "self", $P101 
    .lex "%_", $P102 
    .lex "$_", $P103 
    .lex "$/", $P104 
    .lex "$!", $P105 
    .lex "call_sig", $P106 
    .lex "$*DISPATCHER", $P107 
    .lex "&?ROUTINE", $P108 
    perl6_take_dispatcher 
    set $P5005, CALL_SIG
    set $P106, $P5005
    bind_signature 
    root_new $P109, ['parrot';'Continuation']
    set_label $P109, lexotic_154
    .lex "RETURN", $P109
.annotate 'line', 176
    nqp_get_sc_object $P5011, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 4
    repr_get_attr_obj $P5012, $P101, $P5011, "$!query"
    set $P5014, $P5012
    if $P5012 goto unless67_end157 
    nqp_get_sc_object $P5013, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 48
    set $P5014, $P5013
  unless67_end157:
    find_lex $P5010, "&prefix:<~>"
    perl6_multi_dispatch_thunk $P5009, $P5010
    $P5015 = $P5009($P5014)
    find_lex $P5008, "&item"
    perl6_multi_dispatch_thunk $P5007, $P5008
    $P5016 = $P5007($P5015)
    perl6_decontainerize_return_value $P5006, $P5016
    goto lexotic_155
  lexotic_154:
    .get_results ($P5006)
  lexotic_155:
    find_lex $P5007, "&EXHAUST"
    store_lex "RETURN", $P5007
    nqp_get_sc_object $P5008, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 236
    perl6_type_check_return_value $P5006, $P5008
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "path_query" :subid("cuid_44_1372810515.85045") :anon :lex :outer("cuid_2_1372810515.85045")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/URI.pm"
.annotate 'line', 179
    .param pmc CALL_SIG :call_sig 
    .lex "self", $P101 
    .lex "%_", $P102 
    .lex "$_", $P103 
    .lex "$/", $P104 
    .lex "$!", $P105 
    .lex "call_sig", $P106 
    .lex "$*DISPATCHER", $P107 
    .lex "&?ROUTINE", $P108 
    perl6_take_dispatcher 
    set $P5005, CALL_SIG
    set $P106, $P5005
    bind_signature 
    root_new $P109, ['parrot';'Continuation']
    set_label $P109, lexotic_158
    .lex "RETURN", $P109
    $P5007 = $P101."query"()
    $P5008 = $P5007."item"()
    unless $P5008 goto if68_else160 
.annotate 'line', 180
    $P5013 = $P101."path"()
    $P5014 = $P5013."item"()
    nqp_get_sc_object $P5015, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 243
    find_lex $P5012, "&infix:<~>"
    perl6_multi_dispatch_thunk $P5011, $P5012
    $P5016 = $P5011($P5014, $P5015)
    $P5017 = $P101."query"()
    $P5018 = $P5017."item"()
    find_lex $P5010, "&infix:<~>"
    perl6_multi_dispatch_thunk $P5009, $P5010
    $P5019 = $P5009($P5016, $P5018)
    set $P5022, $P5019
    goto if68_end161
  if68_else160:
    $P5020 = $P101."path"()
    $P5021 = $P5020."item"()
    set $P5022, $P5021
  if68_end161:
    perl6_decontainerize_return_value $P5006, $P5022
    goto lexotic_159
  lexotic_158:
    .get_results ($P5006)
  lexotic_159:
    find_lex $P5007, "&EXHAUST"
    store_lex "RETURN", $P5007
    nqp_get_sc_object $P5008, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 242
    perl6_type_check_return_value $P5006, $P5008
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "frag" :subid("cuid_45_1372810515.85045") :anon :lex :outer("cuid_2_1372810515.85045")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/URI.pm"
.annotate 'line', 184
    .param pmc CALL_SIG :call_sig 
    .lex "self", $P101 
    .lex "%_", $P102 
    .lex "$_", $P103 
    .lex "$/", $P104 
    .lex "$!", $P105 
    .lex "call_sig", $P106 
    .lex "$*DISPATCHER", $P107 
    .lex "&?ROUTINE", $P108 
    perl6_take_dispatcher 
    set $P5005, CALL_SIG
    set $P106, $P5005
    bind_signature 
    root_new $P109, ['parrot';'Continuation']
    set_label $P109, lexotic_162
    .lex "RETURN", $P109
.annotate 'line', 185
    nqp_get_sc_object $P5010, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 4
    repr_get_attr_obj $P5011, $P101, $P5010, "$!frag"
    set $P5013, $P5011
    if $P5011 goto unless69_end165 
    nqp_get_sc_object $P5012, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 48
    set $P5013, $P5012
  unless69_end165:
    $P5014 = $P5013."lc"()
    perl6ize_type $P5009, $P5014
    find_lex $P5008, "&prefix:<~>"
    perl6_multi_dispatch_thunk $P5007, $P5008
    $P5015 = $P5007($P5009)
    $P5016 = "&return"($P5015)
    perl6_decontainerize_return_value $P5006, $P5016
    goto lexotic_163
  lexotic_162:
    .get_results ($P5006)
  lexotic_163:
    find_lex $P5007, "&EXHAUST"
    store_lex "RETURN", $P5007
    nqp_get_sc_object $P5008, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 249
    perl6_type_check_return_value $P5006, $P5008
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "fragment" :subid("cuid_46_1372810515.85045") :anon :lex :outer("cuid_2_1372810515.85045")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/URI.pm"
.annotate 'line', 188
    .param pmc CALL_SIG :call_sig 
    .lex "self", $P101 
    .lex "%_", $P102 
    .lex "$_", $P103 
    .lex "$/", $P104 
    .lex "$!", $P105 
    .lex "call_sig", $P106 
    .lex "$*DISPATCHER", $P107 
    .lex "&?ROUTINE", $P108 
    perl6_take_dispatcher 
    set $P5005, CALL_SIG
    set $P106, $P5005
    bind_signature 
    $P5007 = $P101."frag"()
    $P5008 = $P5007."item"()
    perl6_decontainerize_return_value $P5006, $P5008
    nqp_get_sc_object $P5007, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 255
    perl6_type_check_return_value $P5006, $P5007
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "Str" :subid("cuid_47_1372810515.85045") :anon :lex :outer("cuid_2_1372810515.85045")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/URI.pm"
.annotate 'line', 190
    .param pmc CALL_SIG :call_sig 
    .lex "self", $P101 
    .lex "%_", $P102 
    .lex "$_", $P103 
    .lex "$/", $P104 
    .lex "$!", $P105 
    .lex "$str", $P106 
    .lex "call_sig", $P107 
    .lex "$*DISPATCHER", $P108 
    .lex "&?ROUTINE", $P109 
    perl6_take_dispatcher 
    set $P5005, CALL_SIG
    set $P107, $P5005
    bind_signature 
    root_new $P110, ['parrot';'Continuation']
    set_label $P110, lexotic_166
    .lex "RETURN", $P110
    $P5007 = $P101."scheme"()
    $P5008 = $P5007."item"()
    unless $P5008 goto if70_else168 
.annotate 'line', 192
    $P5011 = $P101."scheme"()
    $P5012 = $P5011."item"()
    find_lex $P5009, "&infix:<~>"
    $P5010 = "&METAOP_ASSIGN"($P5009)
    $P5013 = $P5010($P106, $P5012)
    goto if70_end169
  if70_else168:
    find_lex $P5014, "Nil"
  if70_end169:
    $P5007 = $P101."authority"()
    $P5008 = $P5007."item"()
    unless $P5008 goto if71_else170 
.annotate 'line', 193
    nqp_get_sc_object $P5013, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 264
    $P5014 = $P101."authority"()
    $P5015 = $P5014."item"()
    find_lex $P5012, "&infix:<~>"
    perl6_multi_dispatch_thunk $P5011, $P5012
    $P5016 = $P5011($P5013, $P5015)
    find_lex $P5009, "&infix:<~>"
    $P5010 = "&METAOP_ASSIGN"($P5009)
    $P5017 = $P5010($P106, $P5016)
    goto if71_end171
  if71_else170:
    find_lex $P5018, "Nil"
  if71_end171:
.annotate 'line', 194
    $P5009 = $P101."path"()
    $P5010 = $P5009."item"()
    find_lex $P5007, "&infix:<~>"
    $P5008 = "&METAOP_ASSIGN"($P5007)
    $P5008($P106, $P5010)
    $P5007 = $P101."query"()
    $P5008 = $P5007."item"()
    unless $P5008 goto if72_else172 
.annotate 'line', 195
    nqp_get_sc_object $P5013, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 243
    $P5014 = $P101."query"()
    $P5015 = $P5014."item"()
    find_lex $P5012, "&infix:<~>"
    perl6_multi_dispatch_thunk $P5011, $P5012
    $P5016 = $P5011($P5013, $P5015)
    find_lex $P5009, "&infix:<~>"
    $P5010 = "&METAOP_ASSIGN"($P5009)
    $P5017 = $P5010($P106, $P5016)
    goto if72_end173
  if72_else172:
    find_lex $P5018, "Nil"
  if72_end173:
    $P5007 = $P101."frag"()
    $P5008 = $P5007."item"()
    unless $P5008 goto if73_else174 
.annotate 'line', 196
    nqp_get_sc_object $P5013, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 265
    $P5014 = $P101."frag"()
    $P5015 = $P5014."item"()
    find_lex $P5012, "&infix:<~>"
    perl6_multi_dispatch_thunk $P5011, $P5012
    $P5016 = $P5011($P5013, $P5015)
    find_lex $P5009, "&infix:<~>"
    $P5010 = "&METAOP_ASSIGN"($P5009)
    $P5017 = $P5010($P106, $P5016)
    goto if73_end175
  if73_else174:
    find_lex $P5018, "Nil"
  if73_end175:
.annotate 'line', 197
    $P5007 = "&return"($P106)
    perl6_decontainerize_return_value $P5006, $P5007
    goto lexotic_167
  lexotic_166:
    .get_results ($P5006)
  lexotic_167:
    find_lex $P5007, "&EXHAUST"
    store_lex "RETURN", $P5007
    nqp_get_sc_object $P5008, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 261
    perl6_type_check_return_value $P5006, $P5008
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "chunks" :subid("cuid_48_1372810515.85045") :anon :lex :outer("cuid_2_1372810515.85045")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/URI.pm"
.annotate 'line', 202
    .param pmc CALL_SIG :call_sig 
    .lex "self", $P101 
    .lex "%_", $P102 
    .lex "$_", $P103 
    .lex "$/", $P104 
    .lex "$!", $P105 
    .lex "call_sig", $P106 
    .lex "$*DISPATCHER", $P107 
    .lex "&?ROUTINE", $P108 
    perl6_take_dispatcher 
    set $P5005, CALL_SIG
    set $P106, $P5005
    bind_signature 
    root_new $P109, ['parrot';'Continuation']
    set_label $P109, lexotic_176
    .lex "RETURN", $P109
.annotate 'line', 203
    nqp_get_sc_object $P5009, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 271
    find_lex $P5008, "&warn"
    perl6_multi_dispatch_cand_thunk $P5007, $P5008, 0
    $P5007($P5009)
.annotate 'line', 204
    nqp_get_sc_object $P5007, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 4
    repr_get_attr_obj $P5008, $P101, $P5007, "@!segments"
    $P5009 = "&return"($P5008)
    perl6_decontainerize_return_value $P5006, $P5009
    goto lexotic_177
  lexotic_176:
    .get_results ($P5006)
  lexotic_177:
    find_lex $P5007, "&EXHAUST"
    store_lex "RETURN", $P5007
    nqp_get_sc_object $P5008, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 270
    perl6_type_check_return_value $P5006, $P5008
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "uri" :subid("cuid_49_1372810515.85045") :anon :lex :outer("cuid_2_1372810515.85045")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/URI.pm"
.annotate 'line', 207
    .param pmc CALL_SIG :call_sig 
    .lex "self", $P101 
    .lex "%_", $P102 
    .lex "$_", $P103 
    .lex "$/", $P104 
    .lex "$!", $P105 
    .lex "call_sig", $P106 
    .lex "$*DISPATCHER", $P107 
    .lex "&?ROUTINE", $P108 
    perl6_take_dispatcher 
    set $P5005, CALL_SIG
    set $P106, $P5005
    bind_signature 
    root_new $P109, ['parrot';'Continuation']
    set_label $P109, lexotic_178
    .lex "RETURN", $P109
.annotate 'line', 208
    nqp_get_sc_object $P5009, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 278
    find_lex $P5008, "&warn"
    perl6_multi_dispatch_cand_thunk $P5007, $P5008, 0
    $P5007($P5009)
.annotate 'line', 209
    nqp_get_sc_object $P5007, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 4
    repr_get_attr_obj $P5008, $P101, $P5007, "$!uri"
    $P5009 = "&return"($P5008)
    perl6_decontainerize_return_value $P5006, $P5009
    goto lexotic_179
  lexotic_178:
    .get_results ($P5006)
  lexotic_179:
    find_lex $P5007, "&EXHAUST"
    store_lex "RETURN", $P5007
    nqp_get_sc_object $P5008, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 277
    perl6_type_check_return_value $P5006, $P5008
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "query_form" :subid("cuid_50_1372810515.85045") :anon :lex :outer("cuid_2_1372810515.85045")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/URI.pm"
.annotate 'line', 212
    .param pmc CALL_SIG :call_sig 
    .lex "self", $P101 
    .lex "%_", $P102 
    .lex "$_", $P103 
    .lex "$/", $P104 
    .lex "$!", $P105 
    .lex "call_sig", $P106 
    .lex "$*DISPATCHER", $P107 
    .lex "&?ROUTINE", $P108 
    perl6_take_dispatcher 
    set $P5005, CALL_SIG
    set $P106, $P5005
    bind_signature 
    root_new $P109, ['parrot';'Continuation']
    set_label $P109, lexotic_180
    .lex "RETURN", $P109
.annotate 'line', 213
    nqp_get_sc_object $P5007, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 4
    repr_get_attr_obj $P5008, $P101, $P5007, "%!query_form"
    $P5009 = "&return"($P5008)
    perl6_decontainerize_return_value $P5006, $P5009
    goto lexotic_181
  lexotic_180:
    .get_results ($P5006)
  lexotic_181:
    find_lex $P5007, "&EXHAUST"
    store_lex "RETURN", $P5007
    nqp_get_sc_object $P5008, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 284
    perl6_type_check_return_value $P5006, $P5008
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_53_1372810515.85045") :load :init
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/URI.pm"
    .const 'Sub' $P5001 = 'cuid_52_1372810515.85045' 
    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_51_1372810515.85045" 
    get_hll_global $P5002, "ModuleLoader"
    $P5003 = $P5002."load_setting"("CORE")
    $P5001."set_outer_ctx"($P5003)
    load_bytecode "ModuleLoader.pbc"
    get_root_namespace $P5003
    set $P5002, $P5003["nqp"]
    set $P5001, $P5002["ModuleLoader"]
    $P5001."load_module"("Perl6::ModuleLoader")
    get_hll_global $P5001, "ModuleLoader"
    $P5001."load_module"("IETF::RFC_Grammar", 3 :named("line"))
    load_bytecode "ModuleLoader.pbc"
    get_root_namespace $P5003
    set $P5002, $P5003["nqp"]
    set $P5001, $P5002["ModuleLoader"]
    $P5001."load_module"("Perl6::ModuleLoader")
    get_hll_global $P5001, "ModuleLoader"
    $P5001."load_module"("IETF::RFC_Grammar::URI", 4 :named("line"))
    load_bytecode "ModuleLoader.pbc"
    get_root_namespace $P5003
    set $P5002, $P5003["nqp"]
    set $P5001, $P5002["ModuleLoader"]
    $P5001."load_module"("Perl6::ModuleLoader")
    get_hll_global $P5001, "ModuleLoader"
    $P5001."load_module"("URI::Escape", 5 :named("line"))
    load_bytecode "ModuleLoader.pbc"
    get_root_namespace $P5003
    set $P5002, $P5003["nqp"]
    set $P5001, $P5002["ModuleLoader"]
    $P5001."load_module"("Perl6::ModuleLoader")
    get_hll_global $P5001, "ModuleLoader"
    $P5001."load_module"("URI::DefaultPort", 6 :named("line"))
    nqp_create_sc $P5001, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9"
    set cur_sc, $P5001
    cur_sc."set_description"("/usr/local/lib/parrot/4.6.0/languages/perl6/lib/URI.pm")
    new $P5002, 'ResizablePMCArray'
    set conflicts, $P5002
    new $P5003, 'ResizableStringArray'
    null $S5001
    push $P5003, $S5001
    push $P5003, "Uninstantiable"
    push $P5003, "P6opaque"
    push $P5003, "ACCEPTS"
    push $P5003, "5C7C172868FA9510BA84BFF074E73D635E54D9D3"
    push $P5003, "src/gen/CORE.setting"
    push $P5003, "WHERE"
    push $P5003, "WHICH"
    push $P5003, "take"
    push $P5003, "WHY"
    push $P5003, "Bool"
    push $P5003, "so"
    push $P5003, "not"
    push $P5003, "defined"
    push $P5003, "new"
    push $P5003, "CREATE"
    push $P5003, "bless"
    push $P5003, "BUILDALL"
    push $P5003, "BUILD_LEAST_DERIVED"
    push $P5003, "Numeric"
    push $P5003, "Real"
    push $P5003, "Str"
    push $P5003, "Stringy"
    push $P5003, "item"
    push $P5003, "say"
    push $P5003, "print"
    push $P5003, "gist"
    push $P5003, "perl"
    push $P5003, "DUMP"
    push $P5003, "DUMP-ID"
    push $P5003, "isa"
    push $P5003, "does"
    push $P5003, "can"
    push $P5003, "clone"
    push $P5003, "Capture"
    push $P5003, "dispatch:<var>"
    push $P5003, "dispatch:<::>"
    push $P5003, "dispatch:<!>"
    push $P5003, "dispatch:<.^>"
    push $P5003, "dispatch:<.=>"
    push $P5003, "dispatch:<.?>"
    push $P5003, "dispatch:<.+>"
    push $P5003, "dispatch:<.*>"
    push $P5003, "dispatch:<hyper>"
    push $P5003, "WALK"
    push $P5003, "eager"
    push $P5003, "elems"
    push $P5003, "end"
    push $P5003, "classify"
    push $P5003, "uniq"
    push $P5003, "infinite"
    push $P5003, "flat"
    push $P5003, "hash"
    push $P5003, "list"
    push $P5003, "lol"
    push $P5003, "pick"
    push $P5003, "roll"
    push $P5003, "reverse"
    push $P5003, "sort"
    push $P5003, "values"
    push $P5003, "keys"
    push $P5003, "kv"
    push $P5003, "pairs"
    push $P5003, "Array"
    push $P5003, "grep"
    push $P5003, "first"
    push $P5003, "join"
    push $P5003, "map"
    push $P5003, "min"
    push $P5003, "max"
    push $P5003, "minmax"
    push $P5003, "push"
    push $P5003, "tree"
    push $P5003, "unshift"
    push $P5003, "postcircumfix:<[ ]>"
    push $P5003, "at_pos"
    push $P5003, "all"
    push $P5003, "any"
    push $P5003, "one"
    push $P5003, "none"
    push $P5003, "postcircumfix:<{ }>"
    push $P5003, "at_key"
    push $P5003, "reduce"
    push $P5003, "FLATTENABLE_LIST"
    push $P5003, "FLATTENABLE_HASH"
    push $P5003, "parse"
    push $P5003, "init"
    push $P5003, "scheme"
    push $P5003, "authority"
    push $P5003, "host"
    push $P5003, "default_port"
    push $P5003, "_port"
    push $P5003, "port"
    push $P5003, "path"
    push $P5003, "absolute"
    push $P5003, "relative"
    push $P5003, "query"
    push $P5003, "path_query"
    push $P5003, "frag"
    push $P5003, "fragment"
    push $P5003, "chunks"
    push $P5003, "uri"
    push $P5003, "query_form"
    push $P5003, "grammar"
    push $P5003, "is_validating"
    push $P5003, "segments"
    push $P5003, "BUILD"
    push $P5003, "27420382D80CEF05775E7415279171A93892A1F1-1372810242.10453"
    push $P5003, "src/gen/BOOTSTRAP.pm"
    push $P5003, "$!grammar"
    push $P5003, "$!is_validating"
    push $P5003, "$!path"
    push $P5003, "$!is_absolute"
    push $P5003, "$!scheme"
    push $P5003, "$!authority"
    push $P5003, "$!query"
    push $P5003, "$!frag"
    push $P5003, "%!query_form"
    push $P5003, "$!uri"
    push $P5003, "@!segments"
    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, "URI"
    push $P5003, "$=pod"
    push $P5003, "!UNIT_MARKER"
    push $P5003, "$?CLASS"
    push $P5003, "::?CLASS"
    push $P5003, "&uri_escape"
    push $P5003, "4CA99B345B89B827D835C4F294FC7ED2618304BD"
    push $P5003, "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/URI/Escape.pm"
    push $P5003, "&uri_unescape"
    push $P5003, "&split_query"
    push $P5003, "Increase"
    push $P5003, "Same"
    push $P5003, "Decrease"
    push $P5003, "-1"
    push $P5003, "0"
    push $P5003, "1"
    push $P5003, "Order"
    push $P5003, "$!key"
    push $P5003, "$!value"
    push $P5003, "enums"
    push $P5003, "pair"
    push $P5003, "Int"
    push $P5003, "postcircumfix:<( )>"
    push $P5003, "key"
    push $P5003, "value"
    push $P5003, "28FAC381EB59BA79DA1D75F70404C20E0548F4F5-1372810034.5696"
    push $P5003, "src/stage2/NQPCORE.setting"
    push $P5003, "&scheme_port"
    push $P5003, "$_"
    push $P5003, "$str"
    push $P5003, "$c_str"
    push $P5003, "$comp_container"
    push $P5003, "$first_chunk"
    push $P5003, "$*DISPATCHER"
    push $P5003, "&?ROUTINE"
    push $P5003, "<"
    push $P5003, "\""
    push $P5003, ""
    push $P5003, "alt_nfa__1_1372810516.67028"
    push $P5003, "%_"
    push $P5003, "subst"
    push $P5003, ">"
    push $P5003, "alt_nfa__2_1372810516.6945"
    push $P5003, "Could not parse URI: "
    push $P5003, "URI_reference"
    push $P5003, "relative_ref"
    push $P5003, "hier_part"
    push $P5003, "relative_part"
    push $P5003, "path_abempty"
    push $P5003, "path_absolute"
    push $P5003, "path_noscheme"
    push $P5003, "path_rootless"
    push $P5003, "segment"
    push $P5003, "segment_nz_nc"
    push $P5003, "segment_nz"
    push $P5003, "$query"
    push $P5003, "%query_form"
    push $P5003, "="
    push $P5003, "&;"
    push $P5003, "$i"
    push $P5003, "$qmap"
    push $P5003, "init method now deprecated in favor of parse method"
    push $P5003, "rfc3896"
    push $P5003, "$uri_pos1"
    push $P5003, "$uri"
    push $P5003, "$obj"
    push $P5003, "Please specify the uri by name or position but not both."
    push $P5003, "$is_validating"
    push $P5003, "?"
    push $P5003, "://"
    push $P5003, "#"
    push $P5003, "chunks attribute now deprecated in favor of segments"
    push $P5003, "uri attribute now deprecated in favor of .grammar.parse_result"
    push $P5003, "NAME"
    push $P5003, "head"
    push $P5003, unicode:"URI \u2014 Uniform Resource Identifiers (absolute and relative)"
    push $P5003, "SYNOPSYS"
    push $P5003, "use URI;\nmy $u = URI.new('http://her.com/foo/bar?tag=woow#bla');"
    push $P5003, "my $scheme = $u.scheme;\nmy $authority = $u.authority;\nmy $host = $u.host;\nmy $port = $u.port;\nmy $path = $u.path;\nmy $query = $u.query;\nmy $frag = $u.frag; # or $u.fragment;\nmy $tag = $u.query_form<tag>; # should be woow"
    push $P5003, "my $is_absolute = $u.absolute;\nmy $is_relative = $u.relative;"
    push $P5003, "# something p5 URI without grammar could not easily do !\nmy $host_in_grammar =\n    $u.grammar.parse_result<URI_reference><URI><hier_part><authority><host>;\nif ($host_in_grammar<reg_name>) {\n    say 'Host looks like registered domain name - approved!';\n}\nelse {\n    say 'Sorry we do not take ip address hosts at this time.';\n    say 'Please use registered domain name!';\n}"
    push $P5003, "# require whole string matches URI and throw exception otherwise ..\nmy $u_v = URI.new('http://?#?#', :is_validating<1>);# throw exception"
    push $P5003, "pod"
    push $P5003, "GLOBAL"
    push $P5003, "IETF"
    push $P5003, "9E2C07BAF5CD0D3B97FF1D1A065814DD33A335C2"
    push $P5003, "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/IETF/RFC_Grammar.pm"
    push $P5003, "Escape"
    push $P5003, "DefaultPort"
    push $P5003, "AFE91FA64572E60D278FD73932831A0778D7C6CA"
    push $P5003, "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/URI/DefaultPort.pm"
    push $P5003, "call_sig"
    push $P5003, "%default_port"
    push $P5003, "ftp"
    push $P5003, "ssh"
    push $P5003, "telnet"
    push $P5003, "tn3270"
    push $P5003, "gopher"
    push $P5003, "http"
    push $P5003, "pop"
    push $P5003, "news"
    push $P5003, "ldap"
    push $P5003, "https"
    push $P5003, "rlogin"
    push $P5003, "rtsp"
    push $P5003, "rtspu"
    push $P5003, "snews"
    push $P5003, "ldaps"
    push $P5003, "rsync"
    push $P5003, "mms"
    push $P5003, "sip"
    push $P5003, "sips"
    push $P5003, "$dcpkg"
    push $P5003, "$meth"
    push $P5003, "$attr_type"
    push $P5003, "$/"
    push $P5003, "$!"
    push $P5003, "$name"
    push $P5003, "$meth_name"
    push $P5003, "RETURN"
    push $P5003, "self"
    push $P5003, "$package"
    .const 'Sub' $P5004 = 'cuid_52_1372810515.85045' 
    capture_lex $P5004
    $P5005 = $P5004()
    nqp_deserialize_sc "[encoded data, 43392 characters]", cur_sc, $P5003, $P5005, conflicts
    unless conflicts goto if74_end183 
    get_hll_global $P5006, "ModuleLoader"
    $P5007 = $P5006."resolve_repossession_conflicts"(conflicts)
  if74_end183:
    .const "LexInfo" $P5001 = "cuid_1_1372810515.85045"
    nqp_get_sc_object $P5002, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 2
    $P5001."set_static_lexpad"($P5002)
    .const "LexInfo" $P5001 = "cuid_2_1372810515.85045"
    nqp_get_sc_object $P5002, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 5
    $P5001."set_static_lexpad"($P5002)
    .const "LexInfo" $P5001 = "cuid_3_1372810515.85045"
    nqp_get_sc_object $P5002, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 16
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_3_1372810515.85045" 
    nqp_get_sc_object $P5002, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 15
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_4_1372810515.85045"
    nqp_get_sc_object $P5002, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 39
    $P5001."set_static_lexpad"($P5002)
    .const "LexInfo" $P5001 = "cuid_5_1372810515.85045"
    nqp_get_sc_object $P5002, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 47
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_5_1372810515.85045" 
    nqp_get_sc_object $P5002, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 42
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_6_1372810515.85045"
    nqp_get_sc_object $P5002, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 56
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_6_1372810515.85045" 
    nqp_get_sc_object $P5002, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 51
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_7_1372810515.85045" 
    nqp_get_sc_object $P5002, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 58
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_8_1372810515.85045" 
    nqp_get_sc_object $P5002, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 60
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_9_1372810515.85045" 
    nqp_get_sc_object $P5002, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 63
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_10_1372810515.85045" 
    nqp_get_sc_object $P5002, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 62
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_11_1372810515.85045" 
    nqp_get_sc_object $P5002, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 57
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_12_1372810515.85045" 
    nqp_get_sc_object $P5002, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 83
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_13_1372810515.85045" 
    nqp_get_sc_object $P5002, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 88
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_14_1372810515.85045" 
    nqp_get_sc_object $P5002, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 91
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_15_1372810515.85045" 
    nqp_get_sc_object $P5002, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 95
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_16_1372810515.85045" 
    nqp_get_sc_object $P5002, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 94
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_17_1372810515.85045" 
    nqp_get_sc_object $P5002, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 93
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_4_1372810515.85045" 
    nqp_get_sc_object $P5002, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 36
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_18_1372810515.85045"
    nqp_get_sc_object $P5002, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 107
    $P5001."set_static_lexpad"($P5002)
    .const "LexInfo" $P5001 = "cuid_19_1372810515.85045"
    nqp_get_sc_object $P5002, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 114
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_19_1372810515.85045" 
    nqp_get_sc_object $P5002, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 109
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_20_1372810515.85045" 
    nqp_get_sc_object $P5002, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 108
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_21_1372810515.85045"
    nqp_get_sc_object $P5002, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 123
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_21_1372810515.85045" 
    nqp_get_sc_object $P5002, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 118
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_22_1372810515.85045" 
    nqp_get_sc_object $P5002, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 125
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_23_1372810515.85045" 
    nqp_get_sc_object $P5002, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 130
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_24_1372810515.85045" 
    nqp_get_sc_object $P5002, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 132
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_25_1372810515.85045" 
    nqp_get_sc_object $P5002, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 129
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_26_1372810515.85045" 
    nqp_get_sc_object $P5002, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 135
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_27_1372810515.85045" 
    nqp_get_sc_object $P5002, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 124
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_18_1372810515.85045" 
    nqp_get_sc_object $P5002, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 104
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_28_1372810515.85045"
    nqp_get_sc_object $P5002, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 150
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_28_1372810515.85045" 
    nqp_get_sc_object $P5002, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 142
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_29_1372810515.85045"
    nqp_get_sc_object $P5002, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 158
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_29_1372810515.85045" 
    nqp_get_sc_object $P5002, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 151
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_30_1372810515.85045"
    nqp_get_sc_object $P5002, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 163
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_31_1372810515.85045" 
    nqp_get_sc_object $P5002, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 164
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_32_1372810515.85045" 
    nqp_get_sc_object $P5002, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 166
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_33_1372810515.85045" 
    nqp_get_sc_object $P5002, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 169
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_30_1372810515.85045" 
    nqp_get_sc_object $P5002, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 159
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_34_1372810515.85045"
    nqp_get_sc_object $P5002, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 184
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_34_1372810515.85045" 
    nqp_get_sc_object $P5002, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 179
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_35_1372810515.85045"
    nqp_get_sc_object $P5002, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 190
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_35_1372810515.85045" 
    nqp_get_sc_object $P5002, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 185
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_36_1372810515.85045"
    nqp_get_sc_object $P5002, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 197
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_36_1372810515.85045" 
    nqp_get_sc_object $P5002, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 191
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_37_1372810515.85045"
    nqp_get_sc_object $P5002, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 204
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_37_1372810515.85045" 
    nqp_get_sc_object $P5002, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 198
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_38_1372810515.85045"
    nqp_get_sc_object $P5002, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 211
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_38_1372810515.85045" 
    nqp_get_sc_object $P5002, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 205
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_39_1372810515.85045"
    nqp_get_sc_object $P5002, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 217
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_39_1372810515.85045" 
    nqp_get_sc_object $P5002, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 212
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_40_1372810515.85045"
    nqp_get_sc_object $P5002, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 223
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_40_1372810515.85045" 
    nqp_get_sc_object $P5002, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 218
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_41_1372810515.85045"
    nqp_get_sc_object $P5002, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 229
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_41_1372810515.85045" 
    nqp_get_sc_object $P5002, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 224
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_42_1372810515.85045"
    nqp_get_sc_object $P5002, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 235
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_42_1372810515.85045" 
    nqp_get_sc_object $P5002, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 230
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_43_1372810515.85045"
    nqp_get_sc_object $P5002, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 241
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_43_1372810515.85045" 
    nqp_get_sc_object $P5002, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 236
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_44_1372810515.85045"
    nqp_get_sc_object $P5002, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 248
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_44_1372810515.85045" 
    nqp_get_sc_object $P5002, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 242
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_45_1372810515.85045"
    nqp_get_sc_object $P5002, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 254
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_45_1372810515.85045" 
    nqp_get_sc_object $P5002, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 249
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_46_1372810515.85045"
    nqp_get_sc_object $P5002, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 260
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_46_1372810515.85045" 
    nqp_get_sc_object $P5002, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 255
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_47_1372810515.85045"
    nqp_get_sc_object $P5002, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 263
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_47_1372810515.85045" 
    nqp_get_sc_object $P5002, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 261
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_48_1372810515.85045"
    nqp_get_sc_object $P5002, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 276
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_48_1372810515.85045" 
    nqp_get_sc_object $P5002, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 270
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_49_1372810515.85045"
    nqp_get_sc_object $P5002, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 283
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_49_1372810515.85045" 
    nqp_get_sc_object $P5002, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 277
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_50_1372810515.85045"
    nqp_get_sc_object $P5002, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 324
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_50_1372810515.85045" 
    nqp_get_sc_object $P5002, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 284
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_2_1372810515.85045" 
    nqp_get_sc_object $P5002, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 326
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_1_1372810515.85045" 
    nqp_get_sc_object $P5002, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 3
    perl6_associate_sub_code_object $P5001, $P5002
    nqp_get_sc_object $P5001, "814E49C6FF95329961FEDD30EBE95C9B2CA296A9", 0
    set_hll_global "GLOBAL", $P5001
    .return () 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_52_1372810515.85045") :anon :lex :outer("cuid_53_1372810515.85045")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/URI.pm"
    new $P5001, 'ResizablePMCArray'
    .const 'Sub' $P5002 = "cuid_3_1372810515.85045" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_5_1372810515.85045" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_6_1372810515.85045" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_7_1372810515.85045" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_8_1372810515.85045" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_9_1372810515.85045" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_10_1372810515.85045" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_11_1372810515.85045" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_12_1372810515.85045" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_13_1372810515.85045" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_14_1372810515.85045" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_15_1372810515.85045" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_16_1372810515.85045" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_17_1372810515.85045" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_4_1372810515.85045" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_19_1372810515.85045" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_20_1372810515.85045" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_21_1372810515.85045" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_22_1372810515.85045" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_23_1372810515.85045" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_24_1372810515.85045" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_25_1372810515.85045" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_26_1372810515.85045" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_27_1372810515.85045" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_18_1372810515.85045" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_28_1372810515.85045" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_29_1372810515.85045" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_31_1372810515.85045" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_32_1372810515.85045" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_33_1372810515.85045" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_30_1372810515.85045" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_34_1372810515.85045" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_35_1372810515.85045" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_36_1372810515.85045" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_37_1372810515.85045" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_38_1372810515.85045" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_39_1372810515.85045" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_40_1372810515.85045" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_41_1372810515.85045" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_42_1372810515.85045" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_43_1372810515.85045" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_44_1372810515.85045" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_45_1372810515.85045" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_46_1372810515.85045" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_47_1372810515.85045" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_48_1372810515.85045" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_49_1372810515.85045" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_50_1372810515.85045" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_2_1372810515.85045" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_1_1372810515.85045" 
    push $P5001, $P5002
    .return ($P5001) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_54_1372810515.85045") :load
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/URI.pm"
    .const 'Sub' $P5001 = "cuid_51_1372810515.85045" 
    $P5002 = $P5001()
    .return ($P5002) 
.end