.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_26_1372810477.80751") :anon :lex
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/XML/Writer.pm"
.annotate 'line', 1
    .const 'Sub' $P5003 = 'cuid_1_1372810477.80751' 
    capture_lex $P5003 
    .const 'Sub' $P5001 = 'cuid_1_1372810477.80751' 
    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_1372810477.80751") :anon :lex :outer("cuid_26_1372810477.80751")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/XML/Writer.pm"
.annotate 'line', 1
    .const 'Sub' $P5005 = 'cuid_2_1372810477.80751' 
    capture_lex $P5005 
    .lex "GLOBALish", $P101 
    .lex "EXPORT", $P102 
    .lex "$?PACKAGE", $P103 
    .lex "::?PACKAGE", $P104 
    .lex "$_", $P105 
    .lex "$/", $P106 
    .lex "$!", $P107 
    .lex "XML", $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, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 248
    .const 'Sub' $P5005 = 'cuid_2_1372810477.80751' 
    capture_lex $P5005
    $P5006 = $P5005()
    nqp_get_sc_object $P5007, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 5
    .return ($P5007) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_2_1372810477.80751") :anon :lex :outer("cuid_1_1372810477.80751")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/XML/Writer.pm"
.annotate 'line', 3
    .const 'Sub' $P5027 = 'cuid_3_1372810477.80751' 
    capture_lex $P5027 
    .const 'Sub' $P5027 = 'cuid_6_1372810477.80751' 
    capture_lex $P5027 
    .const 'Sub' $P5027 = 'cuid_7_1372810477.80751' 
    capture_lex $P5027 
    .const 'Sub' $P5027 = 'cuid_8_1372810477.80751' 
    capture_lex $P5027 
    .const 'Sub' $P5027 = 'cuid_9_1372810477.80751' 
    capture_lex $P5027 
    .const 'Sub' $P5027 = 'cuid_10_1372810477.80751' 
    capture_lex $P5027 
    .const 'Sub' $P5027 = 'cuid_11_1372810477.80751' 
    capture_lex $P5027 
    .const 'Sub' $P5027 = 'cuid_12_1372810477.80751' 
    capture_lex $P5027 
    .const 'Sub' $P5027 = 'cuid_13_1372810477.80751' 
    capture_lex $P5027 
    .const 'Sub' $P5027 = 'cuid_15_1372810477.80751' 
    capture_lex $P5027 
    .const 'Sub' $P5027 = 'cuid_16_1372810477.80751' 
    capture_lex $P5027 
    .const 'Sub' $P5027 = 'cuid_19_1372810477.80751' 
    capture_lex $P5027 
    .lex "$?PACKAGE", $P101 
    .lex "::?PACKAGE", $P102 
    .lex "$?CLASS", $P103 
    .lex "::?CLASS", $P104 
    .lex "$_", $P105 
    .const 'Sub' $P5002 = 'cuid_3_1372810477.80751' 
    capture_lex $P5002
    .const 'Sub' $P5003 = 'cuid_6_1372810477.80751' 
    capture_lex $P5003
    .const 'Sub' $P5004 = 'cuid_7_1372810477.80751' 
    capture_lex $P5004
    .const 'Sub' $P5005 = 'cuid_8_1372810477.80751' 
    capture_lex $P5005
    .const 'Sub' $P5006 = 'cuid_9_1372810477.80751' 
    capture_lex $P5006
    .const 'Sub' $P5007 = 'cuid_10_1372810477.80751' 
    capture_lex $P5007
    .const 'Sub' $P5008 = 'cuid_11_1372810477.80751' 
    capture_lex $P5008
    .const 'Sub' $P5009 = 'cuid_12_1372810477.80751' 
    capture_lex $P5009
    .const 'Sub' $P5010 = 'cuid_13_1372810477.80751' 
    capture_lex $P5010
    .const 'Sub' $P5011 = 'cuid_15_1372810477.80751' 
    capture_lex $P5011
    .const 'Sub' $P5012 = 'cuid_16_1372810477.80751' 
    capture_lex $P5012
    .const 'Sub' $P5013 = 'cuid_19_1372810477.80751' 
    capture_lex $P5013
    null $P5014
    null $P5015
    null $P5016
    null $P5017
    null $P5018
    null $P5019
    null $P5020
    null $P5021
    null $P5022
    null $P5023
    null $P5024
    nqp_get_sc_object $P5025, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 142
    $P5026 = $P5025."clone"()
    perl6_capture_lex $P5026
    .return ($P5026) 
.end
.HLL "perl6"
.namespace []
.sub "serialize" :subid("cuid_3_1372810477.80751") :anon :lex :outer("cuid_2_1372810477.80751")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/XML/Writer.pm"
.annotate 'line', 5
    .param pmc CALL_SIG :call_sig 
    .const 'Sub' $P5008 = 'cuid_4_1372810477.80751' 
    capture_lex $P5008 
    .const 'Sub' $P5008 = 'cuid_5_1372810477.80751' 
    capture_lex $P5008 
    .lex "self", $P101 
    .lex "$tree", $P102 
    .lex "%named", $P103 
    .lex "$_", $P104 
    .lex "$/", $P105 
    .lex "$!", $P106 
    .lex "$t", $P107 
    .lex "$err", $P108 
    .lex "call_sig", $P109 
    .lex "$*DISPATCHER", $P110 
    .lex "&?ROUTINE", $P111 
    perl6_take_dispatcher 
    set $P5004, CALL_SIG
    set $P109, $P5004
    bind_signature 
    root_new $P112, ['parrot';'Continuation']
    set_label $P112, lexotic_14
    .lex "RETURN", $P112
.annotate 'line', 7

    nqp_get_sc_object $P5006, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 13
    perl6_container_store $P108, $P5006
.annotate 'line', 8
    find_lex $P5007, "&defined"
    perl6_multi_dispatch_thunk $P5006, $P5007
    $P5008 = $P5006($P102)
    unless $P5008 goto if12_else16 
    .const 'Sub' $P5009 = 'cuid_4_1372810477.80751' 
    capture_lex $P5009
    $P5010 = $P5009()
    goto if12_end17
  if12_else16:
    .const 'Sub' $P5011 = 'cuid_5_1372810477.80751' 
    capture_lex $P5011
    $P5012 = $P5011()
  if12_end17:
.annotate 'line', 16
    nqp_get_sc_object $P5008, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 18
    $P5010 = $P107."elems"()
    perl6ize_type $P5009, $P5010
    find_lex $P5007, "&infix:<==>"
    perl6_multi_dispatch_thunk $P5006, $P5007
    $P5011 = $P5006($P5008, $P5009)
    set $P5014, $P5011
    unless $P5011 goto if16_end25 
    $P5012 = $P101."is_element"($P107)
    $P5013 = $P5012."item"()
    set $P5014, $P5013
  if16_end25:
    if $P5014 goto unless15_else22 
.annotate 'line', 15
    nqp_get_sc_object $P5017, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 20
    find_lex $P5016, "&die"
    perl6_multi_dispatch_thunk $P5015, $P5016
    $P5018 = $P5015($P5017)
    goto unless15_end23
  unless15_else22:
    find_lex $P5019, "Nil"
  unless15_end23:
