.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_19_1372810548.63996") :anon :lex
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/HTTP/Easy/PSGI.pm6"
.annotate 'line', 1
    .const 'Sub' $P5003 = 'cuid_1_1372810548.63996' 
    capture_lex $P5003 
    .const 'Sub' $P5001 = 'cuid_1_1372810548.63996' 
    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_1372810548.63996") :anon :lex :outer("cuid_19_1372810548.63996")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/HTTP/Easy/PSGI.pm6"
.annotate 'line', 1
    .const 'Sub' $P5005 = 'cuid_2_1372810548.63996' 
    capture_lex $P5005 
    .lex "GLOBALish", $P101 
    .lex "EXPORT", $P102 
    .lex "$?PACKAGE", $P103 
    .lex "::?PACKAGE", $P104 
    .lex "$_", $P105 
    .lex "$/", $P106 
    .lex "$!", $P107 
    .lex "$=pod", $P108 
    .lex "!UNIT_MARKER", $P109 
    .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, "279448D1A3300DA554C726B61DADFDA488AD8238", 96
    .const 'Sub' $P5005 = 'cuid_2_1372810548.63996' 
    capture_lex $P5005
    $P5006 = $P5005()
    nqp_get_sc_object $P5007, "279448D1A3300DA554C726B61DADFDA488AD8238", 9
    .return ($P5007) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_2_1372810548.63996") :anon :lex :outer("cuid_1_1372810548.63996")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/HTTP/Easy/PSGI.pm6"
.annotate 'line', 6
    .const 'Sub' $P5009 = 'cuid_3_1372810548.63996' 
    capture_lex $P5009 
    .const 'Sub' $P5009 = 'cuid_4_1372810548.63996' 
    capture_lex $P5009 
    .const 'Sub' $P5009 = 'cuid_18_1372810548.63996' 
    capture_lex $P5009 
    .lex "$?PACKAGE", $P101 
    .lex "::?PACKAGE", $P102 
    .lex "$?CLASS", $P103 
    .lex "::?CLASS", $P104 
    .lex "$_", $P105 
    .lex "&get_http_status_msg", $P106 
    .lex "$CRLF", $P107 
    .const 'Sub' $P5002 = 'cuid_3_1372810548.63996' 
    capture_lex $P5002
    .const 'Sub' $P5003 = 'cuid_4_1372810548.63996' 
    capture_lex $P5003
    .const 'Sub' $P5004 = 'cuid_18_1372810548.63996' 
    capture_lex $P5004
.annotate 'line', 9
    nqp_get_sc_object $P5005, "279448D1A3300DA554C726B61DADFDA488AD8238", 12
    null $P5005
    null $P5006
    nqp_get_sc_object $P5007, "279448D1A3300DA554C726B61DADFDA488AD8238", 83
    $P5008 = $P5007."clone"()
    perl6_capture_lex $P5008
    .return ($P5008) 
.end
.HLL "perl6"
.namespace []
.sub "app" :subid("cuid_3_1372810548.63996") :anon :lex :outer("cuid_2_1372810548.63996")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/HTTP/Easy/PSGI.pm6"
.annotate 'line', 16
    .param pmc CALL_SIG :call_sig 
    .lex "self", $P101 
    .lex "%_", $P102 
    .lex "$app", $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 
.annotate 'line', 17
    nqp_get_sc_object $P5007, "279448D1A3300DA554C726B61DADFDA488AD8238", 9
    repr_get_attr_obj $P5008, $P101, $P5007, "$!app"
    perl6_container_store $P5008, $P103
    perl6_decontainerize_return_value $P5006, $P5008
    nqp_get_sc_object $P5007, "279448D1A3300DA554C726B61DADFDA488AD8238", 15
    perl6_type_check_return_value $P5006, $P5007
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "handler" :subid("cuid_4_1372810548.63996") :anon :lex :outer("cuid_2_1372810548.63996")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/HTTP/Easy/PSGI.pm6"
.annotate 'line', 21
    .param pmc CALL_SIG :call_sig 
    .const 'Sub' $P5011 = 'cuid_9_1372810548.63996' 
    capture_lex $P5011 
    .const 'Sub' $P5011 = 'cuid_15_1372810548.63996' 
    capture_lex $P5011 
    .const 'Sub' $P5011 = 'cuid_5_1372810548.63996' 
    capture_lex $P5011 
    .const 'Sub' $P5011 = 'cuid_6_1372810548.63996' 
    capture_lex $P5011 
    .const 'Sub' $P5011 = 'cuid_8_1372810548.63996' 
    capture_lex $P5011 
    .const 'Sub' $P5011 = 'cuid_16_1372810548.63996' 
    capture_lex $P5011 
    .const 'Sub' $P5011 = 'cuid_17_1372810548.63996' 
    capture_lex $P5011 
    .lex "self", $P101 
    .lex "%_", $P102 
    .lex "$_", $P103 
    .lex "$/", $P104 
    .lex "$!", $P105 
    .lex "$result", $P106 
    .lex "$message", $P107 
    .lex "$output", $P108 
    .lex "@body", $P109 
    .lex "$body", $P110 
    .lex "call_sig", $P111 
    .lex "$*DISPATCHER", $P112 
    .lex "&?ROUTINE", $P113 
    .local pmc old_topic_1 
    .local pmc sm_result_1 
    .local pmc old_topic_4 
    .local pmc sm_result_4 
    perl6_take_dispatcher 
    .const 'Sub' $P5005 = 'cuid_9_1372810548.63996' 
    capture_lex $P5005
    .const 'Sub' $P5006 = 'cuid_15_1372810548.63996' 
    capture_lex $P5006
    set $P5007, CALL_SIG
    set $P111, $P5007
    bind_signature 
    root_new $P114, ['parrot';'Continuation']
    set_label $P114, lexotic_20
    .lex "RETURN", $P114
