.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_66_1372810566.31755") :anon :lex
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/DBDish/mysql.pm6"
.annotate 'line', 1
    .const 'Sub' $P5003 = 'cuid_1_1372810566.31755' 
    capture_lex $P5003 
    .const 'Sub' $P5001 = 'cuid_1_1372810566.31755' 
    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_1372810566.31755") :anon :lex :outer("cuid_66_1372810566.31755")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/DBDish/mysql.pm6"
.annotate 'line', 1
    .const 'Sub' $P5051 = 'cuid_2_1372810566.31755' 
    capture_lex $P5051 
    .const 'Sub' $P5051 = 'cuid_3_1372810566.31755' 
    capture_lex $P5051 
    .const 'Sub' $P5051 = 'cuid_4_1372810566.31755' 
    capture_lex $P5051 
    .const 'Sub' $P5051 = 'cuid_5_1372810566.31755' 
    capture_lex $P5051 
    .const 'Sub' $P5051 = 'cuid_6_1372810566.31755' 
    capture_lex $P5051 
    .const 'Sub' $P5051 = 'cuid_7_1372810566.31755' 
    capture_lex $P5051 
    .const 'Sub' $P5051 = 'cuid_8_1372810566.31755' 
    capture_lex $P5051 
    .const 'Sub' $P5051 = 'cuid_9_1372810566.31755' 
    capture_lex $P5051 
    .const 'Sub' $P5051 = 'cuid_10_1372810566.31755' 
    capture_lex $P5051 
    .const 'Sub' $P5051 = 'cuid_11_1372810566.31755' 
    capture_lex $P5051 
    .const 'Sub' $P5051 = 'cuid_12_1372810566.31755' 
    capture_lex $P5051 
    .const 'Sub' $P5051 = 'cuid_13_1372810566.31755' 
    capture_lex $P5051 
    .const 'Sub' $P5051 = 'cuid_14_1372810566.31755' 
    capture_lex $P5051 
    .const 'Sub' $P5051 = 'cuid_15_1372810566.31755' 
    capture_lex $P5051 
    .const 'Sub' $P5051 = 'cuid_16_1372810566.31755' 
    capture_lex $P5051 
    .const 'Sub' $P5051 = 'cuid_17_1372810566.31755' 
    capture_lex $P5051 
    .const 'Sub' $P5051 = 'cuid_18_1372810566.31755' 
    capture_lex $P5051 
    .const 'Sub' $P5051 = 'cuid_19_1372810566.31755' 
    capture_lex $P5051 
    .const 'Sub' $P5051 = 'cuid_20_1372810566.31755' 
    capture_lex $P5051 
    .const 'Sub' $P5051 = 'cuid_21_1372810566.31755' 
    capture_lex $P5051 
    .const 'Sub' $P5051 = 'cuid_22_1372810566.31755' 
    capture_lex $P5051 
    .const 'Sub' $P5051 = 'cuid_23_1372810566.31755' 
    capture_lex $P5051 
    .const 'Sub' $P5051 = 'cuid_24_1372810566.31755' 
    capture_lex $P5051 
    .const 'Sub' $P5051 = 'cuid_25_1372810566.31755' 
    capture_lex $P5051 
    .const 'Sub' $P5051 = 'cuid_54_1372810566.31755' 
    capture_lex $P5051 
    .const 'Sub' $P5051 = 'cuid_60_1372810566.31755' 
    capture_lex $P5051 
    .lex "GLOBALish", $P101 
    .lex "EXPORT", $P102 
    .lex "$?PACKAGE", $P103 
    .lex "::?PACKAGE", $P104 
    .lex "$_", $P105 
    .lex "$/", $P106 
    .lex "$!", $P107 
    .lex "OpaquePointer", $P108 
    .lex "CArray", $P109 
    .lex "&trait_mod:<is>", $P110 
    .lex "&explicitly-manage", $P111 
    .lex "&refresh", $P112 
    .lex "&mysql_affected_rows", $P113 
    .lex "&mysql_close", $P114 
    .lex "&mysql_data_seek", $P115 
    .lex "&mysql_error", $P116 
    .lex "&mysql_fetch_field", $P117 
    .lex "&mysql_fetch_lengths", $P118 
    .lex "&mysql_fetch_row", $P119 
    .lex "&mysql_field_count", $P120 
    .lex "&mysql_free_result", $P121 
    .lex "&mysql_get_client_info", $P122 
    .lex "&mysql_init", $P123 
    .lex "&mysql_insert_id", $P124 
    .lex "&mysql_library_init", $P125 
    .lex "&mysql_library_end", $P126 
    .lex "&mysql_num_rows", $P127 
    .lex "&mysql_query", $P128 
    .lex "&mysql_real_connect", $P129 
    .lex "&mysql_stat", $P130 
    .lex "&mysql_store_result", $P131 
    .lex "&mysql_use_result", $P132 
    .lex "&mysql_warning_count", $P133 
    .lex "&mysql_stmt_init", $P134 
    .lex "&mysql_stmt_prepare", $P135 
    .lex "$=pod", $P136 
    .lex "!UNIT_MARKER", $P137 
    .local pmc ctxsave 
    .const 'Sub' $P5004 = 'cuid_2_1372810566.31755' 
    capture_lex $P5004
    $P5004 = $P113."clone"()
    set $P113, $P5004
    .const 'Sub' $P5005 = 'cuid_3_1372810566.31755' 
    capture_lex $P5005
    $P5005 = $P114."clone"()
    set $P114, $P5005
    .const 'Sub' $P5006 = 'cuid_4_1372810566.31755' 
    capture_lex $P5006
    $P5006 = $P115."clone"()
    set $P115, $P5006
    .const 'Sub' $P5007 = 'cuid_5_1372810566.31755' 
    capture_lex $P5007
    $P5007 = $P116."clone"()
    set $P116, $P5007
    .const 'Sub' $P5008 = 'cuid_6_1372810566.31755' 
    capture_lex $P5008
    $P5008 = $P117."clone"()
    set $P117, $P5008
    .const 'Sub' $P5009 = 'cuid_7_1372810566.31755' 
    capture_lex $P5009
    $P5009 = $P118."clone"()
    set $P118, $P5009
    .const 'Sub' $P5010 = 'cuid_8_1372810566.31755' 
    capture_lex $P5010
    $P5010 = $P119."clone"()
    set $P119, $P5010
    .const 'Sub' $P5011 = 'cuid_9_1372810566.31755' 
    capture_lex $P5011
    $P5011 = $P120."clone"()
    set $P120, $P5011
    .const 'Sub' $P5012 = 'cuid_10_1372810566.31755' 
    capture_lex $P5012
    $P5012 = $P121."clone"()
    set $P121, $P5012
    .const 'Sub' $P5013 = 'cuid_11_1372810566.31755' 
    capture_lex $P5013
    $P5013 = $P122."clone"()
    set $P122, $P5013
    .const 'Sub' $P5014 = 'cuid_12_1372810566.31755' 
    capture_lex $P5014
    $P5014 = $P123."clone"()
    set $P123, $P5014
    .const 'Sub' $P5015 = 'cuid_13_1372810566.31755' 
    capture_lex $P5015
    $P5015 = $P124."clone"()
    set $P124, $P5015
    .const 'Sub' $P5016 = 'cuid_14_1372810566.31755' 
    capture_lex $P5016
    $P5016 = $P125."clone"()
    set $P125, $P5016
    .const 'Sub' $P5017 = 'cuid_15_1372810566.31755' 
    capture_lex $P5017
    $P5017 = $P126."clone"()
    set $P126, $P5017
    .const 'Sub' $P5018 = 'cuid_16_1372810566.31755' 
    capture_lex $P5018
    $P5018 = $P127."clone"()
    set $P127, $P5018
    .const 'Sub' $P5019 = 'cuid_17_1372810566.31755' 
    capture_lex $P5019
    $P5019 = $P128."clone"()
    set $P128, $P5019
    .const 'Sub' $P5020 = 'cuid_18_1372810566.31755' 
    capture_lex $P5020
    $P5020 = $P129."clone"()
    set $P129, $P5020
    .const 'Sub' $P5021 = 'cuid_19_1372810566.31755' 
    capture_lex $P5021
    $P5021 = $P130."clone"()
    set $P130, $P5021
    .const 'Sub' $P5022 = 'cuid_20_1372810566.31755' 
    capture_lex $P5022
    $P5022 = $P131."clone"()
    set $P131, $P5022
    .const 'Sub' $P5023 = 'cuid_21_1372810566.31755' 
    capture_lex $P5023
    $P5023 = $P132."clone"()
    set $P132, $P5023
    .const 'Sub' $P5024 = 'cuid_22_1372810566.31755' 
    capture_lex $P5024
    $P5024 = $P133."clone"()
    set $P133, $P5024
    .const 'Sub' $P5025 = 'cuid_23_1372810566.31755' 
    capture_lex $P5025
    $P5025 = $P134."clone"()
    set $P134, $P5025
    .const 'Sub' $P5026 = 'cuid_24_1372810566.31755' 
    capture_lex $P5026
    $P5026 = $P135."clone"()
    set $P135, $P5026
    find_dynamic_lex $P5027, "$*CTXSAVE"
    set ctxsave, $P5027
    isnull $I5001, ctxsave
    if $I5001 goto unless10_end11 
    can $I5002, ctxsave, "ctxsave"
    perl6_box_int $P5030, $I5002
    set $P5029, $P5030
    unless $I5002 goto if11_end13 
    $P5028 = ctxsave."ctxsave"()
    set $P5029, $P5028
  if11_end13:
  unless10_end11:
    nqp_get_sc_object $P5027, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 477
    null $P5028
    null $P5029
    null $P5030
    null $P5031
    null $P5032
    null $P5033
    null $P5034
    null $P5035
    null $P5036
    null $P5037
    null $P5038
    null $P5039
    null $P5040
    null $P5041
    null $P5042
    null $P5043
    null $P5044
    null $P5045
    null $P5046
    null $P5047
    null $P5048
    null $P5049
    null $P5050
    .const 'Sub' $P5051 = 'cuid_25_1372810566.31755' 
    capture_lex $P5051
    $P5052 = $P5051()
    nqp_get_sc_object $P5053, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 156
    .const 'Sub' $P5051 = 'cuid_54_1372810566.31755' 
    capture_lex $P5051
    $P5052 = $P5051()
    nqp_get_sc_object $P5053, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 326
    .const 'Sub' $P5051 = 'cuid_60_1372810566.31755' 
    capture_lex $P5051
    $P5052 = $P5051()
    nqp_get_sc_object $P5053, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 380
    .return ($P5053) 