.annotate 'line', 17
    $P5007 = $P107."list"()
    perl6ize_type $P5006, $P5007
    $P5008 = $P101."visit"($P5006)
    $P5009 = $P5008."item"()
    perl6_decontainerize_return_value $P5005, $P5009
    goto lexotic_15
  lexotic_14:
    .get_results ($P5005)
  lexotic_15:
    find_lex $P5006, "&EXHAUST"
    store_lex "RETURN", $P5006
    nqp_get_sc_object $P5007, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 8
    perl6_type_check_return_value $P5005, $P5007
    .return ($P5005) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_4_1372810477.80751") :anon :lex :outer("cuid_3_1372810477.80751")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/XML/Writer.pm"
.annotate 'line', 8
    .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', 9
    find_lex $P5007, "%named"
    $P5008 = $P5007."pairs"()
    perl6ize_type $P5006, $P5008
    nqp_get_sc_object $P5009, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 15
    find_lex $P5005, "&infix:<==>"
    perl6_multi_dispatch_thunk $P5004, $P5005
    $P5010 = $P5004($P5006, $P5009)
    if $P5010 goto unless13_else18 
    find_lex $P5013, "$err"
    find_lex $P5012, "&die"
    perl6_multi_dispatch_thunk $P5011, $P5012
    $P5014 = $P5011($P5013)
    goto unless13_end19
  unless13_else18:
    find_lex $P5015, "Nil"
  unless13_end19:
.annotate 'line', 10
    find_lex $P5004, "$t"
    find_lex $P5005, "$tree"
    perl6_container_store $P5004, $P5005
    .return ($P5004) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_5_1372810477.80751") :anon :lex :outer("cuid_3_1372810477.80751")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/XML/Writer.pm"
.annotate 'line', 11
    .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', 12
    find_lex $P5007, "%named"
    $P5008 = $P5007."pairs"()
    perl6ize_type $P5006, $P5008
    nqp_get_sc_object $P5009, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 18
    find_lex $P5005, "&infix:<==>"
    perl6_multi_dispatch_thunk $P5004, $P5005
    $P5010 = $P5004($P5006, $P5009)
    if $P5010 goto unless14_else20 
    find_lex $P5013, "$err"
    find_lex $P5012, "&die"
    perl6_multi_dispatch_thunk $P5011, $P5012
    $P5014 = $P5011($P5013)
    goto unless14_end21
  unless14_else20:
    find_lex $P5015, "Nil"
  unless14_end21:
.annotate 'line', 13
    find_lex $P5004, "$t"
    find_lex $P5007, "%named"
    $P5008 = $P5007."pairs"()
    perl6ize_type $P5006, $P5008
    nqp_get_sc_object $P5009, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 15
    $P5010 = $P5006."postcircumfix:<[ ]>"($P5009)
    perl6ize_type $P5005, $P5010
    perl6_container_store $P5004, $P5005
    .return ($P5004) 