.annotate 'line', 23
    $P5010 = $P101."env"()
    $P5011 = $P5010."hash"()
    nqp_get_sc_object $P5012, "279448D1A3300DA554C726B61DADFDA488AD8238", 24
    $P5013 = $P5011."postcircumfix:<{ }>"($P5012)
    perl6ize_type $P5009, $P5013
    nqp_get_sc_object $P5014, "279448D1A3300DA554C726B61DADFDA488AD8238", 25
    nqp_get_sc_object $P5015, "279448D1A3300DA554C726B61DADFDA488AD8238", 26
    $P5016 = "&infix:<,>"($P5014, $P5015)
    $P5017 = "&circumfix:<[ ]>"($P5016)
    perl6_container_store $P5009, $P5017
.annotate 'line', 24
    $P5010 = $P101."env"()
    $P5011 = $P5010."hash"()
    nqp_get_sc_object $P5012, "279448D1A3300DA554C726B61DADFDA488AD8238", 27
    $P5013 = $P5011."postcircumfix:<{ }>"($P5012)
    perl6ize_type $P5009, $P5013
    nqp_get_sc_object $P5014, "279448D1A3300DA554C726B61DADFDA488AD8238", 28
    perl6_container_store $P5009, $P5014
.annotate 'line', 25
    $P5010 = $P101."env"()
    $P5011 = $P5010."hash"()
    nqp_get_sc_object $P5012, "279448D1A3300DA554C726B61DADFDA488AD8238", 29
    $P5013 = $P5011."postcircumfix:<{ }>"($P5012)
    perl6ize_type $P5009, $P5013
    perl6_booleanize $P5014, 0
    perl6_container_store $P5009, $P5014
.annotate 'line', 26
    $P5010 = $P101."env"()
    $P5011 = $P5010."hash"()
    nqp_get_sc_object $P5012, "279448D1A3300DA554C726B61DADFDA488AD8238", 30
    $P5013 = $P5011."postcircumfix:<{ }>"($P5012)
    perl6ize_type $P5009, $P5013
    perl6_booleanize $P5014, 0
    perl6_container_store $P5009, $P5014
.annotate 'line', 27
    $P5010 = $P101."env"()
    $P5011 = $P5010."hash"()
    nqp_get_sc_object $P5012, "279448D1A3300DA554C726B61DADFDA488AD8238", 31
    $P5013 = $P5011."postcircumfix:<{ }>"($P5012)
    perl6ize_type $P5009, $P5013
    $P5014 = $P101."body"()
    $P5015 = $P5014."item"()
    perl6_container_store $P5009, $P5015
.annotate 'line', 28
    $P5010 = $P101."env"()
    $P5011 = $P5010."hash"()
    nqp_get_sc_object $P5012, "279448D1A3300DA554C726B61DADFDA488AD8238", 32
    $P5013 = $P5011."postcircumfix:<{ }>"($P5012)
    perl6ize_type $P5009, $P5013
    nqp_get_sc_object $P5014, "279448D1A3300DA554C726B61DADFDA488AD8238", 33
    $P5015 = "&DYNAMIC"($P5014)
    perl6_container_store $P5009, $P5015
.annotate 'line', 29
    $P5010 = $P101."env"()
    $P5011 = $P5010."hash"()
    nqp_get_sc_object $P5012, "279448D1A3300DA554C726B61DADFDA488AD8238", 34
    $P5013 = $P5011."postcircumfix:<{ }>"($P5012)
    perl6ize_type $P5009, $P5013
    perl6_booleanize $P5014, 0
    perl6_container_store $P5009, $P5014
.annotate 'line', 30
    $P5010 = $P101."env"()
    $P5011 = $P5010."hash"()
    nqp_get_sc_object $P5012, "279448D1A3300DA554C726B61DADFDA488AD8238", 35
    $P5013 = $P5011."postcircumfix:<{ }>"($P5012)
    perl6ize_type $P5009, $P5013
    perl6_booleanize $P5014, 0
    perl6_container_store $P5009, $P5014
.annotate 'line', 31
    $P5010 = $P101."env"()
    $P5011 = $P5010."hash"()
    nqp_get_sc_object $P5012, "279448D1A3300DA554C726B61DADFDA488AD8238", 36
    $P5013 = $P5011."postcircumfix:<{ }>"($P5012)
    perl6ize_type $P5009, $P5013
    perl6_booleanize $P5014, 0
    perl6_container_store $P5009, $P5014
    find_lex $P5009, "$_"
    set old_topic_1, $P5009