.end
.HLL "perl6"
.namespace []
.sub "mysql_affected_rows" :subid("cuid_2_1372810566.31755") :anon :lex :outer("cuid_1_1372810566.31755")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/DBDish/mysql.pm6"
.annotate 'line', 13
    .param pmc CALL_SIG :call_sig 
    .lex "$mysql_client", $P101 
    .lex "$_", $P102 
    .lex "$/", $P103 
    .lex "$!", $P104 
    .lex "call_sig", $P105 
    .lex "$*DISPATCHER", $P106 
    .lex "&?ROUTINE", $P107 
    perl6_take_dispatcher 
    set $P5004, CALL_SIG
    set $P105, $P5004
    bind_signature 
    find_lex $P5007, "Whatever"
    $P5008 = $P5007."new"()
    perl6_decontainerize_return_value $P5006, $P5008
    nqp_get_sc_object $P5007, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 4
    perl6_type_check_return_value $P5006, $P5007
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "mysql_close" :subid("cuid_3_1372810566.31755") :anon :lex :outer("cuid_1_1372810566.31755")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/DBDish/mysql.pm6"
.annotate 'line', 18
    .param pmc CALL_SIG :call_sig 
    .lex "$mysql_client", $P101 
    .lex "$_", $P102 
    .lex "$/", $P103 
    .lex "$!", $P104 
    .lex "call_sig", $P105 
    .lex "$*DISPATCHER", $P106 
    .lex "&?ROUTINE", $P107 
    perl6_take_dispatcher 
    set $P5004, CALL_SIG
    set $P105, $P5004
    bind_signature 
    find_lex $P5007, "Whatever"
    $P5008 = $P5007."new"()
    perl6_decontainerize_return_value $P5006, $P5008
    nqp_get_sc_object $P5007, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 13
    perl6_type_check_return_value $P5006, $P5007
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "mysql_data_seek" :subid("cuid_4_1372810566.31755") :anon :lex :outer("cuid_1_1372810566.31755")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/DBDish/mysql.pm6"
.annotate 'line', 23
    .param pmc CALL_SIG :call_sig 
    .lex "$result_set", $P101 
    .lex "$row_number", $P102 
    .lex "$_", $P103 
    .lex "$/", $P104 
    .lex "$!", $P105 
    .lex "call_sig", $P106 
    .lex "$*DISPATCHER", $P107 
    .lex "&?ROUTINE", $P108 
    perl6_take_dispatcher 
    set $P5004, CALL_SIG
    set $P106, $P5004
    bind_signature 
    find_lex $P5007, "Whatever"
    $P5008 = $P5007."new"()
    perl6_decontainerize_return_value $P5006, $P5008
    nqp_get_sc_object $P5007, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 18
    perl6_type_check_return_value $P5006, $P5007
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "mysql_error" :subid("cuid_5_1372810566.31755") :anon :lex :outer("cuid_1_1372810566.31755")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/DBDish/mysql.pm6"
.annotate 'line', 28
    .param pmc CALL_SIG :call_sig 
    .lex "$mysql_client", $P101 
    .lex "$_", $P102 
    .lex "$/", $P103 
    .lex "$!", $P104 
    .lex "call_sig", $P105 
    .lex "$*DISPATCHER", $P106 
    .lex "&?ROUTINE", $P107 
    perl6_take_dispatcher 
    set $P5004, CALL_SIG
    set $P105, $P5004
    bind_signature 
    find_lex $P5007, "Whatever"
    $P5008 = $P5007."new"()
    perl6_decontainerize_return_value $P5006, $P5008
    nqp_get_sc_object $P5007, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 25
    perl6_type_check_return_value $P5006, $P5007
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "mysql_fetch_field" :subid("cuid_6_1372810566.31755") :anon :lex :outer("cuid_1_1372810566.31755")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/DBDish/mysql.pm6"
.annotate 'line', 33
    .param pmc CALL_SIG :call_sig 
    .lex "$result_set", $P101 
    .lex "$_", $P102 
    .lex "$/", $P103 
    .lex "$!", $P104 
    .lex "call_sig", $P105 
    .lex "$*DISPATCHER", $P106 
    .lex "&?ROUTINE", $P107 
    perl6_take_dispatcher 
    set $P5004, CALL_SIG
    set $P105, $P5004
    bind_signature 
    find_lex $P5007, "Whatever"
    $P5008 = $P5007."new"()
    perl6_decontainerize_return_value $P5006, $P5008
    nqp_get_sc_object $P5007, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 30
    perl6_type_check_return_value $P5006, $P5007
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "mysql_fetch_lengths" :subid("cuid_7_1372810566.31755") :anon :lex :outer("cuid_1_1372810566.31755")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/DBDish/mysql.pm6"
.annotate 'line', 38
    .param pmc CALL_SIG :call_sig 
    .lex "$result_set", $P101 
    .lex "$_", $P102 
    .lex "$/", $P103 
    .lex "$!", $P104 
    .lex "call_sig", $P105 
    .lex "$*DISPATCHER", $P106 
    .lex "&?ROUTINE", $P107 
    perl6_take_dispatcher 
    set $P5004, CALL_SIG
    set $P105, $P5004
    bind_signature 
    find_lex $P5007, "Whatever"
    $P5008 = $P5007."new"()
    perl6_decontainerize_return_value $P5006, $P5008
    nqp_get_sc_object $P5007, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 40
    perl6_type_check_return_value $P5006, $P5007
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "mysql_fetch_row" :subid("cuid_8_1372810566.31755") :anon :lex :outer("cuid_1_1372810566.31755")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/DBDish/mysql.pm6"
.annotate 'line', 43
    .param pmc CALL_SIG :call_sig 
    .lex "$result_set", $P101 
    .lex "$_", $P102 
    .lex "$/", $P103 
    .lex "$!", $P104 
    .lex "call_sig", $P105 
    .lex "$*DISPATCHER", $P106 
    .lex "&?ROUTINE", $P107 
    perl6_take_dispatcher 
    set $P5004, CALL_SIG
    set $P105, $P5004
    bind_signature 
    find_lex $P5007, "Whatever"
    $P5008 = $P5007."new"()
    perl6_decontainerize_return_value $P5006, $P5008
    nqp_get_sc_object $P5007, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 49
    perl6_type_check_return_value $P5006, $P5007
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "mysql_field_count" :subid("cuid_9_1372810566.31755") :anon :lex :outer("cuid_1_1372810566.31755")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/DBDish/mysql.pm6"
.annotate 'line', 48
    .param pmc CALL_SIG :call_sig 
    .lex "$mysql_client", $P101 
    .lex "$_", $P102 
    .lex "$/", $P103 
    .lex "$!", $P104 
    .lex "call_sig", $P105 
    .lex "$*DISPATCHER", $P106 
    .lex "&?ROUTINE", $P107 
    perl6_take_dispatcher 
    set $P5004, CALL_SIG
    set $P105, $P5004
    bind_signature 
    find_lex $P5007, "Whatever"
    $P5008 = $P5007."new"()
    perl6_decontainerize_return_value $P5006, $P5008
    nqp_get_sc_object $P5007, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 55
    perl6_type_check_return_value $P5006, $P5007
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "mysql_free_result" :subid("cuid_10_1372810566.31755") :anon :lex :outer("cuid_1_1372810566.31755")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/DBDish/mysql.pm6"
.annotate 'line', 52
    .param pmc CALL_SIG :call_sig 
    .lex "$result_set", $P101 
    .lex "$_", $P102 
    .lex "$/", $P103 
    .lex "$!", $P104 
    .lex "call_sig", $P105 
    .lex "$*DISPATCHER", $P106 
    .lex "&?ROUTINE", $P107 
    perl6_take_dispatcher 
    set $P5004, CALL_SIG
    set $P105, $P5004
    bind_signature 
    find_lex $P5007, "Whatever"
    $P5008 = $P5007."new"()
    perl6_decontainerize_return_value $P5006, $P5008
    nqp_get_sc_object $P5007, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 60
    perl6_type_check_return_value $P5006, $P5007
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "mysql_get_client_info" :subid("cuid_11_1372810566.31755") :anon :lex :outer("cuid_1_1372810566.31755")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/DBDish/mysql.pm6"
.annotate 'line', 57
    .param pmc CALL_SIG :call_sig 
    .lex "$mysql_client", $P101 
    .lex "$_", $P102 
    .lex "$/", $P103 
    .lex "$!", $P104 
    .lex "call_sig", $P105 
    .lex "$*DISPATCHER", $P106 
    .lex "&?ROUTINE", $P107 
    perl6_take_dispatcher 
    set $P5004, CALL_SIG
    set $P105, $P5004
    bind_signature 
    find_lex $P5007, "Whatever"
    $P5008 = $P5007."new"()
    perl6_decontainerize_return_value $P5006, $P5008
    nqp_get_sc_object $P5007, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 65
    perl6_type_check_return_value $P5006, $P5007
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "mysql_init" :subid("cuid_12_1372810566.31755") :anon :lex :outer("cuid_1_1372810566.31755")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/DBDish/mysql.pm6"
.annotate 'line', 62
    .param pmc CALL_SIG :call_sig 
    .lex "$mysql_client", $P101 
    .lex "$_", $P102 
    .lex "$/", $P103 
    .lex "$!", $P104 
    .lex "call_sig", $P105 
    .lex "$*DISPATCHER", $P106 
    .lex "&?ROUTINE", $P107 
    perl6_take_dispatcher 
    set $P5004, CALL_SIG
    set $P105, $P5004
    bind_signature 
    find_lex $P5007, "Whatever"
    $P5008 = $P5007."new"()
    perl6_decontainerize_return_value $P5006, $P5008
    nqp_get_sc_object $P5007, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 70
    perl6_type_check_return_value $P5006, $P5007
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "mysql_insert_id" :subid("cuid_13_1372810566.31755") :anon :lex :outer("cuid_1_1372810566.31755")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/DBDish/mysql.pm6"
.annotate 'line', 67
    .param pmc CALL_SIG :call_sig 
    .lex "$mysql_client", $P101 
    .lex "$_", $P102 
    .lex "$/", $P103 
    .lex "$!", $P104 
    .lex "call_sig", $P105 
    .lex "$*DISPATCHER", $P106 
    .lex "&?ROUTINE", $P107 
    perl6_take_dispatcher 
    set $P5004, CALL_SIG
    set $P105, $P5004
    bind_signature 
    find_lex $P5007, "Whatever"
    $P5008 = $P5007."new"()
    perl6_decontainerize_return_value $P5006, $P5008
    nqp_get_sc_object $P5007, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 75
    perl6_type_check_return_value $P5006, $P5007
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "mysql_library_init" :subid("cuid_14_1372810566.31755") :anon :lex :outer("cuid_1_1372810566.31755")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/DBDish/mysql.pm6"
.annotate 'line', 73
    .param pmc CALL_SIG :call_sig 
    .lex "$argc", $P101 
    .lex "$argv", $P102 
    .lex "$group", $P103 
    .lex "$_", $P104 
    .lex "$/", $P105 
    .lex "$!", $P106 
    .lex "call_sig", $P107 
    .lex "$*DISPATCHER", $P108 
    .lex "&?ROUTINE", $P109 
    perl6_take_dispatcher 
    set $P5004, CALL_SIG
    set $P107, $P5004
    bind_signature 
    find_lex $P5007, "Whatever"
    $P5008 = $P5007."new"()
    perl6_decontainerize_return_value $P5006, $P5008
    nqp_get_sc_object $P5007, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 80
    perl6_type_check_return_value $P5006, $P5007
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "mysql_library_end" :subid("cuid_15_1372810566.31755") :anon :lex :outer("cuid_1_1372810566.31755")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/DBDish/mysql.pm6"
.annotate 'line', 77
    .param pmc CALL_SIG :call_sig 
    .lex "$_", $P101 
    .lex "$/", $P102 
    .lex "$!", $P103 
    .lex "call_sig", $P104 
    .lex "$*DISPATCHER", $P105 
    .lex "&?ROUTINE", $P106 
    perl6_take_dispatcher 
    set $P5004, CALL_SIG
    set $P104, $P5004
    bind_signature 
    find_lex $P5007, "Whatever"
    $P5008 = $P5007."new"()
    perl6_decontainerize_return_value $P5006, $P5008
    nqp_get_sc_object $P5007, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 89
    perl6_type_check_return_value $P5006, $P5007
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "mysql_num_rows" :subid("cuid_16_1372810566.31755") :anon :lex :outer("cuid_1_1372810566.31755")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/DBDish/mysql.pm6"
.annotate 'line', 82
    .param pmc CALL_SIG :call_sig 
    .lex "$result_set", $P101 
    .lex "$_", $P102 
    .lex "$/", $P103 
    .lex "$!", $P104 
    .lex "call_sig", $P105 
    .lex "$*DISPATCHER", $P106 
    .lex "&?ROUTINE", $P107 
    perl6_take_dispatcher 
    set $P5004, CALL_SIG
    set $P105, $P5004
    bind_signature 
    find_lex $P5007, "Whatever"
    $P5008 = $P5007."new"()
    perl6_decontainerize_return_value $P5006, $P5008
    nqp_get_sc_object $P5007, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 92
    perl6_type_check_return_value $P5006, $P5007
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "mysql_query" :subid("cuid_17_1372810566.31755") :anon :lex :outer("cuid_1_1372810566.31755")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/DBDish/mysql.pm6"
.annotate 'line', 87
    .param pmc CALL_SIG :call_sig 
    .lex "$mysql_client", $P101 
    .lex "$sql_command", $P102 
    .lex "$_", $P103 
    .lex "$/", $P104 
    .lex "$!", $P105 
    .lex "call_sig", $P106 
    .lex "$*DISPATCHER", $P107 
    .lex "&?ROUTINE", $P108 
    perl6_take_dispatcher 
    set $P5004, CALL_SIG
    set $P106, $P5004
    bind_signature 
    find_lex $P5007, "Whatever"
    $P5008 = $P5007."new"()
    perl6_decontainerize_return_value $P5006, $P5008
    nqp_get_sc_object $P5007, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 97
    perl6_type_check_return_value $P5006, $P5007
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "mysql_real_connect" :subid("cuid_18_1372810566.31755") :anon :lex :outer("cuid_1_1372810566.31755")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/DBDish/mysql.pm6"
.annotate 'line', 93
    .param pmc CALL_SIG :call_sig 
    .lex "$mysql_client", $P101 
    .lex "$host", $P102 
    .lex "$user", $P103 
    .lex "$password", $P104 
    .lex "$database", $P105 
    .lex "$port", $I101 
    .lex "$socket", $P106 
    .lex "$flag", $P107 
    .lex "$_", $P108 
    .lex "$/", $P109 
    .lex "$!", $P110 
    .lex "call_sig", $P111 
    .lex "$*DISPATCHER", $P112 
    .lex "&?ROUTINE", $P113 
    perl6_take_dispatcher 
    set $P5004, CALL_SIG
    set $P111, $P5004
    bind_signature 
    find_lex $P5007, "Whatever"
    $P5008 = $P5007."new"()
    perl6_decontainerize_return_value $P5006, $P5008
    nqp_get_sc_object $P5007, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 104
    perl6_type_check_return_value $P5006, $P5007
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "mysql_stat" :subid("cuid_19_1372810566.31755") :anon :lex :outer("cuid_1_1372810566.31755")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/DBDish/mysql.pm6"
.annotate 'line', 98
    .param pmc CALL_SIG :call_sig 
    .lex "$mysql_client", $P101 
    .lex "$_", $P102 
    .lex "$/", $P103 
    .lex "$!", $P104 
    .lex "call_sig", $P105 
    .lex "$*DISPATCHER", $P106 
    .lex "&?ROUTINE", $P107 
    perl6_take_dispatcher 
    set $P5004, CALL_SIG
    set $P105, $P5004
    bind_signature 
    find_lex $P5007, "Whatever"
    $P5008 = $P5007."new"()
    perl6_decontainerize_return_value $P5006, $P5008
    nqp_get_sc_object $P5007, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 123
    perl6_type_check_return_value $P5006, $P5007
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "mysql_store_result" :subid("cuid_20_1372810566.31755") :anon :lex :outer("cuid_1_1372810566.31755")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/DBDish/mysql.pm6"
.annotate 'line', 103
    .param pmc CALL_SIG :call_sig 
    .lex "$mysql_client", $P101 
    .lex "$_", $P102 
    .lex "$/", $P103 
    .lex "$!", $P104 
    .lex "call_sig", $P105 
    .lex "$*DISPATCHER", $P106 
    .lex "&?ROUTINE", $P107 
    perl6_take_dispatcher 
    set $P5004, CALL_SIG
    set $P105, $P5004
    bind_signature 
    find_lex $P5007, "Whatever"
    $P5008 = $P5007."new"()
    perl6_decontainerize_return_value $P5006, $P5008
    nqp_get_sc_object $P5007, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 128
    perl6_type_check_return_value $P5006, $P5007
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "mysql_use_result" :subid("cuid_21_1372810566.31755") :anon :lex :outer("cuid_1_1372810566.31755")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/DBDish/mysql.pm6"
.annotate 'line', 108
    .param pmc CALL_SIG :call_sig 
    .lex "$mysql_client", $P101 
    .lex "$_", $P102 
    .lex "$/", $P103 
    .lex "$!", $P104 
    .lex "call_sig", $P105 
    .lex "$*DISPATCHER", $P106 
    .lex "&?ROUTINE", $P107 
    perl6_take_dispatcher 
    set $P5004, CALL_SIG
    set $P105, $P5004
    bind_signature 
    find_lex $P5007, "Whatever"
    $P5008 = $P5007."new"()
    perl6_decontainerize_return_value $P5006, $P5008
    nqp_get_sc_object $P5007, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 133
    perl6_type_check_return_value $P5006, $P5007
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "mysql_warning_count" :subid("cuid_22_1372810566.31755") :anon :lex :outer("cuid_1_1372810566.31755")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/DBDish/mysql.pm6"
.annotate 'line', 113
    .param pmc CALL_SIG :call_sig 
    .lex "$mysql_client", $P101 
    .lex "$_", $P102 
    .lex "$/", $P103 
    .lex "$!", $P104 
    .lex "call_sig", $P105 
    .lex "$*DISPATCHER", $P106 
    .lex "&?ROUTINE", $P107 
    perl6_take_dispatcher 
    set $P5004, CALL_SIG
    set $P105, $P5004
    bind_signature 
    find_lex $P5007, "Whatever"
    $P5008 = $P5007."new"()
    perl6_decontainerize_return_value $P5006, $P5008
    nqp_get_sc_object $P5007, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 138
    perl6_type_check_return_value $P5006, $P5007
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "mysql_stmt_init" :subid("cuid_23_1372810566.31755") :anon :lex :outer("cuid_1_1372810566.31755")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/DBDish/mysql.pm6"
.annotate 'line', 118
    .param pmc CALL_SIG :call_sig 
    .lex "$mysql_client", $P101 
    .lex "$_", $P102 
    .lex "$/", $P103 
    .lex "$!", $P104 
    .lex "call_sig", $P105 
    .lex "$*DISPATCHER", $P106 
    .lex "&?ROUTINE", $P107 
    perl6_take_dispatcher 
    set $P5004, CALL_SIG
    set $P105, $P5004
    bind_signature 
    find_lex $P5007, "Whatever"
    $P5008 = $P5007."new"()
    perl6_decontainerize_return_value $P5006, $P5008
    nqp_get_sc_object $P5007, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 143
    perl6_type_check_return_value $P5006, $P5007
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "mysql_stmt_prepare" :subid("cuid_24_1372810566.31755") :anon :lex :outer("cuid_1_1372810566.31755")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/DBDish/mysql.pm6"
.annotate 'line', 123
    .param pmc CALL_SIG :call_sig 
    .lex "$mysql_stmt", $P101 
    .lex "$length", $P102 
    .lex "$_", $P103 
    .lex "$/", $P104 
    .lex "$!", $P105 
    .lex "call_sig", $P106 
    .lex "$*DISPATCHER", $P107 
    .lex "&?ROUTINE", $P108 
    perl6_take_dispatcher 
    set $P5004, CALL_SIG
    set $P106, $P5004
    bind_signature 
    find_lex $P5007, "Whatever"
    $P5008 = $P5007."new"()
    perl6_decontainerize_return_value $P5006, $P5008
    nqp_get_sc_object $P5007, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 148
    perl6_type_check_return_value $P5006, $P5007
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_25_1372810566.31755") :anon :lex :outer("cuid_1_1372810566.31755")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/DBDish/mysql.pm6"
.annotate 'line', 127
    .const 'Sub' $P5022 = 'cuid_26_1372810566.31755' 
    capture_lex $P5022 
    .const 'Sub' $P5022 = 'cuid_27_1372810566.31755' 
    capture_lex $P5022 
    .const 'Sub' $P5022 = 'cuid_28_1372810566.31755' 
    capture_lex $P5022 
    .const 'Sub' $P5022 = 'cuid_34_1372810566.31755' 
    capture_lex $P5022 
    .const 'Sub' $P5022 = 'cuid_35_1372810566.31755' 
    capture_lex $P5022 
    .const 'Sub' $P5022 = 'cuid_39_1372810566.31755' 
    capture_lex $P5022 
    .const 'Sub' $P5022 = 'cuid_40_1372810566.31755' 
    capture_lex $P5022 
    .const 'Sub' $P5022 = 'cuid_50_1372810566.31755' 
    capture_lex $P5022 
    .const 'Sub' $P5022 = 'cuid_51_1372810566.31755' 
    capture_lex $P5022 
    .const 'Sub' $P5022 = 'cuid_53_1372810566.31755' 
    capture_lex $P5022 
    .lex "$?PACKAGE", $P101 
    .lex "::?PACKAGE", $P102 
    .lex "$?CLASS", $P103 
    .lex "::?CLASS", $P104 
    .lex "$_", $P105 
    .const 'Sub' $P5002 = 'cuid_26_1372810566.31755' 
    capture_lex $P5002
    .const 'Sub' $P5003 = 'cuid_27_1372810566.31755' 
    capture_lex $P5003
    .const 'Sub' $P5004 = 'cuid_28_1372810566.31755' 
    capture_lex $P5004
    .const 'Sub' $P5005 = 'cuid_34_1372810566.31755' 
    capture_lex $P5005
    .const 'Sub' $P5006 = 'cuid_35_1372810566.31755' 
    capture_lex $P5006
    .const 'Sub' $P5007 = 'cuid_39_1372810566.31755' 
    capture_lex $P5007
    .const 'Sub' $P5008 = 'cuid_40_1372810566.31755' 
    capture_lex $P5008
    .const 'Sub' $P5009 = 'cuid_50_1372810566.31755' 
    capture_lex $P5009
    .const 'Sub' $P5010 = 'cuid_51_1372810566.31755' 
    capture_lex $P5010
    .const 'Sub' $P5011 = 'cuid_53_1372810566.31755' 
    capture_lex $P5011
    null $P5012
    null $P5013
    null $P5014
    null $P5015
    null $P5016
    null $P5017
    null $P5018
    null $P5019
    nqp_get_sc_object $P5020, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 310
    $P5021 = $P5020."clone"()
    perl6_capture_lex $P5021
    .return ($P5021) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_26_1372810566.31755") :anon :lex :outer("cuid_25_1372810566.31755")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/DBDish/mysql.pm6"