.end
.HLL "perl6"
.namespace []
.sub "is_attribute" :subid("cuid_6_1372810477.80751") :anon :lex :outer("cuid_2_1372810477.80751")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/XML/Writer.pm"
.annotate 'line', 20
    .param pmc CALL_SIG :call_sig 
    .lex "self", $P101 
    .lex "%_", $P102 
    .lex "$x", $P103 
    .lex "$_", $P104 
    .lex "$/", $P105 
    .lex "$!", $P106 
    .lex "call_sig", $P107 
    .lex "$*DISPATCHER", $P108 
    .lex "&?ROUTINE", $P109 
    .local pmc old_topic_1 
    .local pmc sm_result_1 
    .local pmc old_topic_2 
    .local pmc sm_result_2 
    perl6_take_dispatcher 
    set $P5005, CALL_SIG
    set $P107, $P5005
    bind_signature 
    root_new $P110, ['parrot';'Continuation']
    set_label $P110, lexotic_26
    .lex "RETURN", $P110
    find_lex $P5007, "$_"
    set old_topic_1, $P5007
    store_lex "$_", $P103
    nqp_get_sc_object $P5008, "5C7C172868FA9510BA84BFF074E73D635E54D9D3", 4
    find_lex $P5009, "$_"
    $P5010 = $P5008."ACCEPTS"($P5009)
    set sm_result_1, $P5010
    store_lex "$_", old_topic_1
    set $P5007, sm_result_1
    unless sm_result_1 goto if17_end29 
    find_lex $P5007, "$_"
    set old_topic_2, $P5007
    $P5009 = $P103."value"()
    perl6ize_type $P5008, $P5009
    store_lex "$_", $P5008
    nqp_get_sc_object $P5012, "5C7C172868FA9510BA84BFF074E73D635E54D9D3", 11
    find_lex $P5013, "$_"
    $P5014 = $P5012."ACCEPTS"($P5013)
    find_lex $P5011, "&prefix:<!>"
    perl6_multi_dispatch_thunk $P5010, $P5011
    $P5015 = $P5010($P5014)
    set sm_result_2, $P5015
    store_lex "$_", old_topic_2
    set $P5007, sm_result_2
  if17_end29:
    perl6_decontainerize_return_value $P5006, $P5007
    goto lexotic_27
  lexotic_26:
    .get_results ($P5006)
  lexotic_27:
    find_lex $P5007, "&EXHAUST"
    store_lex "RETURN", $P5007
    nqp_get_sc_object $P5008, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 26
    perl6_type_check_return_value $P5006, $P5008
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "is_element" :subid("cuid_7_1372810477.80751") :anon :lex :outer("cuid_2_1372810477.80751")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/XML/Writer.pm"
.annotate 'line', 21
    .param pmc CALL_SIG :call_sig 
    .lex "self", $P101 
    .lex "%_", $P102 
    .lex "$x", $P103 
    .lex "$_", $P104 
    .lex "$/", $P105 
    .lex "$!", $P106 
    .lex "call_sig", $P107 
    .lex "$*DISPATCHER", $P108 
    .lex "&?ROUTINE", $P109 
    .local pmc old_topic_3 
    .local pmc sm_result_3 
    .local pmc old_topic_4 
    .local pmc sm_result_4 
    perl6_take_dispatcher 
    set $P5005, CALL_SIG
    set $P107, $P5005
    bind_signature 
    root_new $P110, ['parrot';'Continuation']
    set_label $P110, lexotic_30
    .lex "RETURN", $P110
    find_lex $P5007, "$_"
    set old_topic_3, $P5007
    store_lex "$_", $P103
    nqp_get_sc_object $P5008, "5C7C172868FA9510BA84BFF074E73D635E54D9D3", 4
    find_lex $P5009, "$_"
    $P5010 = $P5008."ACCEPTS"($P5009)
    set sm_result_3, $P5010
    store_lex "$_", old_topic_3
    set $P5007, sm_result_3
    unless sm_result_3 goto if18_end33 
    find_lex $P5007, "$_"
    set old_topic_4, $P5007
    $P5009 = $P103."value"()
    perl6ize_type $P5008, $P5009
    store_lex "$_", $P5008
    nqp_get_sc_object $P5010, "5C7C172868FA9510BA84BFF074E73D635E54D9D3", 11
    find_lex $P5011, "$_"
    $P5012 = $P5010."ACCEPTS"($P5011)
    set sm_result_4, $P5012
    store_lex "$_", old_topic_4
    set $P5007, sm_result_4
  if18_end33:
    perl6_decontainerize_return_value $P5006, $P5007
    goto lexotic_31
  lexotic_30:
    .get_results ($P5006)
  lexotic_31:
    find_lex $P5007, "&EXHAUST"
    store_lex "RETURN", $P5007
    nqp_get_sc_object $P5008, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 34
    perl6_type_check_return_value $P5006, $P5008
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "is_text_node" :subid("cuid_8_1372810477.80751") :anon :lex :outer("cuid_2_1372810477.80751")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/XML/Writer.pm"
.annotate 'line', 22
    .param pmc CALL_SIG :call_sig 
    .lex "self", $P101 
    .lex "%_", $P102 
    .lex "$x", $P103 
    .lex "$_", $P104 
    .lex "$/", $P105 
    .lex "$!", $P106 
    .lex "call_sig", $P107 
    .lex "$*DISPATCHER", $P108 
    .lex "&?ROUTINE", $P109 
    .local pmc old_topic_5 
    .local pmc sm_result_5 
    .local pmc old_topic_6 
    .local pmc sm_result_6 
    perl6_take_dispatcher 
    set $P5005, CALL_SIG
    set $P107, $P5005
    bind_signature 
    root_new $P110, ['parrot';'Continuation']
    set_label $P110, lexotic_34
    .lex "RETURN", $P110
    find_lex $P5007, "$_"
    set old_topic_5, $P5007
    store_lex "$_", $P103
    nqp_get_sc_object $P5008, "27420382D80CEF05775E7415279171A93892A1F1-1372810242.10453", 29
    find_lex $P5009, "$_"
    $P5010 = $P5008."ACCEPTS"($P5009)
    set sm_result_5, $P5010
    store_lex "$_", old_topic_5
    set $P5007, sm_result_5
    if sm_result_5 goto unless19_end37 
    find_lex $P5007, "$_"
    set old_topic_6, $P5007
    store_lex "$_", $P103
    nqp_get_sc_object $P5008, "5C7C172868FA9510BA84BFF074E73D635E54D9D3", 5864
    find_lex $P5009, "$_"
    $P5010 = $P5008."ACCEPTS"($P5009)
    set sm_result_6, $P5010
    store_lex "$_", old_topic_6
    set $P5007, sm_result_6
  unless19_end37:
    perl6_decontainerize_return_value $P5006, $P5007
    goto lexotic_35
  lexotic_34:
    .get_results ($P5006)
  lexotic_35:
    find_lex $P5007, "&EXHAUST"
    store_lex "RETURN", $P5007
    nqp_get_sc_object $P5008, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 42
    perl6_type_check_return_value $P5006, $P5008
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "is_node" :subid("cuid_9_1372810477.80751") :anon :lex :outer("cuid_2_1372810477.80751")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/XML/Writer.pm"
.annotate 'line', 23
    .param pmc CALL_SIG :call_sig 
    .lex "self", $P101 
    .lex "%_", $P102 
    .lex "$x", $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 
    $P5007 = $P101."is_element"($P103)
    $P5008 = $P5007."item"()
    set $P5011, $P5008
    if $P5008 goto unless20_end39 
    $P5009 = $P101."is_text_node"($P103)
    $P5010 = $P5009."item"()
    set $P5011, $P5010
  unless20_end39:
    perl6_decontainerize_return_value $P5006, $P5011
    nqp_get_sc_object $P5007, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 50
    perl6_type_check_return_value $P5006, $P5007
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "element" :subid("cuid_10_1372810477.80751") :anon :lex :outer("cuid_2_1372810477.80751")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/XML/Writer.pm"
.annotate 'line', 25
    .param pmc CALL_SIG :call_sig 
    .lex "self", $P101 
    .lex "%_", $P102 
    .lex "$name", $P103 
    .lex "@attrs", $P104 
    .lex "@children", $P105 
    .lex "$_", $P106 
    .lex "$/", $P107 
    .lex "$!", $P108 
    .lex "call_sig", $P109 
    .lex "$*DISPATCHER", $P110 
    .lex "&?ROUTINE", $P111 
    perl6_take_dispatcher 
    set $P5005, CALL_SIG
    set $P109, $P5005
    bind_signature 
    root_new $P112, ['parrot';'Continuation']
    set_label $P112, lexotic_40
    .lex "RETURN", $P112
.annotate 'line', 26

    unless $P105 goto if21_else42 
.annotate 'line', 29
.annotate 'line', 28
.annotate 'line', 27
    $P5011 = $P101."element_open"($P103, $P104)
    $P5012 = $P5011."item"()
.annotate 'line', 28
    $P5013 = $P101."visit"($P105)
    $P5014 = $P5013."item"()
    find_lex $P5010, "&infix:<~>"
    perl6_multi_dispatch_thunk $P5009, $P5010
    $P5015 = $P5009($P5012, $P5014)
.annotate 'line', 29
    $P5016 = $P101."element_close"($P103)
    $P5017 = $P5016."item"()
    find_lex $P5008, "&infix:<~>"
    perl6_multi_dispatch_thunk $P5007, $P5008
    $P5018 = $P5007($P5015, $P5017)
    set $P5021, $P5018
    goto if21_end43
  if21_else42:
.annotate 'line', 30
    $P5019 = $P101."element_empty"($P103, $P104)
    $P5020 = $P5019."item"()
    set $P5021, $P5020
  if21_end43:
    perl6_decontainerize_return_value $P5006, $P5021
    goto lexotic_41
  lexotic_40:
    .get_results ($P5006)
  lexotic_41:
    find_lex $P5007, "&EXHAUST"
    store_lex "RETURN", $P5007
    nqp_get_sc_object $P5008, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 58
    perl6_type_check_return_value $P5006, $P5008
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "element_open" :subid("cuid_11_1372810477.80751") :anon :lex :outer("cuid_2_1372810477.80751")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/XML/Writer.pm"
.annotate 'line', 33
    .param pmc CALL_SIG :call_sig 
    .lex "self", $P101 
    .lex "%_", $P102 
    .lex "$name", $P103 
    .lex "@attrs", $P104 
    .lex "$_", $P105 
    .lex "$/", $P106 
    .lex "$!", $P107 
    .lex "call_sig", $P108 
    .lex "$*DISPATCHER", $P109 
    .lex "&?ROUTINE", $P110 
    perl6_take_dispatcher 
    set $P5005, CALL_SIG
    set $P108, $P5005
    bind_signature 
    root_new $P111, ['parrot';'Continuation']
    set_label $P111, lexotic_44
    .lex "RETURN", $P111