.annotate 'line', 33
    nqp_get_sc_object $P5010, "279448D1A3300DA554C726B61DADFDA488AD8238", 9
    repr_get_attr_obj $P5011, $P101, $P5010, "$!app"
    store_lex "$_", $P5011
    nqp_get_sc_object $P5012, "5C7C172868FA9510BA84BFF074E73D635E54D9D3", 21
    find_lex $P5013, "$_"
    $P5014 = $P5012."ACCEPTS"($P5013)
    set sm_result_1, $P5014
    store_lex "$_", old_topic_1
    unless sm_result_1 goto if15_else22 
    .const 'Sub' $P5009 = 'cuid_5_1372810548.63996' 
    capture_lex $P5009
    $P5010 = $P5009()
    goto if15_end23
  if15_else22:
.annotate 'line', 37
    nqp_get_sc_object $P5012, "279448D1A3300DA554C726B61DADFDA488AD8238", 9
    repr_get_attr_obj $P5013, $P101, $P5012, "$!app"
    nqp_get_sc_object $P5014, "279448D1A3300DA554C726B61DADFDA488AD8238", 41
    $P5015 = $P5013."can"($P5014)
    perl6ize_type $P5011, $P5015
    unless $P5011 goto if16_else24 
    .const 'Sub' $P5016 = 'cuid_6_1372810548.63996' 
    capture_lex $P5016
    $P5017 = $P5016()
    set $P5020, $P5017
    goto if16_end25
  if16_else24:
    .const 'Sub' $P5018 = 'cuid_8_1372810548.63996' 
    capture_lex $P5018
    $P5019 = $P5018()
    set $P5020, $P5019
  if16_end25:
  if15_end23:
.annotate 'line', 45

    nqp_get_sc_object $P5010, "279448D1A3300DA554C726B61DADFDA488AD8238", 26
    $P5011 = $P106."postcircumfix:<[ ]>"($P5010)
    perl6ize_type $P5009, $P5011
    $P5012 = "&get_http_status_msg"($P5009)
    perl6_container_store $P107, $P5012
.annotate 'line', 46

    $P5015 = $P101."http-protocol"()
    $P5016 = $P5015."item"()
    nqp_get_sc_object $P5017, "279448D1A3300DA554C726B61DADFDA488AD8238", 52
    find_lex $P5014, "&infix:<~>"
    perl6_multi_dispatch_thunk $P5013, $P5014
    $P5018 = $P5013($P5016, $P5017)
    nqp_get_sc_object $P5020, "279448D1A3300DA554C726B61DADFDA488AD8238", 26
    $P5021 = $P106."postcircumfix:<[ ]>"($P5020)
    perl6ize_type $P5019, $P5021
    find_lex $P5012, "&infix:<~>"
    perl6_multi_dispatch_thunk $P5011, $P5012
    $P5022 = $P5011($P5018, $P5019)
    nqp_get_sc_object $P5027, "279448D1A3300DA554C726B61DADFDA488AD8238", 52
    $P5028 = $P107."Stringy"()
    find_lex $P5026, "&infix:<~>"
    perl6_multi_dispatch_thunk $P5025, $P5026
    $P5029 = $P5025($P5027, $P5028)
    find_lex $P5030, "$CRLF"
    $P5031 = $P5030."Stringy"()
    find_lex $P5024, "&infix:<~>"
    perl6_multi_dispatch_thunk $P5023, $P5024
    $P5032 = $P5023($P5029, $P5031)
    find_lex $P5010, "&infix:<~>"
    perl6_multi_dispatch_thunk $P5009, $P5010
    $P5033 = $P5009($P5022, $P5032)
    perl6_container_store $P108, $P5033
.annotate 'line', 47
    nqp_get_sc_object $P5010, "279448D1A3300DA554C726B61DADFDA488AD8238", 25
    $P5011 = $P106."postcircumfix:<[ ]>"($P5010)
    perl6ize_type $P5009, $P5011
    $P5012 = $P5009."list"()
    $P5013 = "&infix:<,>"($P5012)
    nqp_get_sc_object $P5014, "279448D1A3300DA554C726B61DADFDA488AD8238", 53
    $P5015 = $P5014."clone"()
    perl6_capture_lex $P5015
    $P5016 = $P5013."map"($P5015)
    "&eager"($P5016)
.annotate 'line', 51

    nqp_get_sc_object $P5010, "279448D1A3300DA554C726B61DADFDA488AD8238", 59
    $P5011 = $P106."postcircumfix:<[ ]>"($P5010)
    perl6ize_type $P5009, $P5011
    $P109."STORE"($P5009)
.annotate 'line', 53
    $P5009 = "&infix:<,>"($P109)
    nqp_get_sc_object $P5010, "279448D1A3300DA554C726B61DADFDA488AD8238", 61
    $P5011 = $P5010."clone"()
    perl6_capture_lex $P5011
    $P5012 = $P5009."map"($P5011)
    "&eager"($P5012)
    find_lex $P5009, "$_"
    set old_topic_4, $P5009