.annotate 'line', 134
    .param pmc CALL_SIG :call_sig 
    .lex "self", $P101 
    .lex "$_", $P102 
    .lex "call_sig", $P103 
    set $P5001, CALL_SIG
    set $P103, $P5001
    bind_signature 
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 174
    .return ($P5002) 
.end
.HLL "perl6"
.namespace []
.sub "BUILD" :subid("cuid_27_1372810566.31755") :anon :lex :outer("cuid_25_1372810566.31755")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/DBDish/mysql.pm6"
.annotate 'line', 136
    .param pmc CALL_SIG :call_sig 
    .lex "self", $P101 
    .lex "%_", $P102 
    .lex "$_", $P103 
    .lex "$/", $P104 
    .lex "$!", $P105 
    .lex "call_sig", $P106 
    .lex "$*DISPATCHER", $P107 
    .lex "&?ROUTINE", $P108 
    perl6_take_dispatcher 
    set $P5005, CALL_SIG
    set $P106, $P5005
    bind_signature 
    root_new $P109, ['parrot';'Continuation']
    set_label $P109, lexotic_14
    .lex "RETURN", $P109
    find_lex $P5007, "Nil"
    perl6_decontainerize_return_value $P5006, $P5007
    goto lexotic_15
  lexotic_14:
    .get_results ($P5006)
  lexotic_15:
    find_lex $P5008, "&EXHAUST"
    store_lex "RETURN", $P5008
    nqp_get_sc_object $P5009, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 181
    perl6_type_check_return_value $P5006, $P5009
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "execute" :subid("cuid_28_1372810566.31755") :anon :lex :outer("cuid_25_1372810566.31755")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/DBDish/mysql.pm6"
.annotate 'line', 138
    .param pmc CALL_SIG :call_sig 
    .const 'Sub' $P5009 = 'cuid_29_1372810566.31755' 
    capture_lex $P5009 
    .const 'Sub' $P5009 = 'cuid_33_1372810566.31755' 
    capture_lex $P5009 
    .lex "self", $P101 
    .lex "%_", $P102 
    .lex "@params", $P103 
    .lex "$_", $P104 
    .lex "$/", $P105 
    .lex "$!", $P106 
    .lex "$statement", $P107 
    .lex "$status", $P108 
    .lex "$rows", $P109 
    .lex "call_sig", $P110 
    .lex "$*DISPATCHER", $P111 
    .lex "&?ROUTINE", $P112 
    perl6_take_dispatcher 
    set $P5005, CALL_SIG
    set $P110, $P5005
    bind_signature 
    root_new $P113, ['parrot';'Continuation']
    set_label $P113, lexotic_16
    .lex "RETURN", $P113
.annotate 'line', 140

    nqp_get_sc_object $P5007, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 156
    repr_get_attr_obj $P5008, $P101, $P5007, "$!statement"
    perl6_container_store $P107, $P5008
    new $P5024, 'ExceptionHandler', [.CONTROL_LOOP_NEXT;.CONTROL_LOOP_REDO;.CONTROL_LOOP_LAST]
    set_label $P5024, while12_handlers21
    push_eh $P5024
  while12_test18:
.annotate 'line', 141
    $P5010 = $P103."elems"()
    perl6ize_type $P5009, $P5010
    nqp_get_sc_object $P5011, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 174
    find_lex $P5008, "&infix:<>>"
    perl6_multi_dispatch_thunk $P5007, $P5008
    $P5012 = $P5007($P5009, $P5011)
    set $P5020, $P5012
    unless $P5012 goto if13_end24 
    nqp_get_sc_object $P5016, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 193
    $P5017 = $P107."index"($P5016)
    perl6ize_type $P5015, $P5017
    nqp_get_sc_object $P5018, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 174
    find_lex $P5014, "&infix:<>=>"
    perl6_multi_dispatch_thunk $P5013, $P5014
    $P5019 = $P5013($P5015, $P5018)
    set $P5020, $P5019
  if13_end24:
    set $P5023, $P5020
    unless $P5020 goto while12_done22 
  while12_redo20:
    .const 'Sub' $P5021 = 'cuid_29_1372810566.31755' 
    capture_lex $P5021
    $P5022 = $P5021()
    set $P5023, $P5022
    goto while12_test18 
  while12_handlers21:
    .get_results ($P5024)
    pop_upto_eh $P5024
    getattribute $P5024, $P5024, 'type'
    eq $P5024, .CONTROL_LOOP_NEXT, while12_test18
    eq $P5024, .CONTROL_LOOP_REDO, while12_redo20
  while12_done22:
    pop_eh 
.annotate 'line', 151
    nqp_get_sc_object $P5007, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 156
    repr_get_attr_obj $P5008, $P101, $P5007, "$!result_set"
    nqp_get_sc_object $P5009, "27420382D80CEF05775E7415279171A93892A1F1-1372810242.10453", 14
    perl6_container_store $P5008, $P5009
.annotate 'line', 152

    nqp_get_sc_object $P5007, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 156
    repr_get_attr_obj $P5008, $P101, $P5007, "$!mysql_client"
    $P5009 = "&mysql_query"($P5008, $P107)
    perl6_container_store $P108, $P5009
    $P5007 = $P101."mysql_warning_count"()
    $P5008 = $P5007."item"()
.annotate 'line', 153
    nqp_get_sc_object $P5009, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 156
    repr_get_attr_obj $P5010, $P101, $P5009, "$!mysql_client"
    $P5011 = "&mysql_warning_count"($P5010)
    perl6_container_store $P5008, $P5011
.annotate 'line', 154
    nqp_get_sc_object $P5008, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 210
    nqp_get_sc_object $P5009, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 156
    $P5010 = $P101."dispatch:<!>"($P5008, $P5009)
    perl6ize_type $P5007, $P5010
.annotate 'line', 155
    nqp_get_sc_object $P5009, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 174
    find_lex $P5008, "&infix:<!=>"
    perl6_multi_dispatch_thunk $P5007, $P5008
    $P5010 = $P5007($P108, $P5009)
    unless $P5010 goto if17_else37 
    .const 'Sub' $P5011 = 'cuid_33_1372810566.31755' 
    capture_lex $P5011
    $P5012 = $P5011()
    goto if17_end38
  if17_else37:
    find_lex $P5013, "Nil"
  if17_end38:
.annotate 'line', 159

    $P5008 = $P101."rows"()
    perl6ize_type $P5007, $P5008
    perl6_container_store $P109, $P5007
.annotate 'line', 160
    nqp_get_sc_object $P5009, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 174
    find_lex $P5008, "&infix:<==>"
    perl6_multi_dispatch_thunk $P5007, $P5008
    $P5010 = $P5007($P109, $P5009)
    unless $P5010 goto if18_else39 
    nqp_get_sc_object $P5011, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 215
    set $P5012, $P5011
    goto if18_end40
  if18_else39:
    set $P5012, $P109
  if18_end40:
    $P5013 = "&return"($P5012)
    perl6_decontainerize_return_value $P5006, $P5013
    goto lexotic_17
  lexotic_16:
    .get_results ($P5006)
  lexotic_17:
    find_lex $P5007, "&EXHAUST"
    store_lex "RETURN", $P5007
    nqp_get_sc_object $P5008, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 189
    perl6_type_check_return_value $P5006, $P5008
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_29_1372810566.31755") :anon :lex :outer("cuid_28_1372810566.31755")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/DBDish/mysql.pm6"
.annotate 'line', 141
    .param pmc CALL_SIG :call_sig 
    .const 'Sub' $P5005 = 'cuid_30_1372810566.31755' 
    capture_lex $P5005 
    .const 'Sub' $P5005 = 'cuid_31_1372810566.31755' 
    capture_lex $P5005 
    .const 'Sub' $P5005 = 'cuid_32_1372810566.31755' 
    capture_lex $P5005 
    .lex "$_", $P101 
    .lex "$param", $P102 
    .lex "call_sig", $P103 
    .lex "$*DISPATCHER", $P104 
    .local pmc old_topic_1 
    .local pmc sm_result_1 
    perl6_take_dispatcher 
    .const 'Sub' $P5002 = 'cuid_30_1372810566.31755' 
    capture_lex $P5002
    set $P5003, CALL_SIG
    set $P103, $P5003
    bind_signature 
.annotate 'line', 142

    find_lex $P5006, "@params"
    $P5007 = $P5006."shift"()
    perl6ize_type $P5005, $P5007
    perl6_container_store $P102, $P5005
    find_lex $P5005, "$_"
    set old_topic_1, $P5005
.annotate 'line', 143

    store_lex "$_", $P102
    nqp_get_sc_object $P5006, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 197
    $P5007 = $P5006."clone"()
    perl6_capture_lex $P5007
    find_lex $P5008, "$_"
    $P5009 = $P5007."ACCEPTS"($P5008)
    set sm_result_1, $P5009
    store_lex "$_", old_topic_1
    unless sm_result_1 goto if16_else35 
    .const 'Sub' $P5005 = 'cuid_31_1372810566.31755' 
    capture_lex $P5005
    $P5006 = $P5005()
    set $P5009, $P5006
    goto if16_end36
  if16_else35:
    .const 'Sub' $P5007 = 'cuid_32_1372810566.31755' 
    capture_lex $P5007
    $P5008 = $P5007()
    set $P5009, $P5008
  if16_end36:
    .return ($P5009) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_30_1372810566.31755") :anon :lex :outer("cuid_29_1372810566.31755")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/DBDish/mysql.pm6"
.annotate 'line', 143
    .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 rx14_tgt
    .local int rx14_pos
    .local int rx14_off
    .local int rx14_eos
    .local int rx14_rep
    .local pmc rx14_cur
    .local pmc rx14_curclass
    .local pmc rx14_bstack
    .local pmc rx14_cstack
    (rx14_cur, rx14_tgt, rx14_pos, rx14_curclass, rx14_bstack, $I19) = self."!cursor_start"()
    store_lex unicode:"$\x{a2}", rx14_cur
    length rx14_eos, rx14_tgt
    eq $I19, 1, rx14_restart27
    gt rx14_pos, rx14_eos, rx14_fail28
    repr_get_attr_int $I11, self, rx14_curclass, "$!from"
    ne $I11, -1, rxscan15_done34
    goto rxscan15_scan33
  rxscan15_loop32:
    inc rx14_pos
    gt rx14_pos, rx14_eos, rx14_fail28
    repr_bind_attr_int rx14_cur, rx14_curclass, "$!from", rx14_pos
  rxscan15_scan33:
    nqp_rxmark rx14_bstack, rxscan15_loop32, rx14_pos, 0
  rxscan15_done34:
    ge rx14_pos, rx14_eos, rx14_fail28
    substr $S11, rx14_tgt, rx14_pos, 1
    index $I11, ucs4:"0123456789.", $S11
    ge $I11, 0, rx14_fail28
    inc rx14_pos
    rx14_cur."!cursor_pass"(rx14_pos, 'backtrack'=>1)
    .return (rx14_cur)
  rx14_restart27:
    repr_get_attr_obj rx14_cstack, rx14_cur, rx14_curclass, "$!cstack"
  rx14_fail28:
    unless rx14_bstack, rx14_done26
    pop $I19, rx14_bstack
    if_null rx14_cstack, rx14_cstack_done31
    unless rx14_cstack, rx14_cstack_done31
    dec $I19
    set $P11, rx14_cstack[$I19]
  rx14_cstack_done31:
    pop rx14_rep, rx14_bstack
    pop rx14_pos, rx14_bstack
    pop $I19, rx14_bstack
    lt rx14_pos, -1, rx14_done26
    lt rx14_pos, 0, rx14_fail28
    eq $I19, 0, rx14_fail28
    nqp_islist $I20, rx14_cstack
    unless $I20, rx14_jump29
    elements $I18, rx14_bstack
    le $I18, 0, rx14_cut30
    dec $I18
    set $I18, rx14_bstack[$I18]
  rx14_cut30:
    assign rx14_cstack, $I18
  rx14_jump29:
    jump $I19
  rx14_done26:
    rx14_cur."!cursor_fail"()
    .return (rx14_cur) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_31_1372810566.31755") :anon :lex :outer("cuid_29_1372810566.31755")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/DBDish/mysql.pm6"