.annotate 'line', 34
    nqp_get_sc_object $P5007, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 72
    $P5008 = $P101."element_attrs"($P104)
    $P5009 = $P5008."item"()
    $P5010 = "&sprintf"($P5007, $P103, $P5009)
    perl6_decontainerize_return_value $P5006, $P5010
    goto lexotic_45
  lexotic_44:
    .get_results ($P5006)
  lexotic_45:
    find_lex $P5007, "&EXHAUST"
    store_lex "RETURN", $P5007
    nqp_get_sc_object $P5008, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 70
    perl6_type_check_return_value $P5006, $P5008
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "element_close" :subid("cuid_12_1372810477.80751") :anon :lex :outer("cuid_2_1372810477.80751")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/XML/Writer.pm"
.annotate 'line', 37
    .param pmc CALL_SIG :call_sig 
    .lex "self", $P101 
    .lex "%_", $P102 
    .lex "$name", $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_46
    .lex "RETURN", $P110
    nqp_get_sc_object $P5011, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 82
.annotate 'line', 38

    $P5012 = $P103."Stringy"()
    find_lex $P5010, "&infix:<~>"
    perl6_multi_dispatch_thunk $P5009, $P5010
    $P5013 = $P5009($P5011, $P5012)
    nqp_get_sc_object $P5014, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 83
    find_lex $P5008, "&infix:<~>"
    perl6_multi_dispatch_thunk $P5007, $P5008
    $P5015 = $P5007($P5013, $P5014)
    perl6_decontainerize_return_value $P5006, $P5015
    goto lexotic_47
  lexotic_46:
    .get_results ($P5006)
  lexotic_47:
    find_lex $P5007, "&EXHAUST"
    store_lex "RETURN", $P5007
    nqp_get_sc_object $P5008, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 81
    perl6_type_check_return_value $P5006, $P5008
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "element_empty" :subid("cuid_13_1372810477.80751") :anon :lex :outer("cuid_2_1372810477.80751")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/XML/Writer.pm"
.annotate 'line', 41
    .param pmc CALL_SIG :call_sig 
    .lex "self", $P101 
    .lex "%_", $P102 
    .lex "$name", $P103 
    .lex "@attrs", $P104 
    .lex "$_", $P105 
    .lex "$/", $P106 
    .lex "$!", $P107 
    .lex "call_sig", $P108 
    .lex "$*DISPATCHER", $P109 
    .lex "&?ROUTINE", $P110 
    perl6_take_dispatcher 
    set $P5005, CALL_SIG
    set $P108, $P5005
    bind_signature 
    root_new $P111, ['parrot';'Continuation']
    set_label $P111, lexotic_48
    .lex "RETURN", $P111
.annotate 'line', 42
    nqp_get_sc_object $P5007, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 93
    $P5008 = $P101."element_attrs"($P104)
    $P5009 = $P5008."item"()
    $P5010 = "&sprintf"($P5007, $P103, $P5009)
    perl6_decontainerize_return_value $P5006, $P5010
    goto lexotic_49
  lexotic_48:
    .get_results ($P5006)
  lexotic_49:
    find_lex $P5007, "&EXHAUST"
    store_lex "RETURN", $P5007
    nqp_get_sc_object $P5008, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 91
    perl6_type_check_return_value $P5006, $P5008
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "element_attrs" :subid("cuid_15_1372810477.80751") :anon :lex :outer("cuid_2_1372810477.80751")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/XML/Writer.pm"
.annotate 'line', 45
    .param pmc CALL_SIG :call_sig 
    .const 'Sub' $P5010 = 'cuid_14_1372810477.80751' 
    capture_lex $P5010 
    .lex "self", $P101 
    .lex "%_", $P102 
    .lex "@attrs", $P103 
    .lex "$_", $P104 
    .lex "$/", $P105 
    .lex "$!", $P106 
    .lex "call_sig", $P107 
    .lex "$*DISPATCHER", $P108 
    .lex "&?ROUTINE", $P109 
    perl6_take_dispatcher 
    .const 'Sub' $P5005 = 'cuid_14_1372810477.80751' 
    capture_lex $P5005
    set $P5006, CALL_SIG
    set $P107, $P5006
    bind_signature 
    root_new $P110, ['parrot';'Continuation']
    set_label $P110, lexotic_50
    .lex "RETURN", $P110
.annotate 'line', 46
    nqp_get_sc_object $P5011, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 104
    $P5012 = $P5011."clone"()
    perl6_capture_lex $P5012
    $P5013 = $P103."map"($P5012)
    perl6ize_type $P5010, $P5013
    $P5014 = "&infix:<,>"($P5010)
    find_lex $P5008, "&infix:<~>"
    $P5009 = "&METAOP_REDUCE_LEFT"($P5008)
    $P5015 = $P5009($P5014)
    perl6_decontainerize_return_value $P5007, $P5015
    goto lexotic_51
  lexotic_50:
    .get_results ($P5007)
  lexotic_51:
    find_lex $P5008, "&EXHAUST"
    store_lex "RETURN", $P5008
    nqp_get_sc_object $P5009, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 102
    perl6_type_check_return_value $P5007, $P5009
    .return ($P5007) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_14_1372810477.80751") :anon :lex :outer("cuid_15_1372810477.80751")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/XML/Writer.pm"
.annotate 'line', 46
    .param pmc CALL_SIG :call_sig 
    .lex "$_", $P101 
    .lex "call_sig", $P102 
    .lex "$*DISPATCHER", $P103 
    perl6_take_dispatcher 
    set $P5002, CALL_SIG
    set $P102, $P5002
    bind_signature 
    nqp_get_sc_object $P5004, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 105
    find_lex $P5006, "$_"
    $P5007 = $P5006."key"()
    perl6ize_type $P5005, $P5007
    find_lex $P5008, "self"
    find_lex $P5010, "$_"
    $P5011 = $P5010."value"()
    perl6ize_type $P5009, $P5011
    $P5012 = $P5008."escape"($P5009)
    $P5013 = $P5012."item"()
    $P5014 = "&sprintf"($P5004, $P5005, $P5013)
    .return ($P5014) 
.end
.HLL "perl6"
.namespace []
.sub "escape" :subid("cuid_16_1372810477.80751") :anon :lex :outer("cuid_2_1372810477.80751")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/XML/Writer.pm"
.annotate 'line', 49
    .param pmc CALL_SIG :call_sig 
    .const 'Sub' $P5011 = 'cuid_17_1372810477.80751' 
    capture_lex $P5011 
    .const 'Sub' $P5011 = 'cuid_18_1372810477.80751' 
    capture_lex $P5011 
    .lex "self", $P101 
    .lex "%_", $P102 
    .lex "$str", $P103 
    .lex "$_", $P104 
    .lex "$/", $P105 
    .lex "$!", $P106 
    .lex "%charmap", $P107 
    .lex "call_sig", $P108 
    .lex "$*DISPATCHER", $P109 
    .lex "&?ROUTINE", $P110 
    .local pmc _inline_arg_1 
    .local pmc _inline_arg_2 
    .local pmc _inline_arg_3 
    .local pmc _inline_arg_4 
    .local pmc _inline_arg_5 
    .local pmc _inline_arg_6 
    .local pmc _inline_arg_7 
    .local pmc _inline_arg_8 
    perl6_take_dispatcher 
    .const 'Sub' $P5005 = 'cuid_17_1372810477.80751' 
    capture_lex $P5005
    .const 'Sub' $P5006 = 'cuid_18_1372810477.80751' 
    capture_lex $P5006
    set $P5007, CALL_SIG
    set $P108, $P5007
    bind_signature 
    root_new $P111, ['parrot';'Continuation']
    set_label $P111, lexotic_62
    .lex "RETURN", $P111