.annotate 'line', 75

    store_lex "$_", $P110
    nqp_get_sc_object $P5010, "5C7C172868FA9510BA84BFF074E73D635E54D9D3", 8957
    find_lex $P5011, "$_"
    $P5012 = $P5010."ACCEPTS"($P5011)
    set sm_result_4, $P5012
    store_lex "$_", old_topic_4
    unless sm_result_4 goto if17_else26 
    .const 'Sub' $P5009 = 'cuid_16_1372810548.63996' 
    capture_lex $P5009
    $P5010 = $P5009()
    goto if17_end27
  if17_else26:
    .const 'Sub' $P5011 = 'cuid_17_1372810548.63996' 
    capture_lex $P5011
    $P5012 = $P5011()
  if17_end27:
.annotate 'line', 83
    $P5009 = "&return"($P108)
    perl6_decontainerize_return_value $P5008, $P5009
    goto lexotic_21
  lexotic_20:
    .get_results ($P5008)
  lexotic_21:
    find_lex $P5009, "&EXHAUST"
    store_lex "RETURN", $P5009
    nqp_get_sc_object $P5010, "279448D1A3300DA554C726B61DADFDA488AD8238", 23
    perl6_type_check_return_value $P5008, $P5010
    .return ($P5008) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_9_1372810548.63996") :anon :lex :outer("cuid_4_1372810548.63996")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/HTTP/Easy/PSGI.pm6"
.annotate 'line', 48
    .param pmc CALL_SIG :call_sig 
    .lex "$header", $P101 
    .lex "call_sig", $P102 
    .lex "$*DISPATCHER", $P103 
    perl6_take_dispatcher 
    set $P5001, CALL_SIG
    set $P102, $P5001
    bind_signature 
.annotate 'line', 49
    find_lex $P5005, "$output"
    $P5013 = $P101."key"()
    perl6ize_type $P5012, $P5013
    nqp_get_sc_object $P5014, "279448D1A3300DA554C726B61DADFDA488AD8238", 54
    find_lex $P5011, "&infix:<~>"
    perl6_multi_dispatch_thunk $P5010, $P5011
    $P5015 = $P5010($P5012, $P5014)
    $P5017 = $P101."value"()
    perl6ize_type $P5016, $P5017
    find_lex $P5009, "&infix:<~>"
    perl6_multi_dispatch_thunk $P5008, $P5009
    $P5018 = $P5008($P5015, $P5016)
    find_lex $P5019, "$CRLF"
    find_lex $P5007, "&infix:<~>"
    perl6_multi_dispatch_thunk $P5006, $P5007
    $P5020 = $P5006($P5018, $P5019)
    find_lex $P5003, "&infix:<~>"
    $P5004 = "&METAOP_ASSIGN"($P5003)
    $P5021 = $P5004($P5005, $P5020)
    .return ($P5021) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_15_1372810548.63996") :anon :lex :outer("cuid_4_1372810548.63996")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/HTTP/Easy/PSGI.pm6"
.annotate 'line', 54
    .param pmc CALL_SIG :call_sig 
    .const 'Sub' $P5003 = 'cuid_10_1372810548.63996' 
    capture_lex $P5003 
    .const 'Sub' $P5003 = 'cuid_13_1372810548.63996' 
    capture_lex $P5003 
    .const 'Sub' $P5003 = 'cuid_14_1372810548.63996' 
    capture_lex $P5003 
    .lex "$segment", $P101 
    .lex "call_sig", $P102 
    .lex "$*DISPATCHER", $P103 
    .local pmc old_topic_2 
    .local pmc sm_result_2 
    perl6_take_dispatcher 
    set $P5001, CALL_SIG
    set $P102, $P5001
    bind_signature 
.annotate 'line', 55
    find_lex $P5006, "$body"
    $P5007 = $P5006."defined"()
    perl6ize_type $P5005, $P5007
    find_lex $P5004, "&prefix:<!>"
    perl6_multi_dispatch_thunk $P5003, $P5004
    $P5008 = $P5003($P5005)
    unless $P5008 goto if12_else14 
    .const 'Sub' $P5009 = 'cuid_10_1372810548.63996' 
    capture_lex $P5009
    $P5010 = $P5009()
    set $P5016, $P5010
    goto if12_end15
  if12_else14:
    find_lex $P5011, "$_"
    set old_topic_2, $P5011
.annotate 'line', 59
    find_lex $P5012, "$body"
    store_lex "$_", $P5012
    nqp_get_sc_object $P5013, "5C7C172868FA9510BA84BFF074E73D635E54D9D3", 8957
    find_lex $P5014, "$_"
    $P5015 = $P5013."ACCEPTS"($P5014)
    set sm_result_2, $P5015
    store_lex "$_", old_topic_2
    unless sm_result_2 goto if13_else16 
    .const 'Sub' $P5011 = 'cuid_13_1372810548.63996' 
    capture_lex $P5011
    $P5012 = $P5011()
    set $P5015, $P5012
    goto if13_end17
  if13_else16:
    .const 'Sub' $P5013 = 'cuid_14_1372810548.63996' 
    capture_lex $P5013
    $P5014 = $P5013()
    set $P5015, $P5014
  if13_end17:
    set $P5016, $P5015
  if12_end15:
    .return ($P5016) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_10_1372810548.63996") :anon :lex :outer("cuid_15_1372810548.63996")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/HTTP/Easy/PSGI.pm6"