.annotate 'line', 143
    .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', 144
    find_lex $P5004, "$statement"
    nqp_get_sc_object $P5005, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 204
    nqp_get_sc_object $P5006, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 193
    find_lex $P5008, "self"
    find_lex $P5010, "$param"
    $P5011 = $P5010."Str"()
    perl6ize_type $P5009, $P5011
    $P5012 = $P5008."quote"($P5009)
    perl6ize_type $P5007, $P5012
    $P5013 = $P5004."dispatch:<.=>"($P5005, $P5006, $P5007)
    .return ($P5013) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_32_1372810566.31755") :anon :lex :outer("cuid_29_1372810566.31755")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/DBDish/mysql.pm6"
.annotate 'line', 146
    .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', 147
    find_lex $P5004, "$statement"
    nqp_get_sc_object $P5005, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 204
    nqp_get_sc_object $P5006, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 193
    find_lex $P5007, "$param"
    $P5008 = $P5004."dispatch:<.=>"($P5005, $P5006, $P5007)
    .return ($P5008) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_33_1372810566.31755") :anon :lex :outer("cuid_28_1372810566.31755")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/DBDish/mysql.pm6"
.annotate 'line', 155
    .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', 156
    find_lex $P5005, "self"
    nqp_get_sc_object $P5006, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 212
    nqp_get_sc_object $P5007, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 156
    find_lex $P5008, "self"
    nqp_get_sc_object $P5009, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 156
    repr_get_attr_obj $P5010, $P5008, $P5009, "$!mysql_client"
    $P5011 = "&mysql_error"($P5010)
    $P5012 = $P5005."dispatch:<!>"($P5006, $P5007, $P5011)
    perl6ize_type $P5004, $P5012
    .return ($P5004) 
.end
.HLL "perl6"
.namespace []
.sub "escape" :subid("cuid_34_1372810566.31755") :anon :lex :outer("cuid_25_1372810566.31755")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/DBDish/mysql.pm6"
.annotate 'line', 163
    .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 _inline_arg_1 
    perl6_take_dispatcher 
    set $P5005, CALL_SIG
    set $P107, $P5005
    bind_signature 
    root_new $P110, ['parrot';'Continuation']
    set_label $P110, lexotic_41
    .lex "RETURN", $P110
.annotate 'line', 165
.annotate 'line', 167
.annotate 'line', 166
    nqp_get_sc_object $P5008, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 223
    nqp_get_sc_object $P5009, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 224
    nqp_get_sc_object $P5010, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 225
    nqp_get_sc_object $P5011, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 174
    set _inline_arg_1, $P5011
    repr_unbox_int $I5001, _inline_arg_1
    chr $S5001, $I5001
    perl6_box_str $P5012, $S5001
    nqp_get_sc_object $P5013, "5C7C172868FA9510BA84BFF074E73D635E54D9D3", 7963
    perl6_type_check_return_value $P5012, $P5013
    nqp_get_sc_object $P5014, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 226
    nqp_get_sc_object $P5015, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 227
    $P5016 = "&infix:<,>"($P5008, $P5009, $P5010, $P5012, $P5014, $P5015)
    $P5017 = "&circumfix:<[ ]>"($P5016)
.annotate 'line', 167
    nqp_get_sc_object $P5018, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 228
    nqp_get_sc_object $P5019, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 229
    nqp_get_sc_object $P5020, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 230
    nqp_get_sc_object $P5021, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 231
    nqp_get_sc_object $P5022, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 232
    nqp_get_sc_object $P5023, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 233
    $P5024 = "&infix:<,>"($P5018, $P5019, $P5020, $P5021, $P5022, $P5023)
    $P5025 = "&circumfix:<[ ]>"($P5024)
    $P5026 = "&infix:<=>>"($P5017, $P5025)
    $P5027 = $P103."trans"($P5026)
    perl6ize_type $P5007, $P5027
    perl6_decontainerize_return_value $P5006, $P5007
    goto lexotic_42
  lexotic_41:
    .get_results ($P5006)
  lexotic_42:
    find_lex $P5007, "&EXHAUST"
    store_lex "RETURN", $P5007
    nqp_get_sc_object $P5008, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 221
    perl6_type_check_return_value $P5006, $P5008
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "quote" :subid("cuid_35_1372810566.31755") :anon :lex :outer("cuid_25_1372810566.31755")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/DBDish/mysql.pm6"
.annotate 'line', 170
    .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 
    root_new $P110, ['parrot';'Continuation']
    set_label $P110, lexotic_43
    .lex "RETURN", $P110
.annotate 'line', 171
    nqp_get_sc_object $P5011, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 223
    $P5013 = $P101."escape"($P103)
    perl6ize_type $P5012, $P5013
    find_lex $P5010, "&infix:<~>"
    perl6_multi_dispatch_thunk $P5009, $P5010
    $P5014 = $P5009($P5011, $P5012)
    nqp_get_sc_object $P5015, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 223
    find_lex $P5008, "&infix:<~>"
    perl6_multi_dispatch_thunk $P5007, $P5008
    $P5016 = $P5007($P5014, $P5015)
    perl6_decontainerize_return_value $P5006, $P5016
    goto lexotic_44
  lexotic_43:
    .get_results ($P5006)
  lexotic_44:
    find_lex $P5007, "&EXHAUST"
    store_lex "RETURN", $P5007
    nqp_get_sc_object $P5008, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 240
    perl6_type_check_return_value $P5006, $P5008
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "rows" :subid("cuid_39_1372810566.31755") :anon :lex :outer("cuid_25_1372810566.31755")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/DBDish/mysql.pm6"
.annotate 'line', 176
    .param pmc CALL_SIG :call_sig 
    .const 'Sub' $P5009 = 'cuid_36_1372810566.31755' 
    capture_lex $P5009 
    .const 'Sub' $P5009 = 'cuid_38_1372810566.31755' 
    capture_lex $P5009 
    .lex "self", $P101 
    .lex "%_", $P102 
    .lex "$_", $P103 
    .lex "$/", $P104 
    .lex "$!", $P105 
    .lex "call_sig", $P106 
    .lex "$*DISPATCHER", $P107 
    .lex "&?ROUTINE", $P108 
    .local pmc _inline_arg_2 
    .local pmc _inline_arg_3 
    perl6_take_dispatcher 
    set $P5005, CALL_SIG
    set $P106, $P5005
    bind_signature 
    root_new $P109, ['parrot';'Continuation']
    set_label $P109, lexotic_45
    .lex "RETURN", $P109
.annotate 'line', 177
    nqp_get_sc_object $P5007, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 156
    repr_get_attr_obj $P5008, $P101, $P5007, "$!affected_rows"
    set _inline_arg_2, $P5008
    $P5011 = _inline_arg_2."defined"()
    perl6ize_type $P5010, $P5011
    perl6_decontainerize_return_value $P5009, $P5010
    nqp_get_sc_object $P5010, "5C7C172868FA9510BA84BFF074E73D635E54D9D3", 1831
    perl6_type_check_return_value $P5009, $P5010
    if $P5009 goto unless19_end48 
    .const 'Sub' $P5011 = 'cuid_36_1372810566.31755' 
    capture_lex $P5011
    $P5012 = $P5011()
  unless19_end48:
.annotate 'line', 185
    nqp_get_sc_object $P5007, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 156
    repr_get_attr_obj $P5008, $P101, $P5007, "$!affected_rows"
    set _inline_arg_3, $P5008
    $P5011 = _inline_arg_3."defined"()
    perl6ize_type $P5010, $P5011
    perl6_decontainerize_return_value $P5009, $P5010
    nqp_get_sc_object $P5010, "5C7C172868FA9510BA84BFF074E73D635E54D9D3", 1831
    perl6_type_check_return_value $P5009, $P5010
    unless $P5009 goto if21_else51 
    .const 'Sub' $P5011 = 'cuid_38_1372810566.31755' 
    capture_lex $P5011
    $P5012 = $P5011()
    set $P5014, $P5012
    goto if21_end52
  if21_else51:
    find_lex $P5013, "Nil"
    set $P5014, $P5013
  if21_end52:
    perl6_decontainerize_return_value $P5006, $P5014
    goto lexotic_46
  lexotic_45:
    .get_results ($P5006)
  lexotic_46:
    find_lex $P5007, "&EXHAUST"
    store_lex "RETURN", $P5007
    nqp_get_sc_object $P5008, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 248
    perl6_type_check_return_value $P5006, $P5008
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_36_1372810566.31755") :anon :lex :outer("cuid_39_1372810566.31755")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/DBDish/mysql.pm6"
.annotate 'line', 177
    .param pmc CALL_SIG :call_sig 
    .const 'Sub' $P5004 = 'cuid_37_1372810566.31755' 
    capture_lex $P5004 
    .lex "$_", $P101 
    .lex "$errstr", $P102 
    .lex "call_sig", $P103 
    .lex "$*DISPATCHER", $P104 
    perl6_take_dispatcher 
    set $P5002, CALL_SIG
    set $P103, $P5002
    bind_signature 
.annotate 'line', 178
    find_lex $P5005, "self"
    nqp_get_sc_object $P5006, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 210
    nqp_get_sc_object $P5007, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 156
    $P5008 = $P5005."dispatch:<!>"($P5006, $P5007)
    perl6ize_type $P5004, $P5008
.annotate 'line', 179
    find_lex $P5004, "self"
    nqp_get_sc_object $P5005, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 156
    repr_get_attr_obj $P5006, $P5004, $P5005, "$!affected_rows"
    find_lex $P5007, "self"
    nqp_get_sc_object $P5008, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 156
    repr_get_attr_obj $P5009, $P5007, $P5008, "$!mysql_client"
    $P5010 = "&mysql_affected_rows"($P5009)
    perl6_container_store $P5006, $P5010
.annotate 'line', 180

    find_lex $P5004, "self"
    nqp_get_sc_object $P5005, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 156
    repr_get_attr_obj $P5006, $P5004, $P5005, "$!mysql_client"
    $P5007 = "&mysql_error"($P5006)
    perl6_container_store $P102, $P5007
.annotate 'line', 182
    nqp_get_sc_object $P5006, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 252
    find_lex $P5005, "&infix:<ne>"
    perl6_multi_dispatch_thunk $P5004, $P5005
    $P5007 = $P5004($P102, $P5006)
    unless $P5007 goto if20_else49 
    .const 'Sub' $P5008 = 'cuid_37_1372810566.31755' 
    capture_lex $P5008
    $P5009 = $P5008()
    set $P5011, $P5009
    goto if20_end50
  if20_else49:
    find_lex $P5010, "Nil"
    set $P5011, $P5010
  if20_end50:
    .return ($P5011) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_37_1372810566.31755") :anon :lex :outer("cuid_36_1372810566.31755")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/DBDish/mysql.pm6"
.annotate 'line', 182
    .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 $P5005, "self"
    nqp_get_sc_object $P5006, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 212
    nqp_get_sc_object $P5007, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 156
    find_lex $P5008, "$errstr"
    $P5009 = $P5005."dispatch:<!>"($P5006, $P5007, $P5008)
    perl6ize_type $P5004, $P5009
    .return ($P5004) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_38_1372810566.31755") :anon :lex :outer("cuid_39_1372810566.31755")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/DBDish/mysql.pm6"
.annotate 'line', 185
    .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', 186
    find_lex $P5004, "self"
    nqp_get_sc_object $P5005, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 156
    repr_get_attr_obj $P5006, $P5004, $P5005, "$!affected_rows"
    $P5007 = "&return"($P5006)
    .return ($P5007) 
.end
.HLL "perl6"
.namespace []
.sub "fetchrow" :subid("cuid_40_1372810566.31755") :anon :lex :outer("cuid_25_1372810566.31755")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/DBDish/mysql.pm6"
.annotate 'line', 190
    .param pmc CALL_SIG :call_sig 
    .const 'Sub' $P5009 = 'cuid_41_1372810566.31755' 
    capture_lex $P5009 
    .const 'Sub' $P5009 = 'cuid_42_1372810566.31755' 
    capture_lex $P5009 
    .lex "self", $P101 
    .lex "%_", $P102 
    .lex "$_", $P103 
    .lex "$/", $P104 
    .lex "$!", $P105 
    .lex "@row_array", $P106 
    .lex "call_sig", $P107 
    .lex "$*DISPATCHER", $P108 
    .lex "&?ROUTINE", $P109 
    .local pmc _inline_arg_4 
    .local pmc _inline_arg_5 
    perl6_take_dispatcher 
    set $P5005, CALL_SIG
    set $P107, $P5005
    bind_signature 
    root_new $P110, ['parrot';'Continuation']
    set_label $P110, lexotic_53
    .lex "RETURN", $P110
.annotate 'line', 193
    nqp_get_sc_object $P5007, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 156
    repr_get_attr_obj $P5008, $P101, $P5007, "$!result_set"
    set _inline_arg_4, $P5008
    $P5011 = _inline_arg_4."defined"()
    perl6ize_type $P5010, $P5011
    perl6_decontainerize_return_value $P5009, $P5010
    nqp_get_sc_object $P5010, "5C7C172868FA9510BA84BFF074E73D635E54D9D3", 1831
    perl6_type_check_return_value $P5009, $P5010
    if $P5009 goto unless22_end56 
    .const 'Sub' $P5011 = 'cuid_41_1372810566.31755' 
    capture_lex $P5011
    $P5012 = $P5011()
  unless22_end56:
.annotate 'line', 198
    nqp_get_sc_object $P5007, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 156
    repr_get_attr_obj $P5008, $P101, $P5007, "$!result_set"
    set _inline_arg_5, $P5008
    $P5011 = _inline_arg_5."defined"()
    perl6ize_type $P5010, $P5011
    perl6_decontainerize_return_value $P5009, $P5010
    nqp_get_sc_object $P5010, "5C7C172868FA9510BA84BFF074E73D635E54D9D3", 1831
    perl6_type_check_return_value $P5009, $P5010
    unless $P5009 goto if23_else57 
    .const 'Sub' $P5011 = 'cuid_42_1372810566.31755' 
    capture_lex $P5011
    $P5012 = $P5011()
    goto if23_end58
  if23_else57:
    find_lex $P5013, "Nil"
  if23_end58:
.annotate 'line', 214
    $P5007 = "&return"($P106)
    perl6_decontainerize_return_value $P5006, $P5007
    goto lexotic_54
  lexotic_53:
    .get_results ($P5006)
  lexotic_54:
    find_lex $P5007, "&EXHAUST"
    store_lex "RETURN", $P5007
    nqp_get_sc_object $P5008, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 263
    perl6_type_check_return_value $P5006, $P5008
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_41_1372810566.31755") :anon :lex :outer("cuid_40_1372810566.31755")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/DBDish/mysql.pm6"
.annotate 'line', 193
    .param pmc CALL_SIG :call_sig 
    .lex "$_", $P101 
    .lex "call_sig", $P102 
    .lex "$*DISPATCHER", $P103 
    perl6_take_dispatcher 
    set $P5002, CALL_SIG
    set $P102, $P5002
    bind_signature 
.annotate 'line', 194
    find_lex $P5004, "self"
    nqp_get_sc_object $P5005, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 156
    repr_get_attr_obj $P5006, $P5004, $P5005, "$!result_set"
    find_lex $P5007, "self"
    nqp_get_sc_object $P5008, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 156
    repr_get_attr_obj $P5009, $P5007, $P5008, "$!mysql_client"
    $P5010 = "&mysql_use_result"($P5009)
    perl6_container_store $P5006, $P5010
.annotate 'line', 195
    find_lex $P5004, "self"
    nqp_get_sc_object $P5005, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 156
    repr_get_attr_obj $P5006, $P5004, $P5005, "$!field_count"
    find_lex $P5007, "self"
    nqp_get_sc_object $P5008, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 156
    repr_get_attr_obj $P5009, $P5007, $P5008, "$!mysql_client"
    $P5010 = "&mysql_field_count"($P5009)
    perl6_container_store $P5006, $P5010
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_42_1372810566.31755") :anon :lex :outer("cuid_40_1372810566.31755")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/DBDish/mysql.pm6"
.annotate 'line', 198
    .param pmc CALL_SIG :call_sig 
    .const 'Sub' $P5004 = 'cuid_43_1372810566.31755' 
    capture_lex $P5004 
    .const 'Sub' $P5004 = 'cuid_44_1372810566.31755' 
    capture_lex $P5004 
    .const 'Sub' $P5004 = 'cuid_46_1372810566.31755' 
    capture_lex $P5004 
    .lex "$_", $P101 
    .lex "$native_row", $P102 
    .lex "$errstr", $P103 
    .lex "call_sig", $P104 
    .lex "$*DISPATCHER", $P105 
    perl6_take_dispatcher 
    set $P5002, CALL_SIG
    set $P104, $P5002
    bind_signature 
.annotate 'line', 200
    find_lex $P5005, "self"
    nqp_get_sc_object $P5006, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 210
    nqp_get_sc_object $P5007, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 156
    $P5008 = $P5005."dispatch:<!>"($P5006, $P5007)
    perl6ize_type $P5004, $P5008
.annotate 'line', 202

    find_lex $P5004, "self"
    nqp_get_sc_object $P5005, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 156
    repr_get_attr_obj $P5006, $P5004, $P5005, "$!result_set"
    $P5007 = "&mysql_fetch_row"($P5006)
    perl6_container_store $P102, $P5007
.annotate 'line', 203

    find_lex $P5004, "self"
    nqp_get_sc_object $P5005, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 156
    repr_get_attr_obj $P5006, $P5004, $P5005, "$!mysql_client"
    $P5007 = "&mysql_error"($P5006)
    perl6_container_store $P103, $P5007
.annotate 'line', 205
    nqp_get_sc_object $P5006, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 252
    find_lex $P5005, "&infix:<ne>"
    perl6_multi_dispatch_thunk $P5004, $P5005
    $P5007 = $P5004($P103, $P5006)
    unless $P5007 goto if24_else59 
    .const 'Sub' $P5008 = 'cuid_43_1372810566.31755' 
    capture_lex $P5008
    $P5009 = $P5008()
    goto if24_end60
  if24_else59:
    find_lex $P5010, "Nil"
  if24_end60:
.annotate 'line', 207

    unless $P102 goto if25_else61 
    .const 'Sub' $P5004 = 'cuid_44_1372810566.31755' 
    capture_lex $P5004
    $P5005 = $P5004()
    set $P5008, $P5005
    goto if25_end62
  if25_else61:
    .const 'Sub' $P5006 = 'cuid_46_1372810566.31755' 
    capture_lex $P5006
    $P5007 = $P5006()
    set $P5008, $P5007
  if25_end62:
    .return ($P5008) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_43_1372810566.31755") :anon :lex :outer("cuid_42_1372810566.31755")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/DBDish/mysql.pm6"
.annotate 'line', 205
    .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 $P5005, "self"
    nqp_get_sc_object $P5006, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 212
    nqp_get_sc_object $P5007, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 156
    find_lex $P5008, "$errstr"
    $P5009 = $P5005."dispatch:<!>"($P5006, $P5007, $P5008)
    perl6ize_type $P5004, $P5009
    .return ($P5004) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_44_1372810566.31755") :anon :lex :outer("cuid_42_1372810566.31755")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/DBDish/mysql.pm6"
.annotate 'line', 207
    .param pmc CALL_SIG :call_sig 
    .const 'Sub' $P5004 = 'cuid_45_1372810566.31755' 
    capture_lex $P5004 
    .lex "$_", $P101 
    .lex "$i", $P102 
    .lex "call_sig", $P103 
    .lex "$*DISPATCHER", $P104 
    perl6_take_dispatcher 
    set $P5002, CALL_SIG
    set $P103, $P5002
    bind_signature 
.annotate 'line', 208
    nqp_get_sc_object $P5004, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 174
    perl6_container_store $P102, $P5004
    new $P5017, 'ExceptionHandler', [.CONTROL_LOOP_NEXT;.CONTROL_LOOP_REDO;.CONTROL_LOOP_LAST]
    set_label $P5017, while26_handlers66
    push_eh $P5017
  while26_test63:
    find_lex $P5007, "self"
    nqp_get_sc_object $P5008, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 156
    repr_get_attr_obj $P5009, $P5007, $P5008, "$!field_count"
    find_lex $P5006, "&infix:<<>"
    perl6_multi_dispatch_thunk $P5005, $P5006
    $P5010 = $P5005($P102, $P5009)
    set $P5016, $P5010
    unless $P5010 goto while26_done67 
  while26_redo65:
    .const 'Sub' $P5011 = 'cuid_45_1372810566.31755' 
    capture_lex $P5011
    $P5012 = $P5011()
    set $P5016, $P5012
  while26_next64:
    find_lex $P5014, "&postfix:<++>"
    perl6_multi_dispatch_thunk $P5013, $P5014
    $P5015 = $P5013($P102)
    goto while26_test63 
  while26_handlers66:
    .get_results ($P5017)
    pop_upto_eh $P5017
    getattribute $P5017, $P5017, 'type'
    eq $P5017, .CONTROL_LOOP_NEXT, while26_next64
    eq $P5017, .CONTROL_LOOP_REDO, while26_redo65
  while26_done67:
    pop_eh 
    .return ($P5016) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_45_1372810566.31755") :anon :lex :outer("cuid_44_1372810566.31755")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/DBDish/mysql.pm6"
.annotate 'line', 208
    .lex "$_", $P101 
.annotate 'line', 209
    find_lex $P5003, "@row_array"
    find_lex $P5005, "$native_row"
    find_lex $P5006, "$i"
    $P5007 = $P5005."postcircumfix:<[ ]>"($P5006)
    perl6ize_type $P5004, $P5007
    $P5008 = $P5003."push"($P5004)
    perl6ize_type $P5002, $P5008
    .return ($P5002) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_46_1372810566.31755") :anon :lex :outer("cuid_42_1372810566.31755")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/DBDish/mysql.pm6"
.annotate 'line', 212
    .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 $P5005, "self"
    $P5006 = $P5005."finish"()
    perl6ize_type $P5004, $P5006
    .return ($P5004) 
.end
.HLL "perl6"
.namespace []
.sub "column_names" :subid("cuid_50_1372810566.31755") :anon :lex :outer("cuid_25_1372810566.31755")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/DBDish/mysql.pm6"
.annotate 'line', 216
    .param pmc CALL_SIG :call_sig 
    .const 'Sub' $P5009 = 'cuid_48_1372810566.31755' 
    capture_lex $P5009 
    .lex "self", $P101 
    .lex "%_", $P102 
    .lex "$_", $P103 
    .lex "$/", $P104 
    .lex "$!", $P105 
    .lex "call_sig", $P106 
    .lex "$*DISPATCHER", $P107 
    .lex "&?ROUTINE", $P108 
    perl6_take_dispatcher 
    set $P5005, CALL_SIG
    set $P106, $P5005
    bind_signature 
    root_new $P109, ['parrot';'Continuation']
    set_label $P109, lexotic_68
    .lex "RETURN", $P109
.annotate 'line', 217
    nqp_get_sc_object $P5007, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 156
    repr_get_attr_obj $P5008, $P101, $P5007, "@!column_names"
    if $P5008 goto unless27_end71 
    .const 'Sub' $P5009 = 'cuid_48_1372810566.31755' 
    capture_lex $P5009
    $P5010 = $P5009()
  unless27_end71:
.annotate 'line', 228
    nqp_get_sc_object $P5007, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 156
    repr_get_attr_obj $P5008, $P101, $P5007, "@!column_names"
    perl6_decontainerize_return_value $P5006, $P5008
    goto lexotic_69
  lexotic_68:
    .get_results ($P5006)
  lexotic_69:
    find_lex $P5007, "&EXHAUST"
    store_lex "RETURN", $P5007
    nqp_get_sc_object $P5008, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 287
    perl6_type_check_return_value $P5006, $P5008
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_48_1372810566.31755") :anon :lex :outer("cuid_50_1372810566.31755")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/DBDish/mysql.pm6"
.annotate 'line', 217
    .param pmc CALL_SIG :call_sig 
    .const 'Sub' $P5004 = 'cuid_47_1372810566.31755' 
    capture_lex $P5004 
    .const 'Sub' $P5004 = 'cuid_49_1372810566.31755' 
    capture_lex $P5004 
    .lex "$_", $P101 
    .lex "$i", $P102 
    .lex "call_sig", $P103 
    .lex "$*DISPATCHER", $P104 
    .local pmc _inline_arg_6 
    perl6_take_dispatcher 
    set $P5002, CALL_SIG
    set $P103, $P5002
    bind_signature 
.annotate 'line', 218
    find_lex $P5004, "self"
    nqp_get_sc_object $P5005, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 156
    repr_get_attr_obj $P5006, $P5004, $P5005, "$!result_set"
    set _inline_arg_6, $P5006
    $P5009 = _inline_arg_6."defined"()
    perl6ize_type $P5008, $P5009
    perl6_decontainerize_return_value $P5007, $P5008
    nqp_get_sc_object $P5008, "5C7C172868FA9510BA84BFF074E73D635E54D9D3", 1831
    perl6_type_check_return_value $P5007, $P5008
    if $P5007 goto unless28_end73 
    .const 'Sub' $P5009 = 'cuid_47_1372810566.31755' 
    capture_lex $P5009
    $P5010 = $P5009()
  unless28_end73:
.annotate 'line', 222
    nqp_get_sc_object $P5004, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 174
    perl6_container_store $P102, $P5004
    new $P5017, 'ExceptionHandler', [.CONTROL_LOOP_NEXT;.CONTROL_LOOP_REDO;.CONTROL_LOOP_LAST]
    set_label $P5017, while29_handlers77
    push_eh $P5017
  while29_test74:
    find_lex $P5007, "self"
    nqp_get_sc_object $P5008, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 156
    repr_get_attr_obj $P5009, $P5007, $P5008, "$!field_count"
    find_lex $P5006, "&infix:<<>"
    perl6_multi_dispatch_thunk $P5005, $P5006
    $P5010 = $P5005($P102, $P5009)
    set $P5016, $P5010
    unless $P5010 goto while29_done78 
  while29_redo76:
    .const 'Sub' $P5011 = 'cuid_49_1372810566.31755' 
    capture_lex $P5011
    $P5012 = $P5011()
    set $P5016, $P5012
  while29_next75:
    find_lex $P5014, "&postfix:<++>"
    perl6_multi_dispatch_thunk $P5013, $P5014
    $P5015 = $P5013($P102)
    goto while29_test74 
  while29_handlers77:
    .get_results ($P5017)
    pop_upto_eh $P5017
    getattribute $P5017, $P5017, 'type'
    eq $P5017, .CONTROL_LOOP_NEXT, while29_next75
    eq $P5017, .CONTROL_LOOP_REDO, while29_redo76
  while29_done78:
    pop_eh 
    .return ($P5016) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_47_1372810566.31755") :anon :lex :outer("cuid_48_1372810566.31755")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/DBDish/mysql.pm6"
.annotate 'line', 218
    .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', 219
    find_lex $P5004, "self"
    nqp_get_sc_object $P5005, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 156
    repr_get_attr_obj $P5006, $P5004, $P5005, "$!result_set"
    find_lex $P5007, "self"
    nqp_get_sc_object $P5008, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 156
    repr_get_attr_obj $P5009, $P5007, $P5008, "$!mysql_client"
    $P5010 = "&mysql_use_result"($P5009)
    perl6_container_store $P5006, $P5010
.annotate 'line', 220
    find_lex $P5004, "self"
    nqp_get_sc_object $P5005, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 156
    repr_get_attr_obj $P5006, $P5004, $P5005, "$!field_count"
    find_lex $P5007, "self"
    nqp_get_sc_object $P5008, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 156
    repr_get_attr_obj $P5009, $P5007, $P5008, "$!mysql_client"
    $P5010 = "&mysql_field_count"($P5009)
    perl6_container_store $P5006, $P5010
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_49_1372810566.31755") :anon :lex :outer("cuid_48_1372810566.31755")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/DBDish/mysql.pm6"
.annotate 'line', 222
    .lex "$_", $P101 
    .lex "$field_info", $P102 
    .lex "$column_name", $P103 
.annotate 'line', 223

    find_lex $P5002, "self"
    nqp_get_sc_object $P5003, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 156
    repr_get_attr_obj $P5004, $P5002, $P5003, "$!result_set"
    $P5005 = "&mysql_fetch_field"($P5004)
    perl6_container_store $P102, $P5005
.annotate 'line', 224

    nqp_get_sc_object $P5003, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 174
    $P5004 = $P102."postcircumfix:<[ ]>"($P5003)
    perl6ize_type $P5002, $P5004
    perl6_container_store $P103, $P5002
.annotate 'line', 225
    find_lex $P5003, "self"
    nqp_get_sc_object $P5004, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 156
    repr_get_attr_obj $P5005, $P5003, $P5004, "@!column_names"
    $P5006 = $P5005."push"($P103)
    perl6ize_type $P5002, $P5006
    .return ($P5002) 