.annotate 'line', 50

.annotate 'line', 54
.annotate 'line', 51
    nqp_get_sc_object $P5009, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 83
    set _inline_arg_1, $P5009
    nqp_get_sc_object $P5010, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 118
    set _inline_arg_2, $P5010
    nqp_get_sc_object $P5013, "5C7C172868FA9510BA84BFF074E73D635E54D9D3", 4
    $P5014 = $P5013."new"(_inline_arg_1 :named("key"), _inline_arg_2 :named("value"))
    perl6ize_type $P5012, $P5014
    perl6_decontainerize_return_value $P5011, $P5012
    nqp_get_sc_object $P5012, "5C7C172868FA9510BA84BFF074E73D635E54D9D3", 12592
    perl6_type_check_return_value $P5011, $P5012
.annotate 'line', 52
    nqp_get_sc_object $P5013, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 119
    set _inline_arg_3, $P5013
    nqp_get_sc_object $P5014, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 120
    set _inline_arg_4, $P5014
    nqp_get_sc_object $P5017, "5C7C172868FA9510BA84BFF074E73D635E54D9D3", 4
    $P5018 = $P5017."new"(_inline_arg_3 :named("key"), _inline_arg_4 :named("value"))
    perl6ize_type $P5016, $P5018
    perl6_decontainerize_return_value $P5015, $P5016
    nqp_get_sc_object $P5016, "5C7C172868FA9510BA84BFF074E73D635E54D9D3", 12592
    perl6_type_check_return_value $P5015, $P5016
.annotate 'line', 53
    nqp_get_sc_object $P5017, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 121
    set _inline_arg_5, $P5017
    nqp_get_sc_object $P5018, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 122
    set _inline_arg_6, $P5018
    nqp_get_sc_object $P5021, "5C7C172868FA9510BA84BFF074E73D635E54D9D3", 4
    $P5022 = $P5021."new"(_inline_arg_5 :named("key"), _inline_arg_6 :named("value"))
    perl6ize_type $P5020, $P5022
    perl6_decontainerize_return_value $P5019, $P5020
    nqp_get_sc_object $P5020, "5C7C172868FA9510BA84BFF074E73D635E54D9D3", 12592
    perl6_type_check_return_value $P5019, $P5020
.annotate 'line', 54
    nqp_get_sc_object $P5021, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 123
    set _inline_arg_7, $P5021
    nqp_get_sc_object $P5022, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 124
    set _inline_arg_8, $P5022
    nqp_get_sc_object $P5025, "5C7C172868FA9510BA84BFF074E73D635E54D9D3", 4
    $P5026 = $P5025."new"(_inline_arg_7 :named("key"), _inline_arg_8 :named("value"))
    perl6ize_type $P5024, $P5026
    perl6_decontainerize_return_value $P5023, $P5024
    nqp_get_sc_object $P5024, "5C7C172868FA9510BA84BFF074E73D635E54D9D3", 12592
    perl6_type_check_return_value $P5023, $P5024
    $P5025 = "&infix:<,>"($P5011, $P5015, $P5019, $P5023)
    $P107."STORE"($P5025)
.annotate 'line', 56
    nqp_get_sc_object $P5010, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 125
    $P5011 = $P5010."clone"()
    perl6_capture_lex $P5011
    nqp_get_sc_object $P5012, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 131
    $P5013 = $P5012."clone"()
    perl6_capture_lex $P5013
    perl6_booleanize $P5014, 1
    $P5015 = $P103."subst"($P5011, $P5013, $P5014 :named("g"))
    perl6ize_type $P5009, $P5015
    perl6_decontainerize_return_value $P5008, $P5009
    goto lexotic_63
  lexotic_62:
    .get_results ($P5008)
  lexotic_63:
    find_lex $P5009, "&EXHAUST"
    store_lex "RETURN", $P5009
    nqp_get_sc_object $P5010, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 115
    perl6_type_check_return_value $P5008, $P5010
    .return ($P5008) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_17_1372810477.80751") :anon :lex :outer("cuid_16_1372810477.80751")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/XML/Writer.pm"
.annotate 'line', 56
    .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 rx22_tgt
    .local int rx22_pos
    .local int rx22_off
    .local int rx22_eos
    .local int rx22_rep
    .local pmc rx22_cur
    .local pmc rx22_curclass
    .local pmc rx22_bstack
    .local pmc rx22_cstack
    (rx22_cur, rx22_tgt, rx22_pos, rx22_curclass, rx22_bstack, $I19) = self."!cursor_start"()
    store_lex unicode:"$\x{a2}", rx22_cur
    length rx22_eos, rx22_tgt
    eq $I19, 1, rx22_restart54
    gt rx22_pos, rx22_eos, rx22_fail55
    repr_get_attr_int $I11, self, rx22_curclass, "$!from"
    ne $I11, -1, rxscan23_done61
    goto rxscan23_scan60
  rxscan23_loop59:
    inc rx22_pos
    gt rx22_pos, rx22_eos, rx22_fail55
    repr_bind_attr_int rx22_cur, rx22_curclass, "$!from", rx22_pos
  rxscan23_scan60:
    nqp_rxmark rx22_bstack, rxscan23_loop59, rx22_pos, 0
  rxscan23_done61:
    ge rx22_pos, rx22_eos, rx22_fail55
    substr $S11, rx22_tgt, rx22_pos, 1
    index $I11, ucs4:"<>&\"", $S11
    lt $I11, 0, rx22_fail55
    inc rx22_pos
    rx22_cur."!cursor_pass"(rx22_pos, 'backtrack'=>1)
    .return (rx22_cur)
  rx22_restart54:
    repr_get_attr_obj rx22_cstack, rx22_cur, rx22_curclass, "$!cstack"
  rx22_fail55:
    unless rx22_bstack, rx22_done53
    pop $I19, rx22_bstack
    if_null rx22_cstack, rx22_cstack_done58
    unless rx22_cstack, rx22_cstack_done58
    dec $I19
    set $P11, rx22_cstack[$I19]
  rx22_cstack_done58:
    pop rx22_rep, rx22_bstack
    pop rx22_pos, rx22_bstack
    pop $I19, rx22_bstack
    lt rx22_pos, -1, rx22_done53
    lt rx22_pos, 0, rx22_fail55
    eq $I19, 0, rx22_fail55
    nqp_islist $I20, rx22_cstack
    unless $I20, rx22_jump56
    elements $I18, rx22_bstack
    le $I18, 0, rx22_cut57
    dec $I18
    set $I18, rx22_bstack[$I18]
  rx22_cut57:
    assign rx22_cstack, $I18
  rx22_jump56:
    jump $I19
  rx22_done53:
    rx22_cur."!cursor_fail"()
    .return (rx22_cur) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_18_1372810477.80751") :anon :lex :outer("cuid_16_1372810477.80751")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/XML/Writer.pm"