.annotate 'line', 56
    .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', 57
    find_lex $P5004, "$body"
    find_lex $P5005, "$segment"
    perl6_container_store $P5004, $P5005
    .return ($P5004) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_13_1372810548.63996") :anon :lex :outer("cuid_15_1372810548.63996")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/HTTP/Easy/PSGI.pm6"
.annotate 'line', 60
    .param pmc CALL_SIG :call_sig 
    .const 'Sub' $P5004 = 'cuid_11_1372810548.63996' 
    capture_lex $P5004 
    .const 'Sub' $P5004 = 'cuid_12_1372810548.63996' 
    capture_lex $P5004 
    .lex "$_", $P101 
    .lex "call_sig", $P102 
    .lex "$*DISPATCHER", $P103 
    .local pmc old_topic_3 
    .local pmc sm_result_3 
    perl6_take_dispatcher 
    set $P5002, CALL_SIG
    set $P102, $P5002
    bind_signature 
    find_lex $P5004, "$_"
    set old_topic_3, $P5004
.annotate 'line', 61
    find_lex $P5005, "$segment"
    store_lex "$_", $P5005
    nqp_get_sc_object $P5006, "5C7C172868FA9510BA84BFF074E73D635E54D9D3", 8957
    find_lex $P5007, "$_"
    $P5008 = $P5006."ACCEPTS"($P5007)
    set sm_result_3, $P5008
    store_lex "$_", old_topic_3
    unless sm_result_3 goto if14_else18 
    .const 'Sub' $P5004 = 'cuid_11_1372810548.63996' 
    capture_lex $P5004
    $P5005 = $P5004()
    set $P5008, $P5005
    goto if14_end19
  if14_else18:
    .const 'Sub' $P5006 = 'cuid_12_1372810548.63996' 
    capture_lex $P5006
    $P5007 = $P5006()
    set $P5008, $P5007
  if14_end19:
    .return ($P5008) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_11_1372810548.63996") :anon :lex :outer("cuid_13_1372810548.63996")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/HTTP/Easy/PSGI.pm6"
.annotate 'line', 62
    .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', 63
    find_lex $P5006, "$body"
    find_lex $P5007, "$segment"
    find_lex $P5004, "&infix:<~>"
    $P5005 = "&METAOP_ASSIGN"($P5004)
    $P5008 = $P5005($P5006, $P5007)
    .return ($P5008) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_12_1372810548.63996") :anon :lex :outer("cuid_13_1372810548.63996")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/HTTP/Easy/PSGI.pm6"
.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, "$body"
    find_lex $P5009, "$segment"
    $P5010 = $P5009."Str"()
    perl6ize_type $P5008, $P5010
    $P5011 = $P5008."encode"()
    perl6ize_type $P5007, $P5011
    find_lex $P5004, "&infix:<~>"
    $P5005 = "&METAOP_ASSIGN"($P5004)
    $P5012 = $P5005($P5006, $P5007)
    .return ($P5012) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_14_1372810548.63996") :anon :lex :outer("cuid_15_1372810548.63996")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/HTTP/Easy/PSGI.pm6"
.annotate 'line', 71
    .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', 72
    find_lex $P5006, "$body"
    find_lex $P5007, "$segment"
    find_lex $P5004, "&infix:<~>"
    $P5005 = "&METAOP_ASSIGN"($P5004)
    $P5008 = $P5005($P5006, $P5007)
    .return ($P5008) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_5_1372810548.63996") :anon :lex :outer("cuid_4_1372810548.63996")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/HTTP/Easy/PSGI.pm6"
.annotate 'line', 34
    .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', 35
    find_lex $P5004, "$result"
    find_lex $P5008, "self"
    $P5009 = $P5008."env"()
    $P5010 = $P5009."hash"()
    find_lex $P5005, "self"
    nqp_get_sc_object $P5006, "279448D1A3300DA554C726B61DADFDA488AD8238", 9
    repr_get_attr_obj $P5007, $P5005, $P5006, "$!app"
    $P5011 = $P5007($P5010)
    perl6_container_store $P5004, $P5011
    .return ($P5004) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_6_1372810548.63996") :anon :lex :outer("cuid_4_1372810548.63996")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/HTTP/Easy/PSGI.pm6"
.annotate 'line', 38
    .param pmc CALL_SIG :call_sig 
    .lex "$_", $P101 
    .lex "call_sig", $P102 
    .lex "$*DISPATCHER", $P103 
    perl6_take_dispatcher 
    set $P5002, CALL_SIG
    set $P102, $P5002
    bind_signature 