.end
.HLL "perl6"
.namespace []
.sub "mysql_insertid" :subid("cuid_51_1372810566.31755") :anon :lex :outer("cuid_25_1372810566.31755")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/DBDish/mysql.pm6"
.annotate 'line', 231
    .param pmc CALL_SIG :call_sig 
    .lex "self", $P101 
    .lex "%_", $P102 
    .lex "$_", $P103 
    .lex "$/", $P104 
    .lex "$!", $P105 
    .lex "call_sig", $P106 
    .lex "$*DISPATCHER", $P107 
    .lex "&?ROUTINE", $P108 
    perl6_take_dispatcher 
    set $P5005, CALL_SIG
    set $P106, $P5005
    bind_signature 
    root_new $P109, ['parrot';'Continuation']
    set_label $P109, lexotic_79
    .lex "RETURN", $P109
.annotate 'line', 232
    nqp_get_sc_object $P5007, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 156
    repr_get_attr_obj $P5008, $P101, $P5007, "$!mysql_client"
    $P5009 = "&mysql_insert_id"($P5008)
    perl6_decontainerize_return_value $P5006, $P5009
    goto lexotic_80
  lexotic_79:
    .get_results ($P5006)
  lexotic_80:
    find_lex $P5007, "&EXHAUST"
    store_lex "RETURN", $P5007
    nqp_get_sc_object $P5008, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 304
    perl6_type_check_return_value $P5006, $P5008
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "finish" :subid("cuid_53_1372810566.31755") :anon :lex :outer("cuid_25_1372810566.31755")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/DBDish/mysql.pm6"
.annotate 'line', 236
    .param pmc CALL_SIG :call_sig 
    .const 'Sub' $P5009 = 'cuid_52_1372810566.31755' 
    capture_lex $P5009 
    .lex "self", $P101 
    .lex "%_", $P102 
    .lex "$_", $P103 
    .lex "$/", $P104 
    .lex "$!", $P105 
    .lex "call_sig", $P106 
    .lex "$*DISPATCHER", $P107 
    .lex "&?ROUTINE", $P108 
    .local pmc _inline_arg_7 
    perl6_take_dispatcher 
    set $P5005, CALL_SIG
    set $P106, $P5005
    bind_signature 
    root_new $P109, ['parrot';'Continuation']
    set_label $P109, lexotic_81
    .lex "RETURN", $P109
.annotate 'line', 237
    nqp_get_sc_object $P5007, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 156
    repr_get_attr_obj $P5008, $P101, $P5007, "$!result_set"
    set _inline_arg_7, $P5008
    $P5011 = _inline_arg_7."defined"()
    perl6ize_type $P5010, $P5011
    perl6_decontainerize_return_value $P5009, $P5010
    nqp_get_sc_object $P5010, "5C7C172868FA9510BA84BFF074E73D635E54D9D3", 1831
    perl6_type_check_return_value $P5009, $P5010
    unless $P5009 goto if30_else83 
    .const 'Sub' $P5011 = 'cuid_52_1372810566.31755' 
    capture_lex $P5011
    $P5012 = $P5011()
    goto if30_end84
  if30_else83:
    find_lex $P5013, "Nil"
  if30_end84:
.annotate 'line', 242
    perl6_booleanize $P5007, 1
    $P5008 = "&return"($P5007)
    perl6_decontainerize_return_value $P5006, $P5008
    goto lexotic_82
  lexotic_81:
    .get_results ($P5006)
  lexotic_82:
    find_lex $P5007, "&EXHAUST"
    store_lex "RETURN", $P5007
    nqp_get_sc_object $P5008, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 310
    perl6_type_check_return_value $P5006, $P5008
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_52_1372810566.31755") :anon :lex :outer("cuid_53_1372810566.31755")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/DBDish/mysql.pm6"
.annotate 'line', 237
    .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', 238
    find_lex $P5004, "self"
    nqp_get_sc_object $P5005, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 156
    repr_get_attr_obj $P5006, $P5004, $P5005, "$!result_set"
    "&mysql_free_result"($P5006)
.annotate 'line', 239
    find_lex $P5004, "self"
    nqp_get_sc_object $P5005, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 156
    repr_get_attr_obj $P5006, $P5004, $P5005, "$!result_set"
    nqp_get_sc_object $P5007, "27420382D80CEF05775E7415279171A93892A1F1-1372810242.10453", 14
    perl6_container_store $P5006, $P5007
.annotate 'line', 240
    find_lex $P5004, "self"
    nqp_get_sc_object $P5005, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 156
    repr_get_attr_obj $P5006, $P5004, $P5005, "@!column_names"
    nqp_get_sc_object $P5007, "27420382D80CEF05775E7415279171A93892A1F1-1372810242.10453", 14
    $P5008 = $P5006."STORE"($P5007)
    .return ($P5008) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_54_1372810566.31755") :anon :lex :outer("cuid_1_1372810566.31755")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/DBDish/mysql.pm6"
.annotate 'line', 246
    .const 'Sub' $P5013 = 'cuid_55_1372810566.31755' 
    capture_lex $P5013 
    .const 'Sub' $P5013 = 'cuid_56_1372810566.31755' 
    capture_lex $P5013 
    .const 'Sub' $P5013 = 'cuid_57_1372810566.31755' 
    capture_lex $P5013 
    .const 'Sub' $P5013 = 'cuid_58_1372810566.31755' 
    capture_lex $P5013 
    .const 'Sub' $P5013 = 'cuid_59_1372810566.31755' 
    capture_lex $P5013 
    .lex "$?PACKAGE", $P101 
    .lex "::?PACKAGE", $P102 
    .lex "$?CLASS", $P103 
    .lex "::?CLASS", $P104 
    .lex "$_", $P105 
    .const 'Sub' $P5002 = 'cuid_55_1372810566.31755' 
    capture_lex $P5002
    .const 'Sub' $P5003 = 'cuid_56_1372810566.31755' 
    capture_lex $P5003
    .const 'Sub' $P5004 = 'cuid_57_1372810566.31755' 
    capture_lex $P5004
    .const 'Sub' $P5005 = 'cuid_58_1372810566.31755' 
    capture_lex $P5005
    .const 'Sub' $P5006 = 'cuid_59_1372810566.31755' 
    capture_lex $P5006
    null $P5007
    null $P5008
    null $P5009
    null $P5010
    nqp_get_sc_object $P5011, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 361
    $P5012 = $P5011."clone"()
    perl6_capture_lex $P5012
    .return ($P5012) 
.end
.HLL "perl6"
.namespace []
.sub "BUILD" :subid("cuid_55_1372810566.31755") :anon :lex :outer("cuid_54_1372810566.31755")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/DBDish/mysql.pm6"
.annotate 'line', 248
    .param pmc CALL_SIG :call_sig 
    .lex "self", $P101 
    .lex "%_", $P102 
    .lex "$_", $P103 
    .lex "$/", $P104 
    .lex "$!", $P105 
    .lex "call_sig", $P106 
    .lex "$*DISPATCHER", $P107 
    .lex "&?ROUTINE", $P108 
    perl6_take_dispatcher 
    set $P5005, CALL_SIG
    set $P106, $P5005
    bind_signature 
    root_new $P109, ['parrot';'Continuation']
    set_label $P109, lexotic_85
    .lex "RETURN", $P109
    find_lex $P5007, "Nil"
    perl6_decontainerize_return_value $P5006, $P5007
    goto lexotic_86
  lexotic_85:
    .get_results ($P5006)
  lexotic_86:
    find_lex $P5008, "&EXHAUST"
    store_lex "RETURN", $P5008
    nqp_get_sc_object $P5009, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 330
    perl6_type_check_return_value $P5006, $P5009
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "prepare" :subid("cuid_56_1372810566.31755") :anon :lex :outer("cuid_54_1372810566.31755")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/DBDish/mysql.pm6"
.annotate 'line', 249
    .param pmc CALL_SIG :call_sig 
    .lex "self", $P101 
    .lex "%_", $P102 
    .lex "$statement", $P103 
    .lex "$_", $P104 
    .lex "$/", $P105 
    .lex "$!", $P106 
    .lex "$statement_handle", $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_87
    .lex "RETURN", $P111
.annotate 'line', 251

    nqp_get_sc_object $P5008, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 156
.annotate 'line', 252
    nqp_get_sc_object $P5009, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 326
    repr_get_attr_obj $P5010, $P101, $P5009, "$!mysql_client"
.annotate 'line', 253

    $P5011 = $P101."RaiseError"()
    $P5012 = $P5011."item"()
    $P5013 = $P5008."new"($P5010 :named("mysql_client"), $P103 :named("statement"), $P5012 :named("RaiseError"))
    perl6ize_type $P5007, $P5013
    perl6_container_store $P107, $P5007
.annotate 'line', 256
    $P5007 = "&return"($P107)
    perl6_decontainerize_return_value $P5006, $P5007
    goto lexotic_88
  lexotic_87:
    .get_results ($P5006)
  lexotic_88:
    find_lex $P5007, "&EXHAUST"
    store_lex "RETURN", $P5007
    nqp_get_sc_object $P5008, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 337
    perl6_type_check_return_value $P5006, $P5008
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "mysql_insertid" :subid("cuid_57_1372810566.31755") :anon :lex :outer("cuid_54_1372810566.31755")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/DBDish/mysql.pm6"
.annotate 'line', 258
    .param pmc CALL_SIG :call_sig 
    .lex "self", $P101 
    .lex "%_", $P102 
    .lex "$_", $P103 
    .lex "$/", $P104 
    .lex "$!", $P105 
    .lex "call_sig", $P106 
    .lex "$*DISPATCHER", $P107 
    .lex "&?ROUTINE", $P108 
    perl6_take_dispatcher 
    set $P5005, CALL_SIG
    set $P106, $P5005
    bind_signature 
    root_new $P109, ['parrot';'Continuation']
    set_label $P109, lexotic_89
    .lex "RETURN", $P109
.annotate 'line', 259
    nqp_get_sc_object $P5007, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 326
    repr_get_attr_obj $P5008, $P101, $P5007, "$!mysql_client"
    $P5009 = "&mysql_insert_id"($P5008)
    perl6_decontainerize_return_value $P5006, $P5009
    goto lexotic_90
  lexotic_89:
    .get_results ($P5006)
  lexotic_90:
    find_lex $P5007, "&EXHAUST"
    store_lex "RETURN", $P5007
    nqp_get_sc_object $P5008, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 349
    perl6_type_check_return_value $P5006, $P5008
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "disconnect" :subid("cuid_58_1372810566.31755") :anon :lex :outer("cuid_54_1372810566.31755")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/DBDish/mysql.pm6"
.annotate 'line', 263
    .param pmc CALL_SIG :call_sig 
    .lex "self", $P101 
    .lex "%_", $P102 
    .lex "$_", $P103 
    .lex "$/", $P104 
    .lex "$!", $P105 
    .lex "call_sig", $P106 
    .lex "$*DISPATCHER", $P107 
    .lex "&?ROUTINE", $P108 
    perl6_take_dispatcher 
    set $P5005, CALL_SIG
    set $P106, $P5005
    bind_signature 
    root_new $P109, ['parrot';'Continuation']
    set_label $P109, lexotic_91
    .lex "RETURN", $P109
.annotate 'line', 264
    nqp_get_sc_object $P5007, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 326
    repr_get_attr_obj $P5008, $P101, $P5007, "$!mysql_client"
    "&mysql_close"($P5008)
    perl6_booleanize $P5007, 1
    perl6_decontainerize_return_value $P5006, $P5007
    goto lexotic_92
  lexotic_91:
    .get_results ($P5006)
  lexotic_92:
    find_lex $P5007, "&EXHAUST"
    store_lex "RETURN", $P5007
    nqp_get_sc_object $P5008, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 355
    perl6_type_check_return_value $P5006, $P5008
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "quote-identifer" :subid("cuid_59_1372810566.31755") :anon :lex :outer("cuid_54_1372810566.31755")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/DBDish/mysql.pm6"
.annotate 'line', 268
    .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_93
    .lex "RETURN", $P110
    nqp_get_sc_object $P5011, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 364
.annotate 'line', 269

    $P5012 = $P103."Stringy"()
    find_lex $P5010, "&infix:<~>"
    perl6_multi_dispatch_thunk $P5009, $P5010
    $P5013 = $P5009($P5011, $P5012)
    nqp_get_sc_object $P5014, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 364
    find_lex $P5008, "&infix:<~>"
    perl6_multi_dispatch_thunk $P5007, $P5008
    $P5015 = $P5007($P5013, $P5014)
    perl6_decontainerize_return_value $P5006, $P5015
    goto lexotic_94
  lexotic_93:
    .get_results ($P5006)
  lexotic_94:
    find_lex $P5007, "&EXHAUST"
    store_lex "RETURN", $P5007
    nqp_get_sc_object $P5008, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 361
    perl6_type_check_return_value $P5006, $P5008
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_60_1372810566.31755") :anon :lex :outer("cuid_1_1372810566.31755")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/DBDish/mysql.pm6"
.annotate 'line', 273
    .const 'Sub' $P5006 = 'cuid_61_1372810566.31755' 
    capture_lex $P5006 
    .const 'Sub' $P5006 = 'cuid_62_1372810566.31755' 
    capture_lex $P5006 
    .lex "$?PACKAGE", $P101 
    .lex "::?PACKAGE", $P102 
    .lex "$?CLASS", $P103 
    .lex "::?CLASS", $P104 
    .lex "$_", $P105 
    .const 'Sub' $P5002 = 'cuid_61_1372810566.31755' 
    capture_lex $P5002
    .const 'Sub' $P5003 = 'cuid_62_1372810566.31755' 
    capture_lex $P5003
    nqp_get_sc_object $P5004, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 390
    $P5005 = $P5004."clone"()
    perl6_capture_lex $P5005
    .return ($P5005) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_61_1372810566.31755") :anon :lex :outer("cuid_60_1372810566.31755")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/DBDish/mysql.pm6"
.annotate 'line', 275
    .param pmc CALL_SIG :call_sig 
    .lex "self", $P101 
    .lex "$_", $P102 
    .lex "call_sig", $P103 
    set $P5001, CALL_SIG
    set $P103, $P5001
    bind_signature 
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 384
    .return ($P5002) 
.end
.HLL "perl6"
.namespace []
.sub "connect" :subid("cuid_62_1372810566.31755") :anon :lex :outer("cuid_60_1372810566.31755")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/DBDish/mysql.pm6"
.annotate 'line', 278
    .param pmc CALL_SIG :call_sig 
    .const 'Sub' $P5008 = 'cuid_63_1372810566.31755' 
    capture_lex $P5008 
    .const 'Sub' $P5008 = 'cuid_64_1372810566.31755' 
    capture_lex $P5008 
    .const 'Sub' $P5008 = 'cuid_65_1372810566.31755' 
    capture_lex $P5008 
    .lex "self", $P101 
    .lex "$user", $P102 
    .lex "$password", $P103 
    .lex "$RaiseError", $P104 
    .lex "%params", $P105 
    .lex "$_", $P106 
    .lex "$/", $P107 
    .lex "$!", $P108 
    .lex "$mysql_client", $P109 
    .lex "$mysql_error", $P110 
    .lex "$host", $P111 
    .lex "$port", $P112 
    .lex "$database", $P113 
    .lex "$result", $P114 
    .lex "$error", $P115 
    .lex "$connection", $P116 
    .lex "call_sig", $P117 
    .lex "$*DISPATCHER", $P118 
    .lex "&?ROUTINE", $P119 
    .local pmc _inline_arg_8 
    perl6_take_dispatcher 
    set $P5004, CALL_SIG
    set $P117, $P5004
    bind_signature 
    root_new $P120, ['parrot';'Continuation']
    set_label $P120, lexotic_95
    .lex "RETURN", $P120
    "&infix:<,>"($P109, $P110)