.annotate 'line', 56
    .param pmc CALL_SIG :call_sig 
    .lex "$x", $P101 
    .lex "$_", $P102 
    .lex "call_sig", $P103 
    .lex "$*DISPATCHER", $P104 
    perl6_take_dispatcher 
    set $P5002, CALL_SIG
    set $P103, $P5002
    bind_signature 
    find_lex $P5005, "%charmap"
    find_lex $P5007, "&prefix:<~>"
    perl6_multi_dispatch_thunk $P5006, $P5007
    $P5008 = $P5006($P101)
    $P5009 = $P5005."postcircumfix:<{ }>"($P5008)
    perl6ize_type $P5004, $P5009
    .return ($P5004) 
.end
.HLL "perl6"
.namespace []
.sub "visit" :subid("cuid_19_1372810477.80751") :anon :lex :outer("cuid_2_1372810477.80751")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/XML/Writer.pm"
.annotate 'line', 59
    .param pmc CALL_SIG :call_sig 
    .const 'Sub' $P5010 = 'cuid_25_1372810477.80751' 
    capture_lex $P5010 
    .lex "self", $P101 
    .lex "%_", $P102 
    .lex "@list", $P103 
    .lex "$_", $P104 
    .lex "$/", $P105 
    .lex "$!", $P106 
    .lex "$result", $P107 
    .lex "$last-newline-since", $P108 
    .lex "call_sig", $P109 
    .lex "$*DISPATCHER", $P110 
    .lex "&?ROUTINE", $P111 
    perl6_take_dispatcher 
    .const 'Sub' $P5005 = 'cuid_25_1372810477.80751' 
    capture_lex $P5005
    set $P5006, CALL_SIG
    set $P109, $P5006
    bind_signature 
    root_new $P112, ['parrot';'Continuation']
    set_label $P112, lexotic_68
    .lex "RETURN", $P112
.annotate 'line', 60

    nqp_get_sc_object $P5008, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 146
    perl6_container_store $P107, $P5008
.annotate 'line', 61

    nqp_get_sc_object $P5008, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 15
    perl6_container_store $P108, $P5008
.annotate 'line', 62
    $P5008 = "&infix:<,>"($P103)
    nqp_get_sc_object $P5009, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 148
    $P5010 = $P5009."clone"()
    perl6_capture_lex $P5010
    $P5011 = $P5008."map"($P5010)
    "&eager"($P5011)
.annotate 'line', 77

    perl6_decontainerize_return_value $P5007, $P107
    goto lexotic_69
  lexotic_68:
    .get_results ($P5007)
  lexotic_69:
    find_lex $P5008, "&EXHAUST"
    store_lex "RETURN", $P5008
    nqp_get_sc_object $P5009, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 142
    perl6_type_check_return_value $P5007, $P5009
    .return ($P5007) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_25_1372810477.80751") :anon :lex :outer("cuid_19_1372810477.80751")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/XML/Writer.pm"
.annotate 'line', 62
    .param pmc CALL_SIG :call_sig 
    .const 'Sub' $P5003 = 'cuid_20_1372810477.80751' 
    capture_lex $P5003 
    .const 'Sub' $P5003 = 'cuid_21_1372810477.80751' 
    capture_lex $P5003 
    .lex "$node", $P101 
    .lex "call_sig", $P102 
    .lex "$*DISPATCHER", $P103 
    perl6_take_dispatcher 
    set $P5001, CALL_SIG
    set $P102, $P5001
    bind_signature 
.annotate 'line', 63
    find_lex $P5003, "self"
    $P5004 = $P5003."is_text_node"($P101)
    $P5005 = $P5004."item"()
    unless $P5005 goto if24_else64 
    .const 'Sub' $P5006 = 'cuid_20_1372810477.80751' 
    capture_lex $P5006
    $P5007 = $P5006()
    set $P5010, $P5007
    goto if24_end65
  if24_else64:
    .const 'Sub' $P5008 = 'cuid_21_1372810477.80751' 
    capture_lex $P5008
    $P5009 = $P5008()
    set $P5010, $P5009
  if24_end65:
    .return ($P5010) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_20_1372810477.80751") :anon :lex :outer("cuid_25_1372810477.80751")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/XML/Writer.pm"
.annotate 'line', 63
    .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', 64
    find_lex $P5006, "$result"
    find_lex $P5007, "self"
    find_lex $P5008, "$node"
    $P5009 = $P5007."escape"($P5008)
    $P5010 = $P5009."item"()
    find_lex $P5004, "&infix:<~>"
    $P5005 = "&METAOP_ASSIGN"($P5004)
    $P5011 = $P5005($P5006, $P5010)
    .return ($P5011) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_21_1372810477.80751") :anon :lex :outer("cuid_25_1372810477.80751")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/XML/Writer.pm"
.annotate 'line', 66
    .param pmc CALL_SIG :call_sig 
    .const 'Sub' $P5006 = 'cuid_22_1372810477.80751' 
    capture_lex $P5006 
    .const 'Sub' $P5006 = 'cuid_23_1372810477.80751' 
    capture_lex $P5006 
    .const 'Sub' $P5006 = 'cuid_24_1372810477.80751' 
    capture_lex $P5006 
    .lex "$_", $P101 
    .lex "$name", $P102 
    .lex "$subtree", $P103 
    .lex "@attrs", $P104 
    .lex "@children", $P105 
    .lex "call_sig", $P106 
    .lex "$*DISPATCHER", $P107 
    perl6_take_dispatcher 
    .const 'Sub' $P5002 = 'cuid_22_1372810477.80751' 
    capture_lex $P5002
    .const 'Sub' $P5003 = 'cuid_23_1372810477.80751' 
    capture_lex $P5003
    set $P5004, CALL_SIG
    set $P106, $P5004
    bind_signature 
    $P5006 = "&infix:<,>"($P102, $P103)
.annotate 'line', 67
    find_lex $P5008, "$node"
    $P5009 = $P5008."kv"()
    perl6ize_type $P5007, $P5009
    perl6_container_store $P5006, $P5007
.annotate 'line', 68

    nqp_get_sc_object $P5008, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 156
    $P5009 = $P5008."clone"()
    perl6_capture_lex $P5009
    $P5011 = $P103."list"()
    perl6ize_type $P5010, $P5011
    find_lex $P5007, "&grep"
    perl6_multi_dispatch_thunk $P5006, $P5007
    $P5012 = $P5006($P5009, $P5010)
    $P104."STORE"($P5012)
.annotate 'line', 69

    nqp_get_sc_object $P5008, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 161
    $P5009 = $P5008."clone"()
    perl6_capture_lex $P5009
    $P5011 = $P103."list"()
    perl6ize_type $P5010, $P5011
    find_lex $P5007, "&grep"
    perl6_multi_dispatch_thunk $P5006, $P5007
    $P5012 = $P5006($P5009, $P5010)
    $P105."STORE"($P5012)