.annotate 'line', 39
    find_lex $P5004, "$result"
    find_lex $P5006, "self"
    nqp_get_sc_object $P5007, "279448D1A3300DA554C726B61DADFDA488AD8238", 9
    repr_get_attr_obj $P5008, $P5006, $P5007, "$!app"
    find_lex $P5009, "self"
    $P5010 = $P5009."env"()
    $P5011 = $P5010."hash"()
    $P5012 = $P5008."handle"($P5011)
    perl6ize_type $P5005, $P5012
    perl6_container_store $P5004, $P5005
    .return ($P5004) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_8_1372810548.63996") :anon :lex :outer("cuid_4_1372810548.63996")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/HTTP/Easy/PSGI.pm6"
.annotate 'line', 42
    .param pmc CALL_SIG :call_sig 
    .const 'Sub' $P5005 = 'cuid_7_1372810548.63996' 
    capture_lex $P5005 
    .lex "$_", $P101 
    .lex "call_sig", $P102 
    .lex "$*DISPATCHER", $P103 
    perl6_take_dispatcher 
    .const 'Sub' $P5002 = 'cuid_7_1372810548.63996' 
    capture_lex $P5002
    set $P5003, CALL_SIG
    set $P102, $P5003
    bind_signature 
.annotate 'line', 43
    nqp_get_sc_object $P5011, "279448D1A3300DA554C726B61DADFDA488AD8238", 47
    nqp_get_sc_object $P5012, "279448D1A3300DA554C726B61DADFDA488AD8238", 45
    perl6_capture_lex $P5012
    $P5013 = $P5012()
    $P5014 = $P5013."Stringy"()
    $P5015 = $P5014."Stringy"()
    find_lex $P5010, "&infix:<~>"
    perl6_multi_dispatch_thunk $P5009, $P5010
    $P5016 = $P5009($P5011, $P5015)
    nqp_get_sc_object $P5017, "279448D1A3300DA554C726B61DADFDA488AD8238", 48
    find_lex $P5008, "&infix:<~>"
    perl6_multi_dispatch_thunk $P5007, $P5008
    $P5018 = $P5007($P5016, $P5017)
    find_lex $P5006, "&die"
    perl6_multi_dispatch_thunk $P5005, $P5006
    $P5019 = $P5005($P5018)
    .return ($P5019) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_7_1372810548.63996") :anon :lex :outer("cuid_8_1372810548.63996")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/HTTP/Easy/PSGI.pm6"
.annotate 'line', 43
    .lex "$_", $P101 
    find_lex $P5003, "self"
    get_what $P5002, $P5003
    .return ($P5002) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_16_1372810548.63996") :anon :lex :outer("cuid_4_1372810548.63996")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/HTTP/Easy/PSGI.pm6"
.annotate 'line', 76
    .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', 77
    find_lex $P5004, "$output"
    find_lex $P5010, "$output"
    find_lex $P5011, "$CRLF"
    find_lex $P5009, "&infix:<~>"
    perl6_multi_dispatch_thunk $P5008, $P5009
    $P5012 = $P5008($P5010, $P5011)
    $P5013 = $P5012."encode"()
    perl6ize_type $P5007, $P5013
    find_lex $P5014, "$body"
    find_lex $P5006, "&infix:<~>"
    perl6_multi_dispatch_thunk $P5005, $P5006
    $P5015 = $P5005($P5007, $P5014)
    perl6_container_store $P5004, $P5015
    .return ($P5004) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_17_1372810548.63996") :anon :lex :outer("cuid_4_1372810548.63996")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/HTTP/Easy/PSGI.pm6"
.annotate 'line', 80
    .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', 81
    find_lex $P5006, "$output"
    find_lex $P5009, "$CRLF"
    find_lex $P5010, "$body"
    find_lex $P5008, "&infix:<~>"
    perl6_multi_dispatch_thunk $P5007, $P5008
    $P5011 = $P5007($P5009, $P5010)
    find_lex $P5004, "&infix:<~>"
    $P5005 = "&METAOP_ASSIGN"($P5004)
    $P5012 = $P5005($P5006, $P5011)
    .return ($P5012) 
.end
.HLL "perl6"
.namespace []
.sub "handle" :subid("cuid_18_1372810548.63996") :anon :lex :outer("cuid_2_1372810548.63996")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/HTTP/Easy/PSGI.pm6"
.annotate 'line', 87
    .param pmc CALL_SIG :call_sig 
    .lex "self", $P101 
    .lex "%_", $P102 
    .lex "$app", $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_28
    .lex "RETURN", $P110
.annotate 'line', 88
    $P5008 = $P101."app"($P103)
    perl6ize_type $P5007, $P5008