.annotate 'line', 281
    set _inline_arg_8, $P109
    $P5008 = _inline_arg_8."defined"()
    perl6ize_type $P5007, $P5008
    perl6_decontainerize_return_value $P5006, $P5007
    nqp_get_sc_object $P5007, "5C7C172868FA9510BA84BFF074E73D635E54D9D3", 1831
    perl6_type_check_return_value $P5006, $P5007
    if $P5006 goto unless31_end98 
    .const 'Sub' $P5008 = 'cuid_63_1372810566.31755' 
    capture_lex $P5008
    $P5009 = $P5008()
  unless31_end98:
.annotate 'line', 285

    nqp_get_sc_object $P5008, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 400
    $P5009 = $P105."postcircumfix:<{ }>"($P5008)
    perl6ize_type $P5007, $P5009
    set $P5006, $P5007
    defined $I5001, $P5006
    if $I5001, defor99
    nqp_get_sc_object $P5010, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 401
    set $P5006, $P5010
  defor99:
    perl6_container_store $P111, $P5006
.annotate 'line', 286

    nqp_get_sc_object $P5009, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 403
    $P5010 = $P105."postcircumfix:<{ }>"($P5009)
    perl6ize_type $P5008, $P5010
    set $P5007, $P5008
    defined $I5001, $P5007
    if $I5001, defor100
    nqp_get_sc_object $P5011, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 174
    set $P5007, $P5011
  defor100:
    $P5012 = $P5007."Int"()
    perl6ize_type $P5006, $P5012
    perl6_container_store $P112, $P5006
.annotate 'line', 287

    nqp_get_sc_object $P5008, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 405
    $P5009 = $P105."postcircumfix:<{ }>"($P5008)
    perl6ize_type $P5007, $P5009
    set $P5006, $P5007
    defined $I5001, $P5006
    if $I5001, defor101
    nqp_get_sc_object $P5010, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 406
    set $P5006, $P5010
  defor101:
    perl6_container_store $P113, $P5006
.annotate 'line', 289

.annotate 'line', 290

    nqp_get_sc_object $P5006, "F0C5D5D740B8C88E1BA84F06EB3791FB38C35461", 250
    nqp_get_sc_object $P5007, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 174
    $P5008 = "&mysql_real_connect"($P109, $P111, $P102, $P103, $P113, $P112, $P5006, $P5007)
    perl6_container_store $P114, $P5008
.annotate 'line', 291

    $P5006 = "&mysql_error"($P109)
    perl6_container_store $P115, $P5006
.annotate 'line', 293
    nqp_get_sc_object $P5008, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 252
    find_lex $P5007, "&infix:<eq>"
    perl6_multi_dispatch_thunk $P5006, $P5007
    $P5009 = $P5006($P115, $P5008)
    unless $P5009 goto if32_else102 
    .const 'Sub' $P5010 = 'cuid_64_1372810566.31755' 
    capture_lex $P5010
    $P5011 = $P5010()
    goto if32_end103
  if32_else102:
    .const 'Sub' $P5012 = 'cuid_65_1372810566.31755' 
    capture_lex $P5012
    $P5013 = $P5012()
  if32_end103:
.annotate 'line', 302
    $P5006 = "&return"($P116)
    perl6_decontainerize_return_value $P5005, $P5006
    goto lexotic_96
  lexotic_95:
    .get_results ($P5005)
  lexotic_96:
    find_lex $P5006, "&EXHAUST"
    store_lex "RETURN", $P5006
    nqp_get_sc_object $P5007, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 390
    perl6_type_check_return_value $P5005, $P5007
    .return ($P5005) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_63_1372810566.31755") :anon :lex :outer("cuid_62_1372810566.31755")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/DBDish/mysql.pm6"
.annotate 'line', 281
    .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', 282
    find_lex $P5004, "$mysql_client"
    nqp_get_sc_object $P5005, "F0C5D5D740B8C88E1BA84F06EB3791FB38C35461", 250
    $P5006 = "&mysql_init"($P5005)
    perl6_container_store $P5004, $P5006
.annotate 'line', 283
    find_lex $P5004, "$mysql_error"
    find_lex $P5005, "$mysql_client"
    $P5006 = "&mysql_error"($P5005)
    perl6_container_store $P5004, $P5006
    .return ($P5004) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_64_1372810566.31755") :anon :lex :outer("cuid_62_1372810566.31755")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/DBDish/mysql.pm6"
.annotate 'line', 293
    .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', 294
    find_lex $P5004, "$connection"
    nqp_get_sc_object $P5006, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 326
.annotate 'line', 295
    find_lex $P5007, "$mysql_client"
.annotate 'line', 296
    find_lex $P5008, "$RaiseError"
    $P5009 = $P5006."new"($P5007 :named("mysql_client"), $P5008 :named("RaiseError"))
    perl6ize_type $P5005, $P5009
    perl6_container_store $P5004, $P5005
    .return ($P5004) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_65_1372810566.31755") :anon :lex :outer("cuid_62_1372810566.31755")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/DBDish/mysql.pm6"