.annotate 'line', 70
    find_lex $P5008, "$result"
    find_lex $P5009, "self"
    $P5010 = $P5009."element"($P102, $P104, $P105)
    $P5011 = $P5010."item"()
    find_lex $P5006, "&infix:<~>"
    $P5007 = "&METAOP_ASSIGN"($P5006)
    $P5007($P5008, $P5011)
.annotate 'line', 71
    find_lex $P5011, "$result"
    $P5012 = $P5011."chars"()
    perl6ize_type $P5010, $P5012
    find_lex $P5013, "$last-newline-since"
    find_lex $P5009, "&infix:<->"
    perl6_multi_dispatch_thunk $P5008, $P5009
    $P5014 = $P5008($P5010, $P5013)
    nqp_get_sc_object $P5015, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 165
    find_lex $P5007, "&infix:<>>"
    perl6_multi_dispatch_thunk $P5006, $P5007
    $P5016 = $P5006($P5014, $P5015)
    unless $P5016 goto if25_else66 
    .const 'Sub' $P5017 = 'cuid_24_1372810477.80751' 
    capture_lex $P5017
    $P5018 = $P5017()
    set $P5020, $P5018
    goto if25_end67
  if25_else66:
    find_lex $P5019, "Nil"
    set $P5020, $P5019
  if25_end67:
    .return ($P5020) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_22_1372810477.80751") :anon :lex :outer("cuid_21_1372810477.80751")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/XML/Writer.pm"
.annotate 'line', 68
    .param pmc CALL_SIG :call_sig 
    .lex "$_", $P101 
    .lex "call_sig", $P102 
    .lex "$*DISPATCHER", $P103 
    perl6_take_dispatcher 
    set $P5002, CALL_SIG
    set $P102, $P5002
    bind_signature 
    find_lex $P5004, "self"
    find_lex $P5005, "$_"
    $P5006 = $P5004."is_attribute"($P5005)
    $P5007 = $P5006."item"()
    .return ($P5007) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_23_1372810477.80751") :anon :lex :outer("cuid_21_1372810477.80751")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/XML/Writer.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 
    find_lex $P5004, "self"
    find_lex $P5005, "$_"
    $P5006 = $P5004."is_node"($P5005)
    $P5007 = $P5006."item"()
    .return ($P5007) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_24_1372810477.80751") :anon :lex :outer("cuid_21_1372810477.80751")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/XML/Writer.pm"
.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, "$result"
    nqp_get_sc_object $P5007, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 167
    find_lex $P5004, "&infix:<~>"
    $P5005 = "&METAOP_ASSIGN"($P5004)
    $P5005($P5006, $P5007)