.annotate 'line', 89
    $P5008 = $P101."run"()
    perl6ize_type $P5007, $P5008
    $P5009 = "&return"($P5007)
    perl6_decontainerize_return_value $P5006, $P5009
    goto lexotic_29
  lexotic_28:
    .get_results ($P5006)
  lexotic_29:
    find_lex $P5007, "&EXHAUST"
    store_lex "RETURN", $P5007
    nqp_get_sc_object $P5008, "279448D1A3300DA554C726B61DADFDA488AD8238", 83
    perl6_type_check_return_value $P5006, $P5008
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_21_1372810548.63996") :load :init
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/HTTP/Easy/PSGI.pm6"
    .const 'Sub' $P5001 = 'cuid_20_1372810548.63996' 
    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_19_1372810548.63996" 
    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"("HTTP::Easy", 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"("HTTP::Status", 9 :named("line"))
    nqp_create_sc $P5001, "279448D1A3300DA554C726B61DADFDA488AD8238"
    set cur_sc, $P5001
    cur_sc."set_description"("/usr/local/lib/parrot/4.6.0/languages/perl6/lib/HTTP/Easy/PSGI.pm6")
    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, "app"
    push $P5003, "handler"
    push $P5003, "handle"
    push $P5003, "connect"
    push $P5003, "run"
    push $P5003, "pre-connection"
    push $P5003, "on-connection"
    push $P5003, "closed-connection"
    push $P5003, "finished-connection"
    push $P5003, "unhandled-method"
    push $P5003, "port"
    push $P5003, "host"
    push $P5003, "debug"
    push $P5003, "connection"
    push $P5003, "env"
    push $P5003, "http-protocol"
    push $P5003, "body"
    push $P5003, "always-get-body"
    push $P5003, "29FC8A324BF03629512C51583644F4813B19AD14"
    push $P5003, "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/HTTP/Easy.pm6"
    push $P5003, "27420382D80CEF05775E7415279171A93892A1F1-1372810242.10453"
    push $P5003, "src/gen/BOOTSTRAP.pm"
    push $P5003, "$!app"
    push $P5003, "$!port"
    push $P5003, "$!host"
    push $P5003, "$!debug"
    push $P5003, "$!listener"
    push $P5003, "$!connection"
    push $P5003, "%!env"
    push $P5003, "$!http-protocol"
    push $P5003, "$!body"
    push $P5003, "$!always-get-body"
    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, "$=pod"
    push $P5003, "!UNIT_MARKER"
    push $P5003, "&get_http_status_msg"
    push $P5003, "91348AEFDA49A28755D5DC7B18223105E2326C2F"
    push $P5003, "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/HTTP/Status.pm6"
    push $P5003, "2.1.3"
    push $P5003, "ver"
    push $P5003, "http://supernovus.github.com/"
    push $P5003, "auth"
    push $P5003, "PSGI"
    push $P5003, "$?CLASS"
    push $P5003, "::?CLASS"
    push $P5003, "$CRLF"
    push $P5003, "\r\n"
    push $P5003, "$app"
    push $P5003, "%_"
    push $P5003, "$*DISPATCHER"
    push $P5003, "&?ROUTINE"
    push $P5003, "psgi.version"
    push $P5003, "1"
    push $P5003, "0"
    push $P5003, "psgi.url_scheme"
    push $P5003, "http"
    push $P5003, "psgi.multithread"
    push $P5003, "psgi.multiprocess"
    push $P5003, "psgi.input"
    push $P5003, "psgi.errors"
    push $P5003, "$*ERR"
    push $P5003, "psgi.run_once"
    push $P5003, "psgi.nonblocking"
    push $P5003, "psgi.streaming"
    push $P5003, "$result"
    push $P5003, "$message"
    push $P5003, "$output"
    push $P5003, "@body"
    push $P5003, "$body"
    push $P5003, "Invalid "
    push $P5003, " application."
    push $P5003, " "
    push $P5003, ": "
    push $P5003, "$header"
    push $P5003, "2"
    push $P5003, "$segment"
    push $P5003, "HTTP::Easy"
    push $P5003, "1B774EC04D50F35E99199D1B74077FC90B5E8768-1372810138.56917"
    push $P5003, "src/Perl6/World.pm"
    push $P5003, "GLOBAL"
    push $P5003, "HTTP"
    push $P5003, "HTTP::Easy::PSGI"
    push $P5003, "28FAC381EB59BA79DA1D75F70404C20E0548F4F5-1372810034.5696"
    push $P5003, "src/stage2/NQPCORE.setting"
    push $P5003, "DEFAULT_PROTOCOL"
    push $P5003, "&message"
    push $P5003, "call_sig"
    push $P5003, "$?ROLE"
    push $P5003, "::?ROLE"
    push $P5003, "$_"
    push $P5003, "CRLF"
    push $P5003, "$/"
    push $P5003, "$!"
    push $P5003, "$dcpkg"
    push $P5003, "$meth"
    push $P5003, "$attr_type"
    push $P5003, "$name"
    push $P5003, "$meth_name"
    push $P5003, "RETURN"
    push $P5003, "self"
    push $P5003, "$package"
    .const 'Sub' $P5004 = 'cuid_20_1372810548.63996' 
    capture_lex $P5004
    $P5005 = $P5004()
    nqp_deserialize_sc "[encoded data, 26404 characters]", cur_sc, $P5003, $P5005, conflicts
    unless conflicts goto if18_end31 
    get_hll_global $P5006, "ModuleLoader"
    $P5007 = $P5006."resolve_repossession_conflicts"(conflicts)
  if18_end31:
    .const "LexInfo" $P5001 = "cuid_1_1372810548.63996"
    nqp_get_sc_object $P5002, "279448D1A3300DA554C726B61DADFDA488AD8238", 2
    $P5001."set_static_lexpad"($P5002)
    .const "LexInfo" $P5001 = "cuid_2_1372810548.63996"
    nqp_get_sc_object $P5002, "279448D1A3300DA554C726B61DADFDA488AD8238", 11
    $P5001."set_static_lexpad"($P5002)
    .const "LexInfo" $P5001 = "cuid_3_1372810548.63996"
    nqp_get_sc_object $P5002, "279448D1A3300DA554C726B61DADFDA488AD8238", 22
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_3_1372810548.63996" 
    nqp_get_sc_object $P5002, "279448D1A3300DA554C726B61DADFDA488AD8238", 15
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_4_1372810548.63996"
    nqp_get_sc_object $P5002, "279448D1A3300DA554C726B61DADFDA488AD8238", 38
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_5_1372810548.63996" 
    nqp_get_sc_object $P5002, "279448D1A3300DA554C726B61DADFDA488AD8238", 39
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_6_1372810548.63996" 
    nqp_get_sc_object $P5002, "279448D1A3300DA554C726B61DADFDA488AD8238", 42
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_7_1372810548.63996" 
    nqp_get_sc_object $P5002, "279448D1A3300DA554C726B61DADFDA488AD8238", 45
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_8_1372810548.63996" 
    nqp_get_sc_object $P5002, "279448D1A3300DA554C726B61DADFDA488AD8238", 44
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_9_1372810548.63996" 
    nqp_get_sc_object $P5002, "279448D1A3300DA554C726B61DADFDA488AD8238", 53
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_10_1372810548.63996" 
    nqp_get_sc_object $P5002, "279448D1A3300DA554C726B61DADFDA488AD8238", 62
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_11_1372810548.63996" 
    nqp_get_sc_object $P5002, "279448D1A3300DA554C726B61DADFDA488AD8238", 65
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_12_1372810548.63996" 
    nqp_get_sc_object $P5002, "279448D1A3300DA554C726B61DADFDA488AD8238", 67
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_13_1372810548.63996" 
    nqp_get_sc_object $P5002, "279448D1A3300DA554C726B61DADFDA488AD8238", 64
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_14_1372810548.63996" 
    nqp_get_sc_object $P5002, "279448D1A3300DA554C726B61DADFDA488AD8238", 70
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_15_1372810548.63996" 
    nqp_get_sc_object $P5002, "279448D1A3300DA554C726B61DADFDA488AD8238", 61
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_16_1372810548.63996" 
    nqp_get_sc_object $P5002, "279448D1A3300DA554C726B61DADFDA488AD8238", 75
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_17_1372810548.63996" 
    nqp_get_sc_object $P5002, "279448D1A3300DA554C726B61DADFDA488AD8238", 77
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_4_1372810548.63996" 
    nqp_get_sc_object $P5002, "279448D1A3300DA554C726B61DADFDA488AD8238", 23
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_18_1372810548.63996"
    nqp_get_sc_object $P5002, "279448D1A3300DA554C726B61DADFDA488AD8238", 90
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_18_1372810548.63996" 
    nqp_get_sc_object $P5002, "279448D1A3300DA554C726B61DADFDA488AD8238", 83
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_2_1372810548.63996" 
    nqp_get_sc_object $P5002, "279448D1A3300DA554C726B61DADFDA488AD8238", 95
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_1_1372810548.63996" 
    nqp_get_sc_object $P5002, "279448D1A3300DA554C726B61DADFDA488AD8238", 3
    perl6_associate_sub_code_object $P5001, $P5002
    nqp_get_sc_object $P5001, "279448D1A3300DA554C726B61DADFDA488AD8238", 0
    set_hll_global "GLOBAL", $P5001
    .return () 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_20_1372810548.63996") :anon :lex :outer("cuid_21_1372810548.63996")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/HTTP/Easy/PSGI.pm6"
    new $P5001, 'ResizablePMCArray'
    .const 'Sub' $P5002 = "cuid_3_1372810548.63996" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_5_1372810548.63996" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_6_1372810548.63996" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_7_1372810548.63996" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_8_1372810548.63996" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_9_1372810548.63996" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_10_1372810548.63996" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_11_1372810548.63996" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_12_1372810548.63996" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_13_1372810548.63996" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_14_1372810548.63996" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_15_1372810548.63996" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_16_1372810548.63996" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_17_1372810548.63996" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_4_1372810548.63996" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_18_1372810548.63996" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_2_1372810548.63996" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_1_1372810548.63996" 
    push $P5001, $P5002
    .return ($P5001) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_22_1372810548.63996") :load
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/HTTP/Easy/PSGI.pm6"
    .const 'Sub' $P5001 = "cuid_19_1372810548.63996" 
    $P5002 = $P5001()
    .return ($P5002) 
.end