.annotate 'line', 299
    .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', 300
    nqp_get_sc_object $P5008, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 413
    find_lex $P5009, "$error"
    $P5010 = $P5009."Stringy"()
    find_lex $P5007, "&infix:<~>"
    perl6_multi_dispatch_thunk $P5006, $P5007
    $P5011 = $P5006($P5008, $P5010)
    find_lex $P5005, "&die"
    perl6_multi_dispatch_thunk $P5004, $P5005
    $P5012 = $P5004($P5011)
    .return ($P5012) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_68_1372810566.31755") :load :init
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/DBDish/mysql.pm6"
    .const 'Sub' $P5001 = 'cuid_67_1372810566.31755' 
    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_66_1372810566.31755" 
    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"("NativeCall", 3 :named("line"))
    load_bytecode "ModuleLoader.pbc"
    get_root_namespace $P5003
    set $P5002, $P5003["nqp"]
    set $P5001, $P5002["ModuleLoader"]
    $P5001."load_module"("Perl6::ModuleLoader")
    get_hll_global $P5001, "ModuleLoader"
    $P5001."load_module"("DBDish", 4 :named("line"))
    nqp_create_sc $P5001, "C89BADD0F6CE81A309A3C01C6985426D115E9141"
    set cur_sc, $P5001
    cur_sc."set_description"("/usr/local/lib/parrot/4.6.0/languages/perl6/lib/DBDish/mysql.pm6")
    new $P5002, 'ResizablePMCArray'
    set conflicts, $P5002
    new $P5003, 'ResizableStringArray'
    null $S5001
    push $P5003, $S5001
    push $P5003, "Uninstantiable"
    push $P5003, "CArray"
    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, "PARAMETERIZE_TYPE"
    push $P5003, "F0C5D5D740B8C88E1BA84F06EB3791FB38C35461"
    push $P5003, "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/NativeCall.pm6"
    push $P5003, "of"
    push $P5003, "27420382D80CEF05775E7415279171A93892A1F1-1372810242.10453"
    push $P5003, "src/gen/BOOTSTRAP.pm"
    push $P5003, "P6opaque"
    push $P5003, "execute"
    push $P5003, "escape"
    push $P5003, "quote"
    push $P5003, "rows"
    push $P5003, "fetchrow"
    push $P5003, "column_names"
    push $P5003, "mysql_insertid"
    push $P5003, "finish"
    push $P5003, "fetchrow-hash"
    push $P5003, "fetchrow_hashref"
    push $P5003, "fetchall-hash"
    push $P5003, "fetchall-AoH"
    push $P5003, "fetchall-array"
    push $P5003, "fetchrow_array"
    push $P5003, "fetchrow_arrayref"
    push $P5003, "fetch"
    push $P5003, "fetchall_arrayref"
    push $P5003, "mysql_warning_count"
    push $P5003, "PrintError"
    push $P5003, "RaiseError"
    push $P5003, "errstr"
    push $P5003, "BUILD"
    push $P5003, "0C6AE5E622FCCDC6836374F424390B2BE3C545DF"
    push $P5003, "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/DBDish.pm6"
    push $P5003, "$!mysql_client"
    push $P5003, "$!statement"
    push $P5003, "$!result_set"
    push $P5003, "$!affected_rows"
    push $P5003, "@!column_names"
    push $P5003, "$!field_count"
    push $P5003, "$!mysql_warning_count"
    push $P5003, "$!PrintError"
    push $P5003, "$!RaiseError"
    push $P5003, "$!errstr"
    push $P5003, "prepare"
    push $P5003, "disconnect"
    push $P5003, "quote-identifer"
    push $P5003, "do"
    push $P5003, "quote-identifier"
    push $P5003, "connect"
    push $P5003, "Version"
    push $P5003, "$!Version"
    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, "OpaquePointer"
    push $P5003, "&trait_mod:<is>"
    push $P5003, "&explicitly-manage"
    push $P5003, "&refresh"
    push $P5003, "&mysql_affected_rows"
    push $P5003, "&mysql_close"
    push $P5003, "&mysql_data_seek"
    push $P5003, "&mysql_error"
    push $P5003, "&mysql_fetch_field"
    push $P5003, "&mysql_fetch_lengths"
    push $P5003, "&mysql_fetch_row"
    push $P5003, "&mysql_field_count"
    push $P5003, "&mysql_free_result"
    push $P5003, "&mysql_get_client_info"
    push $P5003, "&mysql_init"
    push $P5003, "&mysql_insert_id"
    push $P5003, "&mysql_library_init"
    push $P5003, "&mysql_library_end"
    push $P5003, "&mysql_num_rows"
    push $P5003, "&mysql_query"
    push $P5003, "&mysql_real_connect"
    push $P5003, "&mysql_stat"
    push $P5003, "&mysql_store_result"
    push $P5003, "&mysql_use_result"
    push $P5003, "&mysql_warning_count"
    push $P5003, "&mysql_stmt_init"
    push $P5003, "&mysql_stmt_prepare"
    push $P5003, "$=pod"
    push $P5003, "!UNIT_MARKER"
    push $P5003, "$mysql_client"
    push $P5003, "libmysqlclient"
    push $P5003, "&?ROUTINE"
    push $P5003, "Native"
    push $P5003, "1B774EC04D50F35E99199D1B74077FC90B5E8768-1372810138.56917"
    push $P5003, "src/Perl6/World.pm"
    push $P5003, "$result_set"
    push $P5003, "$row_number"
    push $P5003, "TypedCArray"
    push $P5003, "IntTypedCArray"
    push $P5003, "$argc"
    push $P5003, "$argv"
    push $P5003, "$group"
    push $P5003, "$sql_command"
    push $P5003, "$host"
    push $P5003, "$user"
    push $P5003, "$password"
    push $P5003, "$database"
    push $P5003, "$port"
    push $P5003, "$socket"
    push $P5003, "$flag"
    push $P5003, "$mysql_stmt"
    push $P5003, "$length"
    push $P5003, "ErrorHandling"
    push $P5003, "StatementHandle"
    push $P5003, "Connection"
    push $P5003, "mysql"
    push $P5003, "$?CLASS"
    push $P5003, "::?CLASS"
    push $P5003, "0"
    push $P5003, "$_"
    push $P5003, "1"
    push $P5003, "mysql_client"
    push $P5003, "statement"
    push $P5003, "%_"
    push $P5003, "$*DISPATCHER"
    push $P5003, "@params"
    push $P5003, "$statement"
    push $P5003, "$status"
    push $P5003, "$rows"
    push $P5003, "?"
    push $P5003, "$param"
    push $P5003, ""
    push $P5003, "0123456789."
    push $P5003, "subst"
    push $P5003, "reset_errstr"
    push $P5003, "set_errstr"
    push $P5003, "0E0"
    push $P5003, "$x"
    push $P5003, "'"
    push $P5003, "\""
    push $P5003, "\\"
    push $P5003, "\r"
    push $P5003, "\n"
    push $P5003, "\\'"
    push $P5003, "\\\""
    push $P5003, "\\\\"
    push $P5003, "\\0"
    push $P5003, "\\r"
    push $P5003, "\\n"
    push $P5003, "$errstr"
    push $P5003, "@row_array"
    push $P5003, "$native_row"
    push $P5003, "$i"
    push $P5003, "$field_info"
    push $P5003, "$column_name"
    push $P5003, "DBDish::StatementHandle"
    push $P5003, "DBDish::ErrorHandling"
    push $P5003, "$statement_handle"
    push $P5003, "D"
    push $P5003, "$name"
    push $P5003, "`"
    push $P5003, "DBDish::Connection"
    push $P5003, "mberends"
    push $P5003, "auth"
    push $P5003, "0.0.1"
    push $P5003, "ver"
    push $P5003, "%params"
    push $P5003, "$mysql_error"
    push $P5003, "$result"
    push $P5003, "$error"
    push $P5003, "$connection"
    push $P5003, "host"
    push $P5003, "localhost"
    push $P5003, "port"
    push $P5003, "database"
    push $P5003, "DBD::mysql connection failed: "
    push $P5003, "user"
    push $P5003, "password"
    push $P5003, "$RaiseError"
    push $P5003, "DESCRIPTION"
    push $P5003, "# 'zavolaj' is a Native Call Interface for Rakudo/Parrot. 'DBIish' and"
    push $P5003, "# 'DBDish::mysql' are Perl 6 modules that use 'zavolaj' to use the"
    push $P5003, "# standard mysqlclient library. There is a long term Parrot based"
    push $P5003, "# project to develop a new, comprehensive DBI architecture for Parrot"
    push $P5003, "# and Perl 6. DBIish is not that, it is a naive rewrite of the"
    push $P5003, "# similarly named Perl 5 modules. Hence the 'Mini' part of the name."
    push $P5003, "DESCRIPTION # 'zavolaj' is a Native Call Interface for Rakudo/Parrot. 'DBIish' and"
    push $P5003, "DESCRIPTION # 'zavolaj' is a Native Call Interface for Rakudo/Parrot. 'DBIish' and # 'DBDish::mysql' are Perl 6 modules that use 'zavolaj' to use the"
    push $P5003, "DESCRIPTION # 'zavolaj' is a Native Call Interface for Rakudo/Parrot. 'DBIish' and # 'DBDish::mysql' are Perl 6 modules that use 'zavolaj' to use the # standard mysqlclient library. There is a long term Parrot based"
    push $P5003, "DESCRIPTION # 'zavolaj' is a Native Call Interface for Rakudo/Parrot. 'DBIish' and # 'DBDish::mysql' are Perl 6 modules that use 'zavolaj' to use the # standard mysqlclient library. There is a long term Parrot based # project to develop a new, comprehensive DBI architecture for Parrot"
    push $P5003, "DESCRIPTION # 'zavolaj' is a Native Call Interface for Rakudo/Parrot. 'DBIish' and # 'DBDish::mysql' are Perl 6 modules that use 'zavolaj' to use the # standard mysqlclient library. There is a long term Parrot based # project to develop a new, comprehensive DBI architecture for Parrot # and Perl 6. DBIish is not that, it is a naive rewrite of the"
    push $P5003, "DESCRIPTION # 'zavolaj' is a Native Call Interface for Rakudo/Parrot. 'DBIish' and # 'DBDish::mysql' are Perl 6 modules that use 'zavolaj' to use the # standard mysqlclient library. There is a long term Parrot based # project to develop a new, comprehensive DBI architecture for Parrot # and Perl 6. DBIish is not that, it is a naive rewrite of the # similarly named Perl 5 modules. Hence the 'Mini' part of the name."
    push $P5003, "CLASSES"
    push $P5003, "The DBDish::mysql module contains the same classes and methods as every"
    push $P5003, "database driver. Therefore read the main documentation of usage in"
    push $P5003, "doc:DBIish"
    push $P5003, "L"
    push $P5003, "doc:DBDish"
    push $P5003, " and internal architecture in "
    push $P5003, ". Below are"
    push $P5003, "only notes about code unique to the DBDish::mysql implementation."
    push $P5003, "CLASSES The DBDish::mysql module contains the same classes and methods as every"
    push $P5003, "CLASSES The DBDish::mysql module contains the same classes and methods as every database driver. Therefore read the main documentation of usage in"
    push $P5003, "CLASSES The DBDish::mysql module contains the same classes and methods as every database driver. Therefore read the main documentation of usage in "
    push $P5003, ". Below are only notes about code unique to the DBDish::mysql implementation."
    push $P5003, "SEE ALSO"
    push $P5003, "The MySQL 5.1 Reference Manual, C API."
    push $P5003, "http://dev.mysql.com/doc/refman/5.1/en/c-api-function-overview.html"
    push $P5003, "SEE ALSO The MySQL 5.1 Reference Manual, C API."
    push $P5003, "SEE ALSO The MySQL 5.1 Reference Manual, C API. "
    push $P5003, "pod"
    push $P5003, "is_generic"
    push $P5003, "instantiate_generic"
    push $P5003, "name"
    push $P5003, "set_name"
    push $P5003, "id"
    push $P5003, "arity"
    push $P5003, "count"
    push $P5003, "signature"
    push $P5003, "outer"
    push $P5003, "static_id"
    push $P5003, "returns"
    push $P5003, "add_phaser"
    push $P5003, "fire_phasers"
    push $P5003, "phasers"
    push $P5003, "is_dispatcher"
    push $P5003, "add_dispatchee"
    push $P5003, "derive_dispatcher"
    push $P5003, "dispatcher"
    push $P5003, "dispatchees"
    push $P5003, "set_rw"
    push $P5003, "set_inline_info"
    push $P5003, "inline_info"
    push $P5003, "set_onlystar"
    push $P5003, "rw"
    push $P5003, "onlystar"
    push $P5003, "assuming"
    push $P5003, "candidates"
    push $P5003, "cando"
    push $P5003, "multi"
    push $P5003, "soft"
    push $P5003, "wrap"
    push $P5003, "unwrap"
    push $P5003, "yada"
    push $P5003, "package"
    push $P5003, "postcircumfix:<( )>"
    push $P5003, "28FAC381EB59BA79DA1D75F70404C20E0548F4F5-1372810034.5696"
    push $P5003, "src/stage2/NQPCORE.setting"
    push $P5003, "$!do"
    push $P5003, "$!signature"
    push $P5003, "$!state_vars"
    push $P5003, "$!phasers"
    push $P5003, "$!dispatchees"
    push $P5003, "$!dispatcher_cache"
    push $P5003, "$!dispatcher"
    push $P5003, "$!md_thunk"
    push $P5003, "$!rw"
    push $P5003, "$!inline_info"
    push $P5003, "$!yada"
    push $P5003, "$!package"
    push $P5003, "$!onlystar"
    push $P5003, "$!setup"
    push $P5003, "$!call"
    push $P5003, "GLOBAL"
    push $P5003, "NativeCall"
    push $P5003, "DBDish"
    push $P5003, "CArray+{TypedCArray}"
    push $P5003, "CArray+{IntTypedCArray}"
    push $P5003, "DBDish::mysql::StatementHandle"
    push $P5003, "DBDish::mysql::Connection"
    push $P5003, "DBDish::mysql"
    push $P5003, "100"
    push $P5003, "Sub+{Native}"
    push $P5003, "invoke"
    push $P5003, "&RWPAIR"
    push $P5003, "T"
    push $P5003, "$?ROLE"
    push $P5003, "::?ROLE"
    push $P5003, "call_sig"
    push $P5003, "$r"
    push $P5003, "$libname"
    push $P5003, "TValue"
    push $P5003, "Positional"
    push $P5003, "$/"
    push $P5003, "$!"
    push $P5003, "$dcpkg"
    push $P5003, "$meth"
    push $P5003, "$attr_type"
    push $P5003, "ExplicitlyManagedString"
    push $P5003, "native_callsite"
    push $P5003, "&string_encoding_to_nci_type"
    push $P5003, "&param_hash_for"
    push $P5003, "&param_list_for"
    push $P5003, "&return_hash_for"
    push $P5003, "%type_map"
    push $P5003, "&type_code_for"
    push $P5003, "&map_return_type"
    push $P5003, "NativeCallSymbol"
    push $P5003, "NativeCallingConvention"
    push $P5003, "NativeCallEncoded"
    push $P5003, "CStr"
    push $P5003, "NumTypedCArray"
    push $P5003, "arr"
    push $P5003, "int8"
    push $P5003, "int16"
    push $P5003, "int32"
    push $P5003, "int"
    push $P5003, "Int"
    push $P5003, "num32"
    push $P5003, "num64"
    push $P5003, "num"
    push $P5003, "Num"
    push $P5003, "Callable"
    push $P5003, "$meth_name"
    push $P5003, "RETURN"
    push $P5003, "self"
    push $P5003, "$package"
    .const 'Sub' $P5004 = 'cuid_67_1372810566.31755' 
    capture_lex $P5004
    $P5005 = $P5004()
    nqp_deserialize_sc "[encoded data, 235352 characters]", cur_sc, $P5003, $P5005, conflicts
    unless conflicts goto if33_end105 
    get_hll_global $P5006, "ModuleLoader"
    $P5007 = $P5006."resolve_repossession_conflicts"(conflicts)
  if33_end105:
    .const "LexInfo" $P5001 = "cuid_1_1372810566.31755"
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 2
    $P5001."set_static_lexpad"($P5002)
    .const "LexInfo" $P5001 = "cuid_2_1372810566.31755"
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 9
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_2_1372810566.31755" 
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 4
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_3_1372810566.31755"
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 17
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_3_1372810566.31755" 
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 13
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_4_1372810566.31755"
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 24
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_4_1372810566.31755" 
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 18
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_5_1372810566.31755"
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 29
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_5_1372810566.31755" 
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 25
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_6_1372810566.31755"
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 39
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_6_1372810566.31755" 
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 30
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_7_1372810566.31755"
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 48
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_7_1372810566.31755" 
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 40
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_8_1372810566.31755"
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 54
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_8_1372810566.31755" 
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 49
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_9_1372810566.31755"
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 59
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_9_1372810566.31755" 
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 55
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_10_1372810566.31755"
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 64
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_10_1372810566.31755" 
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 60
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_11_1372810566.31755"
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 69
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_11_1372810566.31755" 
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 65
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_12_1372810566.31755"
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 74
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_12_1372810566.31755" 
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 70
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_13_1372810566.31755"
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 79
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_13_1372810566.31755" 
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 75
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_14_1372810566.31755"
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 88
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_14_1372810566.31755" 
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 80
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_15_1372810566.31755"
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 91
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_15_1372810566.31755" 
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 89
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_16_1372810566.31755"
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 96
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_16_1372810566.31755" 
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 92
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_17_1372810566.31755"
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 103
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_17_1372810566.31755" 
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 97
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_18_1372810566.31755"
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 122
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_18_1372810566.31755" 
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 104
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_19_1372810566.31755"
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 127
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_19_1372810566.31755" 
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 123
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_20_1372810566.31755"
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 132
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_20_1372810566.31755" 
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 128
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_21_1372810566.31755"
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 137
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_21_1372810566.31755" 
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 133
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_22_1372810566.31755"
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 142
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_22_1372810566.31755" 
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 138
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_23_1372810566.31755"
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 147
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_23_1372810566.31755" 
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 143
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_24_1372810566.31755"
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 155
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_24_1372810566.31755" 
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 148
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_25_1372810566.31755"
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 159
    $P5001."set_static_lexpad"($P5002)
    .const "LexInfo" $P5001 = "cuid_26_1372810566.31755"
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 179
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_26_1372810566.31755" 
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 178
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_27_1372810566.31755"
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 188
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_27_1372810566.31755" 
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 181
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_28_1372810566.31755"
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 192
    $P5001."set_static_lexpad"($P5002)
    .const "LexInfo" $P5001 = "cuid_29_1372810566.31755"
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 196
    $P5001."set_static_lexpad"($P5002)
    .const "LexInfo" $P5001 = "cuid_30_1372810566.31755"
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 202
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_30_1372810566.31755" 
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 197
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_31_1372810566.31755" 
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 203
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_32_1372810566.31755" 
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 206
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_29_1372810566.31755" 
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 194
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_33_1372810566.31755" 
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 211
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_28_1372810566.31755" 
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 189
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_34_1372810566.31755"
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 239
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_34_1372810566.31755" 
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 221
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_35_1372810566.31755"
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 247
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_35_1372810566.31755" 
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 240
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_36_1372810566.31755"
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 251
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_37_1372810566.31755" 
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 253
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_36_1372810566.31755" 
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 249
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_38_1372810566.31755" 
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 256
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_39_1372810566.31755"
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 262
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_39_1372810566.31755" 
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 248
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_40_1372810566.31755"
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 265
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_41_1372810566.31755" 
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 266
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_42_1372810566.31755"
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 270
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_43_1372810566.31755" 
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 272
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_44_1372810566.31755"
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 276
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_45_1372810566.31755" 
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 277
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_44_1372810566.31755" 
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 274
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_46_1372810566.31755" 
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 280
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_42_1372810566.31755" 
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 268
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_40_1372810566.31755" 
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 263
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_47_1372810566.31755" 
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 289
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_48_1372810566.31755"
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 292
    $P5001."set_static_lexpad"($P5002)
    .const "LexInfo" $P5001 = "cuid_49_1372810566.31755"
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 295
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_49_1372810566.31755" 
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 293
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_48_1372810566.31755" 
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 288
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_50_1372810566.31755"
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 303
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_50_1372810566.31755" 
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 287
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_51_1372810566.31755"
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 309
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_51_1372810566.31755" 
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 304
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_52_1372810566.31755" 
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 311
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_53_1372810566.31755"
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 317
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_53_1372810566.31755" 
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 310
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_25_1372810566.31755" 
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 325
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_54_1372810566.31755"
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 327
    $P5001."set_static_lexpad"($P5002)
    .const "LexInfo" $P5001 = "cuid_55_1372810566.31755"
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 336
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_55_1372810566.31755" 
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 330
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_56_1372810566.31755"
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 340
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_56_1372810566.31755" 
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 337
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_57_1372810566.31755"
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 354
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_57_1372810566.31755" 
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 349
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_58_1372810566.31755"
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 360
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_58_1372810566.31755" 
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 355
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_59_1372810566.31755"
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 370
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_59_1372810566.31755" 
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 361
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_54_1372810566.31755" 
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 375
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_60_1372810566.31755"
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 381
    $P5001."set_static_lexpad"($P5002)
    .const "LexInfo" $P5001 = "cuid_61_1372810566.31755"
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 389
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_61_1372810566.31755" 
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 388
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_62_1372810566.31755"
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 395
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_63_1372810566.31755" 
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 397
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_64_1372810566.31755" 
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 410
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_65_1372810566.31755" 
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 412
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_62_1372810566.31755" 
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 390
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_60_1372810566.31755" 
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 476
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_1_1372810566.31755" 
    nqp_get_sc_object $P5002, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 3
    perl6_associate_sub_code_object $P5001, $P5002
    nqp_get_sc_object $P5001, "C89BADD0F6CE81A309A3C01C6985426D115E9141", 0
    set_hll_global "GLOBAL", $P5001
    .return () 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_67_1372810566.31755") :anon :lex :outer("cuid_68_1372810566.31755")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/DBDish/mysql.pm6"
    new $P5001, 'ResizablePMCArray'
    .const 'Sub' $P5002 = "cuid_2_1372810566.31755" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_3_1372810566.31755" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_4_1372810566.31755" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_5_1372810566.31755" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_6_1372810566.31755" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_7_1372810566.31755" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_8_1372810566.31755" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_9_1372810566.31755" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_10_1372810566.31755" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_11_1372810566.31755" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_12_1372810566.31755" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_13_1372810566.31755" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_14_1372810566.31755" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_15_1372810566.31755" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_16_1372810566.31755" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_17_1372810566.31755" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_18_1372810566.31755" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_19_1372810566.31755" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_20_1372810566.31755" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_21_1372810566.31755" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_22_1372810566.31755" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_23_1372810566.31755" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_24_1372810566.31755" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_26_1372810566.31755" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_27_1372810566.31755" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_30_1372810566.31755" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_31_1372810566.31755" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_32_1372810566.31755" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_29_1372810566.31755" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_33_1372810566.31755" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_28_1372810566.31755" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_34_1372810566.31755" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_35_1372810566.31755" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_37_1372810566.31755" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_36_1372810566.31755" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_38_1372810566.31755" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_39_1372810566.31755" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_41_1372810566.31755" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_43_1372810566.31755" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_45_1372810566.31755" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_44_1372810566.31755" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_46_1372810566.31755" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_42_1372810566.31755" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_40_1372810566.31755" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_47_1372810566.31755" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_49_1372810566.31755" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_48_1372810566.31755" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_50_1372810566.31755" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_51_1372810566.31755" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_52_1372810566.31755" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_53_1372810566.31755" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_25_1372810566.31755" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_55_1372810566.31755" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_56_1372810566.31755" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_57_1372810566.31755" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_58_1372810566.31755" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_59_1372810566.31755" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_54_1372810566.31755" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_61_1372810566.31755" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_63_1372810566.31755" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_64_1372810566.31755" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_65_1372810566.31755" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_62_1372810566.31755" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_60_1372810566.31755" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_1_1372810566.31755" 
    push $P5001, $P5002
    .return ($P5001) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_69_1372810566.31755") :load
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/DBDish/mysql.pm6"
    .const 'Sub' $P5001 = "cuid_66_1372810566.31755" 
    $P5002 = $P5001()
    .return ($P5002) 
.end