.annotate 'line', 73
    find_lex $P5004, "$last-newline-since"
    find_lex $P5006, "$result"
    $P5007 = $P5006."chars"()
    perl6ize_type $P5005, $P5007
    perl6_container_store $P5004, $P5005
    .return ($P5004) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_28_1372810477.80751") :load :init
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/XML/Writer.pm"
    .const 'Sub' $P5001 = 'cuid_27_1372810477.80751' 
    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_26_1372810477.80751" 
    get_hll_global $P5002, "ModuleLoader"
    $P5003 = $P5002."load_setting"("CORE")
    $P5001."set_outer_ctx"($P5003)
    nqp_create_sc $P5001, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F"
    set cur_sc, $P5001
    cur_sc."set_description"("/usr/local/lib/parrot/4.6.0/languages/perl6/lib/XML/Writer.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, "serialize"
    push $P5003, "is_attribute"
    push $P5003, "is_element"
    push $P5003, "is_text_node"
    push $P5003, "is_node"
    push $P5003, "element"
    push $P5003, "element_open"
    push $P5003, "element_close"
    push $P5003, "element_empty"
    push $P5003, "element_attrs"
    push $P5003, "escape"
    push $P5003, "visit"
    push $P5003, "27420382D80CEF05775E7415279171A93892A1F1-1372810242.10453"
    push $P5003, "src/gen/BOOTSTRAP.pm"
    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, "XML"
    push $P5003, "$=pod"
    push $P5003, "!UNIT_MARKER"
    push $P5003, "$?CLASS"
    push $P5003, "::?CLASS"
    push $P5003, "%named"
    push $P5003, "$t"
    push $P5003, "$err"
    push $P5003, "$*DISPATCHER"
    push $P5003, "&?ROUTINE"
    push $P5003, "Please pass exactly one argument to XML::Writer.serialize"
    push $P5003, "0"
    push $P5003, "1"
    push $P5003, "The XML tree must have a single root node"
    push $P5003, "$tree"
    push $P5003, "$x"
    push $P5003, "%_"
    push $P5003, "@attrs"
    push $P5003, "@children"
    push $P5003, "$name"
    push $P5003, "<%s%s>"
    push $P5003, "</"
    push $P5003, ">"
    push $P5003, "<%s%s />"
    push $P5003, " %s=\"%s\""
    push $P5003, "$_"
    push $P5003, "%charmap"
    push $P5003, "&gt;"
    push $P5003, "<"
    push $P5003, "&lt;"
    push $P5003, "\""
    push $P5003, "&quot;"
    push $P5003, "&"
    push $P5003, "&amp;"
    push $P5003, ""
    push $P5003, "<>&\""
    push $P5003, "g"
    push $P5003, "$str"
    push $P5003, "@list"
    push $P5003, "$result"
    push $P5003, "$last-newline-since"
    push $P5003, "$subtree"
    push $P5003, "70"
    push $P5003, "\n"
    push $P5003, "$node"
    push $P5003, "NAME"
    push $P5003, "XML::Writer - XML generation and handling"
    push $P5003, "NAME XML::Writer - XML generation and handling"
    push $P5003, "SYNOPSIS"
    push $P5003, "use v6;\nuse XML::Writer;\n\nmy $svg = :svg[\n    :width(200), :height(200),\n    circle => [\n        :cx(100), :cy(100), :r(50)\n    ],\n    text => [\n        :x(10), :y(20), \"hello\"\n    ]\n];\n\nsay XML::Writer.serialize($svg);\n"
    push $P5003, "DESCRIPTION"
    push $P5003, "XML::Writer is a Perl 6 class which outputs XML from a nested data structure"
    push $P5003, "describing the DOM representation of an XML file."
    push $P5003, "XML::Writer is a Perl 6 class which outputs XML from a nested data structure describing the DOM representation of an XML file."
    push $P5003, "METHODS"
    push $P5003, "serialize($hierarchy)"
    push $P5003, "2"
    push $P5003, "TESTING"
    push $P5003, "The testing plan of SVG::Tiny seems alluring. Haven't looked closer at it,"
    push $P5003, "though."
    push $P5003, "TESTING The testing plan of SVG::Tiny seems alluring. Haven't looked closer at it,"
    push $P5003, "TESTING The testing plan of SVG::Tiny seems alluring. Haven't looked closer at it, though."
    push $P5003, "BUGS"
    push $P5003, "Likely several. If any of them bites you, please get in touch and we'll see"
    push $P5003, "what we can do."
    push $P5003, "BUGS Likely several. If any of them bites you, please get in touch and we'll see"
    push $P5003, "BUGS Likely several. If any of them bites you, please get in touch and we'll see what we can do."
    push $P5003, "AUTHORS"
    push $P5003, utf8:"Carl M\x{e4}sak (masak on CPAN github #perl6, cmasak on gmail.com)"
    push $P5003, utf8:"significant contributions made by Daniel Schr\x{f6}er and Moritz Lenz."
    push $P5003, utf8:"AUTHORS Carl M\x{e4}sak (masak on CPAN github #perl6, cmasak on gmail.com)"
    push $P5003, utf8:"AUTHORS Carl M\x{e4}sak (masak on CPAN github #perl6, cmasak on gmail.com) significant contributions made by Daniel Schr\x{f6}er and Moritz Lenz."
    push $P5003, "pod"
    push $P5003, "GLOBAL"
    push $P5003, "XML::Writer"
    push $P5003, "28FAC381EB59BA79DA1D75F70404C20E0548F4F5-1372810034.5696"
    push $P5003, "src/stage2/NQPCORE.setting"
    push $P5003, "Writer"
    push $P5003, "6"
    .const 'Sub' $P5004 = 'cuid_27_1372810477.80751' 
    capture_lex $P5004
    $P5005 = $P5004()
    nqp_deserialize_sc "[encoded data, 31024 characters]", cur_sc, $P5003, $P5005, conflicts
    unless conflicts goto if26_end71 
    get_hll_global $P5006, "ModuleLoader"
    $P5007 = $P5006."resolve_repossession_conflicts"(conflicts)
  if26_end71:
    .const "LexInfo" $P5001 = "cuid_1_1372810477.80751"
    nqp_get_sc_object $P5002, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 2
    $P5001."set_static_lexpad"($P5002)
    .const "LexInfo" $P5001 = "cuid_2_1372810477.80751"
    nqp_get_sc_object $P5002, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 7
    $P5001."set_static_lexpad"($P5002)
    .const "LexInfo" $P5001 = "cuid_3_1372810477.80751"
    nqp_get_sc_object $P5002, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 11
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_4_1372810477.80751" 
    nqp_get_sc_object $P5002, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 14
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_5_1372810477.80751" 
    nqp_get_sc_object $P5002, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 17
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_3_1372810477.80751" 
    nqp_get_sc_object $P5002, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 8
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_6_1372810477.80751"
    nqp_get_sc_object $P5002, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 33
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_6_1372810477.80751" 
    nqp_get_sc_object $P5002, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 26
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_7_1372810477.80751"
    nqp_get_sc_object $P5002, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 41
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_7_1372810477.80751" 
    nqp_get_sc_object $P5002, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 34
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_8_1372810477.80751"
    nqp_get_sc_object $P5002, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 49
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_8_1372810477.80751" 
    nqp_get_sc_object $P5002, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 42
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_9_1372810477.80751"
    nqp_get_sc_object $P5002, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 57
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_9_1372810477.80751" 
    nqp_get_sc_object $P5002, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 50
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_10_1372810477.80751"
    nqp_get_sc_object $P5002, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 69
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_10_1372810477.80751" 
    nqp_get_sc_object $P5002, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 58
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_11_1372810477.80751"
    nqp_get_sc_object $P5002, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 80
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_11_1372810477.80751" 
    nqp_get_sc_object $P5002, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 70
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_12_1372810477.80751"
    nqp_get_sc_object $P5002, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 90
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_12_1372810477.80751" 
    nqp_get_sc_object $P5002, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 81
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_13_1372810477.80751"
    nqp_get_sc_object $P5002, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 101
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_13_1372810477.80751" 
    nqp_get_sc_object $P5002, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 91
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_14_1372810477.80751" 
    nqp_get_sc_object $P5002, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 104
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_15_1372810477.80751"
    nqp_get_sc_object $P5002, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 114
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_15_1372810477.80751" 
    nqp_get_sc_object $P5002, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 102
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_16_1372810477.80751"
    nqp_get_sc_object $P5002, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 117
    $P5001."set_static_lexpad"($P5002)
    .const "LexInfo" $P5001 = "cuid_17_1372810477.80751"
    nqp_get_sc_object $P5002, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 130
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_17_1372810477.80751" 
    nqp_get_sc_object $P5002, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 125
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_18_1372810477.80751" 
    nqp_get_sc_object $P5002, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 131
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_16_1372810477.80751" 
    nqp_get_sc_object $P5002, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 115
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_19_1372810477.80751"
    nqp_get_sc_object $P5002, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 145
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_20_1372810477.80751" 
    nqp_get_sc_object $P5002, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 149
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_21_1372810477.80751"
    nqp_get_sc_object $P5002, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 153
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_22_1372810477.80751" 
    nqp_get_sc_object $P5002, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 156
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_23_1372810477.80751" 
    nqp_get_sc_object $P5002, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 161
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_24_1372810477.80751" 
    nqp_get_sc_object $P5002, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 166
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_21_1372810477.80751" 
    nqp_get_sc_object $P5002, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 151
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_25_1372810477.80751" 
    nqp_get_sc_object $P5002, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 148
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_19_1372810477.80751" 
    nqp_get_sc_object $P5002, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 142
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_2_1372810477.80751" 
    nqp_get_sc_object $P5002, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 247
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_1_1372810477.80751" 
    nqp_get_sc_object $P5002, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 3
    perl6_associate_sub_code_object $P5001, $P5002
    nqp_get_sc_object $P5001, "E73160F1BBC8F5DBFD2BC110DEEA12E9E52A7E4F", 0
    set_hll_global "GLOBAL", $P5001
    .return () 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_27_1372810477.80751") :anon :lex :outer("cuid_28_1372810477.80751")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/XML/Writer.pm"
    new $P5001, 'ResizablePMCArray'
    .const 'Sub' $P5002 = "cuid_4_1372810477.80751" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_5_1372810477.80751" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_3_1372810477.80751" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_6_1372810477.80751" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_7_1372810477.80751" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_8_1372810477.80751" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_9_1372810477.80751" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_10_1372810477.80751" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_11_1372810477.80751" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_12_1372810477.80751" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_13_1372810477.80751" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_14_1372810477.80751" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_15_1372810477.80751" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_17_1372810477.80751" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_18_1372810477.80751" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_16_1372810477.80751" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_20_1372810477.80751" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_22_1372810477.80751" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_23_1372810477.80751" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_24_1372810477.80751" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_21_1372810477.80751" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_25_1372810477.80751" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_19_1372810477.80751" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_2_1372810477.80751" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_1_1372810477.80751" 
    push $P5001, $P5002
    .return ($P5001) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_29_1372810477.80751") :load
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/XML/Writer.pm"
    .const 'Sub' $P5001 = "cuid_26_1372810477.80751" 
    $P5002 = $P5001()
    .return ($P5002) 
.end