.include 'cclass.pasm'
.include 'except_severity.pasm'
.include 'except_types.pasm'
.include 'iglobals.pasm'
.include 'interpinfo.pasm'
.include 'iterator.pasm'
.include 'sysinfo.pasm'
.include 'stat.pasm'
.include 'datatypes.pasm'
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_26_1372810499.65851") :anon :lex
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/Term/ANSIColor.pm"
.annotate 'line', 1
    .const 'Sub' $P5003 = 'cuid_1_1372810499.65851' 
    capture_lex $P5003 
    .const 'Sub' $P5001 = 'cuid_1_1372810499.65851' 
    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_1372810499.65851") :anon :lex :outer("cuid_26_1372810499.65851")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/Term/ANSIColor.pm"
.annotate 'line', 1
    .const 'Sub' $P5005 = 'cuid_2_1372810499.65851' 
    capture_lex $P5005 
    .lex "GLOBALish", $P101 
    .lex "EXPORT", $P102 
    .lex "$?PACKAGE", $P103 
    .lex "::?PACKAGE", $P104 
    .lex "$_", $P105 
    .lex "$/", $P106 
    .lex "$!", $P107 
    .lex "Term", $P108 
    .lex "$=pod", $P109 
    .lex "!UNIT_MARKER", $P110 
    .local pmc ctxsave 
    find_dynamic_lex $P5004, "$*CTXSAVE"
    set ctxsave, $P5004
    isnull $I5001, ctxsave
    if $I5001 goto unless10_end11 
    can $I5002, ctxsave, "ctxsave"
    perl6_box_int $P5007, $I5002
    set $P5006, $P5007
    unless $I5002 goto if11_end13 
    $P5005 = ctxsave."ctxsave"()
    set $P5006, $P5005
  if11_end13:
  unless10_end11:
    nqp_get_sc_object $P5004, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 308
    .const 'Sub' $P5005 = 'cuid_2_1372810499.65851' 
    capture_lex $P5005
    $P5006 = $P5005()
    nqp_get_sc_object $P5007, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 5
    .return ($P5007) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_2_1372810499.65851") :anon :lex :outer("cuid_1_1372810499.65851")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/Term/ANSIColor.pm"
.annotate 'line', 3
    .const 'Sub' $P5027 = 'cuid_3_1372810499.65851' 
    capture_lex $P5027 
    .const 'Sub' $P5027 = 'cuid_4_1372810499.65851' 
    capture_lex $P5027 
    .const 'Sub' $P5027 = 'cuid_5_1372810499.65851' 
    capture_lex $P5027 
    .const 'Sub' $P5027 = 'cuid_6_1372810499.65851' 
    capture_lex $P5027 
    .const 'Sub' $P5027 = 'cuid_7_1372810499.65851' 
    capture_lex $P5027 
    .const 'Sub' $P5027 = 'cuid_8_1372810499.65851' 
    capture_lex $P5027 
    .const 'Sub' $P5027 = 'cuid_9_1372810499.65851' 
    capture_lex $P5027 
    .const 'Sub' $P5027 = 'cuid_10_1372810499.65851' 
    capture_lex $P5027 
    .const 'Sub' $P5027 = 'cuid_14_1372810499.65851' 
    capture_lex $P5027 
    .const 'Sub' $P5027 = 'cuid_16_1372810499.65851' 
    capture_lex $P5027 
    .const 'Sub' $P5027 = 'cuid_17_1372810499.65851' 
    capture_lex $P5027 
    .const 'Sub' $P5027 = 'cuid_20_1372810499.65851' 
    capture_lex $P5027 
    .lex "$?PACKAGE", $P101 
    .lex "::?PACKAGE", $P102 
    .lex "$_", $P103 
    .lex "&RESET", $P104 
    .lex "&BOLD", $P105 
    .lex "&UNDERLINE", $P106 
    .lex "&INVERSE", $P107 
    .lex "&BOLD_OFF", $P108 
    .lex "&UNDERLINE_OFF", $P109 
    .lex "&INVERSE_OFF", $P110 
    .lex "%attrs", $P111 
    .lex "&color", $P112 
    .lex "&colored", $P113 
    .lex "&colorvalid", $P114 
    .lex "&colorstrip", $P115 
    .lex "&uncolor", $P116 
    .const 'Sub' $P5002 = 'cuid_3_1372810499.65851' 
    capture_lex $P5002
    $P5002 = $P104."clone"()
    set $P104, $P5002
    .const 'Sub' $P5003 = 'cuid_4_1372810499.65851' 
    capture_lex $P5003
    $P5003 = $P105."clone"()
    set $P105, $P5003
    .const 'Sub' $P5004 = 'cuid_5_1372810499.65851' 
    capture_lex $P5004
    $P5004 = $P106."clone"()
    set $P106, $P5004
    .const 'Sub' $P5005 = 'cuid_6_1372810499.65851' 
    capture_lex $P5005
    $P5005 = $P107."clone"()
    set $P107, $P5005
    .const 'Sub' $P5006 = 'cuid_7_1372810499.65851' 
    capture_lex $P5006
    $P5006 = $P108."clone"()
    set $P108, $P5006
    .const 'Sub' $P5007 = 'cuid_8_1372810499.65851' 
    capture_lex $P5007
    $P5007 = $P109."clone"()
    set $P109, $P5007
    .const 'Sub' $P5008 = 'cuid_9_1372810499.65851' 
    capture_lex $P5008
    $P5008 = $P110."clone"()
    set $P110, $P5008
    .const 'Sub' $P5009 = 'cuid_10_1372810499.65851' 
    capture_lex $P5009
    $P5009 = $P112."clone"()
    set $P112, $P5009
    .const 'Sub' $P5010 = 'cuid_14_1372810499.65851' 
    capture_lex $P5010
    $P5010 = $P113."clone"()
    set $P113, $P5010
    .const 'Sub' $P5011 = 'cuid_16_1372810499.65851' 
    capture_lex $P5011
    $P5011 = $P114."clone"()
    set $P114, $P5011
    .const 'Sub' $P5012 = 'cuid_17_1372810499.65851' 
    capture_lex $P5012
    $P5012 = $P115."clone"()
    set $P115, $P5012
    .const 'Sub' $P5013 = 'cuid_20_1372810499.65851' 
    capture_lex $P5013
    $P5013 = $P116."clone"()
    set $P116, $P5013
.annotate 'line', 6
    null $P5014
    null $P5015
    null $P5016
    null $P5017
    null $P5018
    null $P5019
    null $P5020
.annotate 'line', 14

.annotate 'line', 35
    find_lex $P5021, "Pair"
    nqp_get_sc_object $P5022, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 42
    nqp_get_sc_object $P5023, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 41
    $P5024 = $P5021."new"($P5022 :named("key"), $P5023 :named("value"))
    find_lex $P5025, "Pair"
    nqp_get_sc_object $P5026, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 44
    nqp_get_sc_object $P5027, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 43
    $P5028 = $P5025."new"($P5026 :named("key"), $P5027 :named("value"))
    find_lex $P5029, "Pair"
    nqp_get_sc_object $P5030, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 46
    nqp_get_sc_object $P5031, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 45
    $P5032 = $P5029."new"($P5030 :named("key"), $P5031 :named("value"))
    find_lex $P5033, "Pair"
    nqp_get_sc_object $P5034, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 48
    nqp_get_sc_object $P5035, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 47
    $P5036 = $P5033."new"($P5034 :named("key"), $P5035 :named("value"))
    find_lex $P5037, "Pair"
    nqp_get_sc_object $P5038, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 50
    nqp_get_sc_object $P5039, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 49
    $P5040 = $P5037."new"($P5038 :named("key"), $P5039 :named("value"))
    find_lex $P5041, "Pair"
    nqp_get_sc_object $P5042, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 52
    nqp_get_sc_object $P5043, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 51
    $P5044 = $P5041."new"($P5042 :named("key"), $P5043 :named("value"))
    find_lex $P5045, "Pair"
    nqp_get_sc_object $P5046, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 54
    nqp_get_sc_object $P5047, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 53
    $P5048 = $P5045."new"($P5046 :named("key"), $P5047 :named("value"))
    find_lex $P5049, "Pair"
    nqp_get_sc_object $P5050, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 56
    nqp_get_sc_object $P5051, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 55
    $P5052 = $P5049."new"($P5050 :named("key"), $P5051 :named("value"))
    find_lex $P5053, "Pair"
    nqp_get_sc_object $P5054, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 58
    nqp_get_sc_object $P5055, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 57
    $P5056 = $P5053."new"($P5054 :named("key"), $P5055 :named("value"))
    find_lex $P5057, "Pair"
    nqp_get_sc_object $P5058, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 60
    nqp_get_sc_object $P5059, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 59
    $P5060 = $P5057."new"($P5058 :named("key"), $P5059 :named("value"))
    find_lex $P5061, "Pair"
    nqp_get_sc_object $P5062, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 62
    nqp_get_sc_object $P5063, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 61
    $P5064 = $P5061."new"($P5062 :named("key"), $P5063 :named("value"))
    find_lex $P5065, "Pair"
    nqp_get_sc_object $P5066, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 64
    nqp_get_sc_object $P5067, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 63
    $P5068 = $P5065."new"($P5066 :named("key"), $P5067 :named("value"))
    find_lex $P5069, "Pair"
    nqp_get_sc_object $P5070, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 66
    nqp_get_sc_object $P5071, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 65
    $P5072 = $P5069."new"($P5070 :named("key"), $P5071 :named("value"))
    find_lex $P5073, "Pair"
    nqp_get_sc_object $P5074, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 68
    nqp_get_sc_object $P5075, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 67
    $P5076 = $P5073."new"($P5074 :named("key"), $P5075 :named("value"))
    find_lex $P5077, "Pair"
    nqp_get_sc_object $P5078, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 70
    nqp_get_sc_object $P5079, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 69
    $P5080 = $P5077."new"($P5078 :named("key"), $P5079 :named("value"))
    find_lex $P5081, "Pair"
    nqp_get_sc_object $P5082, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 72
    nqp_get_sc_object $P5083, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 71
    $P5084 = $P5081."new"($P5082 :named("key"), $P5083 :named("value"))
    find_lex $P5085, "Pair"
    nqp_get_sc_object $P5086, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 74
    nqp_get_sc_object $P5087, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 73
    $P5088 = $P5085."new"($P5086 :named("key"), $P5087 :named("value"))
    find_lex $P5089, "Pair"
    nqp_get_sc_object $P5090, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 76
    nqp_get_sc_object $P5091, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 75
    $P5092 = $P5089."new"($P5090 :named("key"), $P5091 :named("value"))
    find_lex $P5093, "Pair"
    nqp_get_sc_object $P5094, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 78
    nqp_get_sc_object $P5095, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 77
    $P5096 = $P5093."new"($P5094 :named("key"), $P5095 :named("value"))
    find_lex $P5097, "Pair"
    nqp_get_sc_object $P5098, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 80
    nqp_get_sc_object $P5099, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 79
    $P5100 = $P5097."new"($P5098 :named("key"), $P5099 :named("value"))
    find_lex $P5101, "Pair"
    nqp_get_sc_object $P5102, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 82
    nqp_get_sc_object $P5103, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 81
    $P5104 = $P5101."new"($P5102 :named("key"), $P5103 :named("value"))
    find_lex $P5105, "Pair"
    nqp_get_sc_object $P5106, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 84
    nqp_get_sc_object $P5107, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 83
    $P5108 = $P5105."new"($P5106 :named("key"), $P5107 :named("value"))
    $P5109 = "&infix:<,>"($P5024, $P5028, $P5032, $P5036, $P5040, $P5044, $P5048, $P5052, $P5056, $P5060, $P5064, $P5068, $P5072, $P5076, $P5080, $P5084, $P5088, $P5092, $P5096, $P5100, $P5104, $P5108)
    $P111."STORE"($P5109)
    null $P5021
    null $P5022
    null $P5023
    null $P5024
    nqp_get_sc_object $P5025, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 140
    $P5026 = $P5025."clone"()
    perl6_capture_lex $P5026
    .return ($P5026) 
.end
.HLL "perl6"
.namespace []
.sub "RESET" :subid("cuid_3_1372810499.65851") :anon :lex :outer("cuid_2_1372810499.65851")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/Term/ANSIColor.pm"
.annotate 'line', 6
    .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 
    nqp_get_sc_object $P5007, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 9
    perl6_decontainerize_return_value $P5006, $P5007
    nqp_get_sc_object $P5007, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 8
    perl6_type_check_return_value $P5006, $P5007
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "BOLD" :subid("cuid_4_1372810499.65851") :anon :lex :outer("cuid_2_1372810499.65851")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/Term/ANSIColor.pm"
.annotate 'line', 7
    .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 
    nqp_get_sc_object $P5007, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 17
    perl6_decontainerize_return_value $P5006, $P5007
    nqp_get_sc_object $P5007, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 16
    perl6_type_check_return_value $P5006, $P5007
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "UNDERLINE" :subid("cuid_5_1372810499.65851") :anon :lex :outer("cuid_2_1372810499.65851")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/Term/ANSIColor.pm"
.annotate 'line', 8
    .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 
    nqp_get_sc_object $P5007, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 21
    perl6_decontainerize_return_value $P5006, $P5007
    nqp_get_sc_object $P5007, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 20
    perl6_type_check_return_value $P5006, $P5007
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "INVERSE" :subid("cuid_6_1372810499.65851") :anon :lex :outer("cuid_2_1372810499.65851")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/Term/ANSIColor.pm"
.annotate 'line', 9
    .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 
    nqp_get_sc_object $P5007, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 25
    perl6_decontainerize_return_value $P5006, $P5007
    nqp_get_sc_object $P5007, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 24
    perl6_type_check_return_value $P5006, $P5007
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "BOLD_OFF" :subid("cuid_7_1372810499.65851") :anon :lex :outer("cuid_2_1372810499.65851")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/Term/ANSIColor.pm"
.annotate 'line', 10
    .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 
    nqp_get_sc_object $P5007, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 29
    perl6_decontainerize_return_value $P5006, $P5007
    nqp_get_sc_object $P5007, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 28
    perl6_type_check_return_value $P5006, $P5007
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "UNDERLINE_OFF" :subid("cuid_8_1372810499.65851") :anon :lex :outer("cuid_2_1372810499.65851")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/Term/ANSIColor.pm"
.annotate 'line', 11
    .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 
    nqp_get_sc_object $P5007, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 33
    perl6_decontainerize_return_value $P5006, $P5007
    nqp_get_sc_object $P5007, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 32
    perl6_type_check_return_value $P5006, $P5007
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "INVERSE_OFF" :subid("cuid_9_1372810499.65851") :anon :lex :outer("cuid_2_1372810499.65851")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/Term/ANSIColor.pm"
.annotate 'line', 12
    .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 
    nqp_get_sc_object $P5007, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 37
    perl6_decontainerize_return_value $P5006, $P5007
    nqp_get_sc_object $P5007, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 36
    perl6_type_check_return_value $P5006, $P5007
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "color" :subid("cuid_10_1372810499.65851") :anon :lex :outer("cuid_2_1372810499.65851")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/Term/ANSIColor.pm"
.annotate 'line', 38
    .param pmc CALL_SIG :call_sig 
    .const 'Sub' $P5010 = 'cuid_13_1372810499.65851' 
    capture_lex $P5010 
    .lex "$what", $P101 
    .lex "$_", $P102 
    .lex "$/", $P103 
    .lex "$!", $P104 
    .lex "@res", $P105 
    .lex "@a", $P106 
    .lex "call_sig", $P107 
    .lex "$*DISPATCHER", $P108 
    .lex "&?ROUTINE", $P109 
    perl6_take_dispatcher 
    .const 'Sub' $P5004 = 'cuid_13_1372810499.65851' 
    capture_lex $P5004
    set $P5005, CALL_SIG
    set $P107, $P5005
    bind_signature 
    root_new $P110, ['parrot';'Continuation']
    set_label $P110, lexotic_16
    .lex "RETURN", $P110
.annotate 'line', 40

    nqp_get_sc_object $P5009, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 90
    $P5010 = $P101."split"($P5009)
    perl6ize_type $P5008, $P5010
    $P106."STORE"($P5008)
.annotate 'line', 41
    $P5008 = "&infix:<,>"($P106)
    nqp_get_sc_object $P5009, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 91
    $P5010 = $P5009."clone"()
    perl6_capture_lex $P5010
    $P5011 = $P5008."map"($P5010)
    "&eager"($P5011)
.annotate 'line', 48
    nqp_get_sc_object $P5012, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 101
    nqp_get_sc_object $P5014, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 102
    $P5015 = $P105."join"($P5014)
    perl6ize_type $P5013, $P5015
    find_lex $P5011, "&infix:<~>"
    perl6_multi_dispatch_thunk $P5010, $P5011
    $P5016 = $P5010($P5012, $P5013)
    nqp_get_sc_object $P5017, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 103
    find_lex $P5009, "&infix:<~>"
    perl6_multi_dispatch_thunk $P5008, $P5009
    $P5018 = $P5008($P5016, $P5017)
    $P5019 = "&return"($P5018)
    perl6_decontainerize_return_value $P5007, $P5019
    goto lexotic_17
  lexotic_16:
    .get_results ($P5007)
  lexotic_17:
    find_lex $P5008, "&EXHAUST"
    store_lex "RETURN", $P5008
    nqp_get_sc_object $P5009, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 85
    perl6_type_check_return_value $P5007, $P5009
    .return ($P5007) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_13_1372810499.65851") :anon :lex :outer("cuid_10_1372810499.65851")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/Term/ANSIColor.pm"
.annotate 'line', 41
    .param pmc CALL_SIG :call_sig 
    .const 'Sub' $P5003 = 'cuid_11_1372810499.65851' 
    capture_lex $P5003 
    .const 'Sub' $P5003 = 'cuid_12_1372810499.65851' 
    capture_lex $P5003 
    .lex "$attr", $P101 
    .lex "call_sig", $P102 
    .lex "$*DISPATCHER", $P103 
    perl6_take_dispatcher 
    set $P5001, CALL_SIG
    set $P102, $P5001
    bind_signature 
.annotate 'line', 42
    find_lex $P5004, "%attrs"
    $P5005 = $P5004."exists"($P101)
    perl6ize_type $P5003, $P5005
    unless $P5003 goto if12_else14 
    .const 'Sub' $P5006 = 'cuid_11_1372810499.65851' 
    capture_lex $P5006
    $P5007 = $P5006()
    set $P5010, $P5007
    goto if12_end15
  if12_else14:
    .const 'Sub' $P5008 = 'cuid_12_1372810499.65851' 
    capture_lex $P5008
    $P5009 = $P5008()
    set $P5010, $P5009
  if12_end15:
    .return ($P5010) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_11_1372810499.65851") :anon :lex :outer("cuid_13_1372810499.65851")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/Term/ANSIColor.pm"
.annotate 'line', 42
    .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', 43
    find_lex $P5005, "@res"
    find_lex $P5007, "%attrs"
    find_lex $P5008, "$attr"
    $P5009 = $P5007."postcircumfix:<{ }>"($P5008)
    perl6ize_type $P5006, $P5009
    $P5010 = $P5005."push"($P5006)
    perl6ize_type $P5004, $P5010
    .return ($P5004) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_12_1372810499.65851") :anon :lex :outer("cuid_13_1372810499.65851")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/Term/ANSIColor.pm"
.annotate 'line', 44
    .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', 45
    nqp_get_sc_object $P5010, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 95
    find_lex $P5011, "$attr"
    $P5012 = $P5011."Stringy"()
    find_lex $P5009, "&infix:<~>"
    perl6_multi_dispatch_thunk $P5008, $P5009
    $P5013 = $P5008($P5010, $P5012)
    nqp_get_sc_object $P5014, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 96
    find_lex $P5007, "&infix:<~>"
    perl6_multi_dispatch_thunk $P5006, $P5007
    $P5015 = $P5006($P5013, $P5014)
    find_lex $P5005, "&die"
    perl6_multi_dispatch_thunk $P5004, $P5005
    $P5016 = $P5004($P5015)
    .return ($P5016) 
.end
.HLL "perl6"
.namespace []
.sub "colored" :subid("cuid_14_1372810499.65851") :anon :lex :outer("cuid_2_1372810499.65851")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/Term/ANSIColor.pm"
.annotate 'line', 51
    .param pmc CALL_SIG :call_sig 
    .lex "$what", $P101 
    .lex "$how", $P102 
    .lex "$_", $P103 
    .lex "$/", $P104 
    .lex "$!", $P105 
    .lex "call_sig", $P106 
    .lex "$*DISPATCHER", $P107 
    .lex "&?ROUTINE", $P108 
    perl6_take_dispatcher 
    set $P5004, CALL_SIG
    set $P106, $P5004
    bind_signature 
    root_new $P109, ['parrot';'Continuation']
    set_label $P109, lexotic_18
    .lex "RETURN", $P109
.annotate 'line', 52
    $P5011 = "&color"($P102)
    find_lex $P5010, "&infix:<~>"
    perl6_multi_dispatch_thunk $P5009, $P5010
    $P5012 = $P5009($P5011, $P101)
    nqp_get_sc_object $P5013, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 42
    $P5014 = "&color"($P5013)
    find_lex $P5008, "&infix:<~>"
    perl6_multi_dispatch_thunk $P5007, $P5008
    $P5015 = $P5007($P5012, $P5014)
    perl6_decontainerize_return_value $P5006, $P5015
    goto lexotic_19
  lexotic_18:
    .get_results ($P5006)
  lexotic_19:
    find_lex $P5007, "&EXHAUST"
    store_lex "RETURN", $P5007
    nqp_get_sc_object $P5008, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 106
    perl6_type_check_return_value $P5006, $P5008
    .return ($P5006) 
.end
.HLL "perl6"
.namespace []
.sub "colorvalid" :subid("cuid_16_1372810499.65851") :anon :lex :outer("cuid_2_1372810499.65851")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/Term/ANSIColor.pm"
.annotate 'line', 55
    .param pmc CALL_SIG :call_sig 
    .const 'Sub' $P5010 = 'cuid_15_1372810499.65851' 
    capture_lex $P5010 
    .lex "@a", $P101 
    .lex "$_", $P102 
    .lex "$/", $P103 
    .lex "$!", $P104 
    .lex "call_sig", $P105 
    .lex "$*DISPATCHER", $P106 
    .lex "&?ROUTINE", $P107 
    perl6_take_dispatcher 
    .const 'Sub' $P5004 = 'cuid_15_1372810499.65851' 
    capture_lex $P5004
    set $P5005, CALL_SIG
    set $P105, $P5005
    bind_signature 
    root_new $P108, ['parrot';'Continuation']
    set_label $P108, lexotic_22
    .lex "RETURN", $P108
.annotate 'line', 56
    $P5008 = "&infix:<,>"($P101)
    nqp_get_sc_object $P5009, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 115
    $P5010 = $P5009."clone"()
    perl6_capture_lex $P5010
    $P5011 = $P5008."map"($P5010)
    "&eager"($P5011)
.annotate 'line', 59
    perl6_booleanize $P5008, 1
    $P5009 = "&return"($P5008)
    perl6_decontainerize_return_value $P5007, $P5009
    goto lexotic_23
  lexotic_22:
    .get_results ($P5007)
  lexotic_23:
    find_lex $P5008, "&EXHAUST"
    store_lex "RETURN", $P5008
    nqp_get_sc_object $P5009, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 113
    perl6_type_check_return_value $P5007, $P5009
    .return ($P5007) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_15_1372810499.65851") :anon :lex :outer("cuid_16_1372810499.65851")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/Term/ANSIColor.pm"
.annotate 'line', 56
    .param pmc CALL_SIG :call_sig 
    .lex "$el", $P101 
    .lex "call_sig", $P102 
    .lex "$*DISPATCHER", $P103 
    perl6_take_dispatcher 
    set $P5001, CALL_SIG
    set $P102, $P5001
    bind_signature 
.annotate 'line', 57
    find_lex $P5004, "%attrs"
    $P5005 = $P5004."exists"($P101)
    perl6ize_type $P5003, $P5005
    if $P5003 goto unless13_else20 
    perl6_booleanize $P5006, 0
    $P5007 = "&return"($P5006)
    set $P5009, $P5007
    goto unless13_end21
  unless13_else20:
    find_lex $P5008, "Nil"
    set $P5009, $P5008
  unless13_end21:
    .return ($P5009) 
.end
.HLL "perl6"
.namespace []
.sub "colorstrip" :subid("cuid_17_1372810499.65851") :anon :lex :outer("cuid_2_1372810499.65851")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/Term/ANSIColor.pm"
.annotate 'line', 62
    .param pmc CALL_SIG :call_sig 
    .const 'Sub' $P5010 = 'cuid_19_1372810499.65851' 
    capture_lex $P5010 
    .lex "@a", $P101 
    .lex "$_", $P102 
    .lex "$/", $P103 
    .lex "$!", $P104 
    .lex "@res", $P105 
    .lex "call_sig", $P106 
    .lex "$*DISPATCHER", $P107 
    .lex "&?ROUTINE", $P108 
    perl6_take_dispatcher 
    .const 'Sub' $P5004 = 'cuid_19_1372810499.65851' 
    capture_lex $P5004
    set $P5005, CALL_SIG
    set $P106, $P5005
    bind_signature 
    root_new $P109, ['parrot';'Continuation']
    set_label $P109, lexotic_36
    .lex "RETURN", $P109
.annotate 'line', 64
    $P5008 = "&infix:<,>"($P101)
    nqp_get_sc_object $P5009, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 126
    $P5010 = $P5009."clone"()
    perl6_capture_lex $P5010
    $P5011 = $P5008."map"($P5010)
    "&eager"($P5011)
.annotate 'line', 67
    $P5009 = $P105."join"()
    perl6ize_type $P5008, $P5009
    $P5010 = "&return"($P5008)
    perl6_decontainerize_return_value $P5007, $P5010
    goto lexotic_37
  lexotic_36:
    .get_results ($P5007)
  lexotic_37:
    find_lex $P5008, "&EXHAUST"
    store_lex "RETURN", $P5008
    nqp_get_sc_object $P5009, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 122
    perl6_type_check_return_value $P5007, $P5009
    .return ($P5007) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_19_1372810499.65851") :anon :lex :outer("cuid_17_1372810499.65851")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/Term/ANSIColor.pm"
.annotate 'line', 64
    .param pmc CALL_SIG :call_sig 
    .const 'Sub' $P5004 = 'cuid_18_1372810499.65851' 
    capture_lex $P5004 
    .lex "$str", $P101 
    .lex "call_sig", $P102 
    .lex "$*DISPATCHER", $P103 
    perl6_take_dispatcher 
    .const 'Sub' $P5001 = 'cuid_18_1372810499.65851' 
    capture_lex $P5001
    set $P5002, CALL_SIG
    set $P102, $P5002
    bind_signature 
.annotate 'line', 65
    find_lex $P5005, "@res"
    nqp_get_sc_object $P5007, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 127
    $P5008 = $P5007."clone"()
    perl6_capture_lex $P5008
    nqp_get_sc_object $P5009, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 133
    perl6_booleanize $P5010, 1
    $P5011 = $P101."subst"($P5008, $P5009, $P5010 :named("g"))
    perl6ize_type $P5006, $P5011
    $P5012 = $P5005."push"($P5006)
    perl6ize_type $P5004, $P5012
    .return ($P5004) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_18_1372810499.65851") :anon :lex :outer("cuid_19_1372810499.65851")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/Term/ANSIColor.pm"
.annotate 'line', 65
    .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_restart26
    gt rx14_pos, rx14_eos, rx14_fail27
    repr_get_attr_int $I11, self, rx14_curclass, "$!from"
    ne $I11, -1, rxscan15_done33
    goto rxscan15_scan32
  rxscan15_loop31:
    inc rx14_pos
    gt rx14_pos, rx14_eos, rx14_fail27
    repr_bind_attr_int rx14_cur, rx14_curclass, "$!from", rx14_pos
  rxscan15_scan32:
    nqp_rxmark rx14_bstack, rxscan15_loop31, rx14_pos, 0
  rxscan15_done33:
    ge rx14_pos, rx14_eos, rx14_fail27
    substr $S11, rx14_tgt, rx14_pos, 1
    index $I11, ucs4:"\e", $S11
    lt $I11, 0, rx14_fail27
    inc rx14_pos
    add $I11, rx14_pos, 1
    gt $I11, rx14_eos, rx14_fail27
    substr $S10, rx14_tgt, rx14_pos, 1
    ne $S10, ucs4:"[", rx14_fail27
    add rx14_pos, 1
  rxquantg16_loop34:
    ge rx14_pos, rx14_eos, rx14_fail27
    substr $S11, rx14_tgt, rx14_pos, 1
    index $I11, ucs4:"0123456789;", $S11
    lt $I11, 0, rx14_fail27
    inc rx14_pos
    nqp_rxmark rx14_bstack, rxquantg16_done35, rx14_pos, rx14_rep
    goto rxquantg16_loop34
  rxquantg16_done35:
    add $I11, rx14_pos, 1
    gt $I11, rx14_eos, rx14_fail27
    substr $S10, rx14_tgt, rx14_pos, 1
    ne $S10, ucs4:"m", rx14_fail27
    add rx14_pos, 1
    rx14_cur."!cursor_pass"(rx14_pos, 'backtrack'=>1)
    .return (rx14_cur)
  rx14_restart26:
    repr_get_attr_obj rx14_cstack, rx14_cur, rx14_curclass, "$!cstack"
  rx14_fail27:
    unless rx14_bstack, rx14_done25
    pop $I19, rx14_bstack
    if_null rx14_cstack, rx14_cstack_done30
    unless rx14_cstack, rx14_cstack_done30
    dec $I19
    set $P11, rx14_cstack[$I19]
  rx14_cstack_done30:
    pop rx14_rep, rx14_bstack
    pop rx14_pos, rx14_bstack
    pop $I19, rx14_bstack
    lt rx14_pos, -1, rx14_done25
    lt rx14_pos, 0, rx14_fail27
    eq $I19, 0, rx14_fail27
    nqp_islist $I20, rx14_cstack
    unless $I20, rx14_jump28
    elements $I18, rx14_bstack
    le $I18, 0, rx14_cut29
    dec $I18
    set $I18, rx14_bstack[$I18]
  rx14_cut29:
    assign rx14_cstack, $I18
  rx14_jump28:
    jump $I19
  rx14_done25:
    rx14_cur."!cursor_fail"()
    .return (rx14_cur) 
.end
.HLL "perl6"
.namespace []
.sub "uncolor" :subid("cuid_20_1372810499.65851") :anon :lex :outer("cuid_2_1372810499.65851")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/Term/ANSIColor.pm"
.annotate 'line', 70
    .param pmc CALL_SIG :call_sig 
    .const 'Sub' $P5011 = 'cuid_21_1372810499.65851' 
    capture_lex $P5011 
    .const 'Sub' $P5011 = 'cuid_25_1372810499.65851' 
    capture_lex $P5011 
    .lex "$what", $P101 
    .lex "$_", $P102 
    .lex "$/", $P103 
    .lex "$!", $P104 
    .lex "@res", $P105 
    .lex "@list", $P106 
    .lex "call_sig", $P107 
    .lex "$*DISPATCHER", $P108 
    .lex "&?ROUTINE", $P109 
    perl6_take_dispatcher 
    .const 'Sub' $P5004 = 'cuid_21_1372810499.65851' 
    capture_lex $P5004
    .const 'Sub' $P5005 = 'cuid_25_1372810499.65851' 
    capture_lex $P5005
    set $P5006, CALL_SIG
    set $P107, $P5006
    bind_signature 
    root_new $P110, ['parrot';'Continuation']
    set_label $P110, lexotic_52
    .lex "RETURN", $P110
.annotate 'line', 72

    nqp_get_sc_object $P5010, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 145
    $P5011 = $P5010."clone"()
    perl6_capture_lex $P5011
    $P5012 = $P101."comb"($P5011)
    perl6ize_type $P5009, $P5012
    $P106."STORE"($P5009)
.annotate 'line', 73
    $P5009 = "&infix:<,>"($P106)
    nqp_get_sc_object $P5010, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 151
    $P5011 = $P5010."clone"()
    perl6_capture_lex $P5011
    $P5012 = $P5009."map"($P5011)
    "&eager"($P5012)
.annotate 'line', 80
    nqp_get_sc_object $P5010, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 90
    $P5011 = $P105."join"($P5010)
    perl6ize_type $P5009, $P5011
    $P5012 = "&return"($P5009)
    perl6_decontainerize_return_value $P5008, $P5012
    goto lexotic_53
  lexotic_52:
    .get_results ($P5008)
  lexotic_53:
    find_lex $P5009, "&EXHAUST"
    store_lex "RETURN", $P5009
    nqp_get_sc_object $P5010, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 140
    perl6_type_check_return_value $P5008, $P5010
    .return ($P5008) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_21_1372810499.65851") :anon :lex :outer("cuid_20_1372810499.65851")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/Term/ANSIColor.pm"
.annotate 'line', 72
    .param pmc CALL_SIG :call_sig 
    .lex "self", $P101 
    .lex "%_", $P102 
    .lex utf8:"$\x{a2}", $P103 
    .lex "$?REGEX", $P104 
    .lex "call_sig", $P105 
    .lex "$*DISPATCHER", $P106 
    .local pmc self 
    perl6_take_dispatcher 
    getinterp $P5003
    set $P5003, $P5003['sub']
    perl6_code_object_from_parrot_sub $P5002, $P5003
    set $P104, $P5002
    set $P5004, CALL_SIG
    set $P105, $P5004
    bind_signature 
    set self, $P101
    .local string rx17_tgt
    .local int rx17_pos
    .local int rx17_off
    .local int rx17_eos
    .local int rx17_rep
    .local pmc rx17_cur
    .local pmc rx17_curclass
    .local pmc rx17_bstack
    .local pmc rx17_cstack
    (rx17_cur, rx17_tgt, rx17_pos, rx17_curclass, rx17_bstack, $I19) = self."!cursor_start"()
    store_lex unicode:"$\x{a2}", rx17_cur
    length rx17_eos, rx17_tgt
    eq $I19, 1, rx17_restart40
    gt rx17_pos, rx17_eos, rx17_fail41
    repr_get_attr_int $I11, self, rx17_curclass, "$!from"
    ne $I11, -1, rxscan18_done47
    goto rxscan18_scan46
  rxscan18_loop45:
    inc rx17_pos
    gt rx17_pos, rx17_eos, rx17_fail41
    repr_bind_attr_int rx17_cur, rx17_curclass, "$!from", rx17_pos
  rxscan18_scan46:
    nqp_rxmark rx17_bstack, rxscan18_loop45, rx17_pos, 0
  rxscan18_done47:
  rxquantg19_loop48:
    ge rx17_pos, rx17_eos, rx17_fail41
    is_cclass $I11, .CCLASS_NUMERIC, rx17_tgt, rx17_pos
    unless $I11, rx17_fail41
    add rx17_pos, 1
    nqp_rxmark rx17_bstack, rxquantg19_done49, rx17_pos, rx17_rep
    goto rxquantg19_loop48
  rxquantg19_done49:
    rx17_cur."!cursor_pass"(rx17_pos, 'backtrack'=>1)
    .return (rx17_cur)
  rx17_restart40:
    repr_get_attr_obj rx17_cstack, rx17_cur, rx17_curclass, "$!cstack"
  rx17_fail41:
    unless rx17_bstack, rx17_done39
    pop $I19, rx17_bstack
    if_null rx17_cstack, rx17_cstack_done44
    unless rx17_cstack, rx17_cstack_done44
    dec $I19
    set $P11, rx17_cstack[$I19]
  rx17_cstack_done44:
    pop rx17_rep, rx17_bstack
    pop rx17_pos, rx17_bstack
    pop $I19, rx17_bstack
    lt rx17_pos, -1, rx17_done39
    lt rx17_pos, 0, rx17_fail41
    eq $I19, 0, rx17_fail41
    nqp_islist $I20, rx17_cstack
    unless $I20, rx17_jump42
    elements $I18, rx17_bstack
    le $I18, 0, rx17_cut43
    dec $I18
    set $I18, rx17_bstack[$I18]
  rx17_cut43:
    assign rx17_cstack, $I18
  rx17_jump42:
    jump $I19
  rx17_done39:
    rx17_cur."!cursor_fail"()
    .return (rx17_cur) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_25_1372810499.65851") :anon :lex :outer("cuid_20_1372810499.65851")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/Term/ANSIColor.pm"
.annotate 'line', 73
    .param pmc CALL_SIG :call_sig 
    .const 'Sub' $P5003 = 'cuid_22_1372810499.65851' 
    capture_lex $P5003 
    .const 'Sub' $P5003 = 'cuid_24_1372810499.65851' 
    capture_lex $P5003 
    .lex "$elem", $P101 
    .lex "call_sig", $P102 
    .lex "$*DISPATCHER", $P103 
    perl6_take_dispatcher 
    set $P5001, CALL_SIG
    set $P102, $P5001
    bind_signature 
.annotate 'line', 74
    find_lex $P5005, "%attrs"
    $P5006 = $P5005."reverse"()
    perl6ize_type $P5004, $P5006
    $P5007 = $P5004."exists"($P101)
    perl6ize_type $P5003, $P5007
    unless $P5003 goto if20_else50 
    .const 'Sub' $P5008 = 'cuid_22_1372810499.65851' 
    capture_lex $P5008
    $P5009 = $P5008()
    set $P5012, $P5009
    goto if20_end51
  if20_else50:
    .const 'Sub' $P5010 = 'cuid_24_1372810499.65851' 
    capture_lex $P5010
    $P5011 = $P5010()
    set $P5012, $P5011
  if20_end51:
    .return ($P5012) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_22_1372810499.65851") :anon :lex :outer("cuid_25_1372810499.65851")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/Term/ANSIColor.pm"
.annotate 'line', 74
    .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', 75
    find_lex $P5005, "@res"
    find_lex $P5008, "%attrs"
    $P5009 = $P5008."reverse"()
    perl6ize_type $P5007, $P5009
    find_lex $P5010, "$elem"
    $P5011 = $P5007."postcircumfix:<{ }>"($P5010)
    perl6ize_type $P5006, $P5011
    $P5012 = $P5005."push"($P5006)
    perl6ize_type $P5004, $P5012
    .return ($P5004) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_24_1372810499.65851") :anon :lex :outer("cuid_25_1372810499.65851")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/Term/ANSIColor.pm"
.annotate 'line', 76
    .param pmc CALL_SIG :call_sig 
    .const 'Sub' $P5005 = 'cuid_23_1372810499.65851' 
    capture_lex $P5005 
    .lex "$_", $P101 
    .lex "call_sig", $P102 
    .lex "$*DISPATCHER", $P103 
    perl6_take_dispatcher 
    .const 'Sub' $P5002 = 'cuid_23_1372810499.65851' 
    capture_lex $P5002
    set $P5003, CALL_SIG
    set $P102, $P5003
    bind_signature 
.annotate 'line', 77
    nqp_get_sc_object $P5009, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 158
    nqp_get_sc_object $P5010, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 155
    perl6_capture_lex $P5010
    $P5011 = $P5010()
    $P5012 = $P5011."Stringy"()
    $P5013 = $P5012."Stringy"()
    find_lex $P5008, "&infix:<~>"
    perl6_multi_dispatch_thunk $P5007, $P5008
    $P5014 = $P5007($P5009, $P5013)
    find_lex $P5006, "&die"
    perl6_multi_dispatch_thunk $P5005, $P5006
    $P5015 = $P5005($P5014)
    .return ($P5015) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_23_1372810499.65851") :anon :lex :outer("cuid_24_1372810499.65851")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/Term/ANSIColor.pm"
.annotate 'line', 77
    .lex "$_", $P101 
    nqp_get_sc_object $P5006, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 156
    find_lex $P5007, "$elem"
    find_lex $P5005, "&infix:<~>"
    perl6_multi_dispatch_thunk $P5004, $P5005
    $P5008 = $P5004($P5006, $P5007)
    nqp_get_sc_object $P5009, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 103
    find_lex $P5003, "&infix:<~>"
    perl6_multi_dispatch_thunk $P5002, $P5003
    $P5010 = $P5002($P5008, $P5009)
    .return ($P5010) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_28_1372810499.65851") :load :init
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/Term/ANSIColor.pm"
    .const 'Sub' $P5001 = 'cuid_27_1372810499.65851' 
    capture_lex $P5001 
    .local pmc cur_sc 
    .local pmc conflicts 
    nqp_dynop_setup 
    nqp_bigint_setup 
    nqp_native_call_setup 
    rakudo_dynop_setup 
    getinterp $P5001
    get_class $P5002, "LexPad"
    get_class $P5003, "Perl6LexPad"
    $P5001."hll_map"($P5002, $P5003)
    load_bytecode "ModuleLoader.pbc"
    get_root_namespace $P5003
    set $P5002, $P5003["nqp"]
    set $P5001, $P5002["ModuleLoader"]
    $P5001."load_module"("Perl6::ModuleLoader")
    .const 'Sub' $P5001 = "cuid_26_1372810499.65851" 
    get_hll_global $P5002, "ModuleLoader"
    $P5003 = $P5002."load_setting"("CORE")
    $P5001."set_outer_ctx"($P5003)
    nqp_create_sc $P5001, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C"
    set cur_sc, $P5001
    cur_sc."set_description"("/usr/local/lib/parrot/4.6.0/languages/perl6/lib/Term/ANSIColor.pm")
    new $P5002, 'ResizablePMCArray'
    set conflicts, $P5002
    new $P5003, 'ResizableStringArray'
    null $S5001
    push $P5003, $S5001
    push $P5003, "Uninstantiable"
    push $P5003, "25B76D5348C2A22A9722D68A7288B5D268CF8F4E-1372810229.31343"
    push $P5003, "src/gen/Metamodel.pm"
    push $P5003, "GLOBALish"
    push $P5003, "EXPORT"
    push $P5003, "$?PACKAGE"
    push $P5003, "::?PACKAGE"
    push $P5003, "Term"
    push $P5003, "$=pod"
    push $P5003, "!UNIT_MARKER"
    push $P5003, "5C7C172868FA9510BA84BFF074E73D635E54D9D3"
    push $P5003, "src/gen/CORE.setting"
    push $P5003, "&RESET"
    push $P5003, "&BOLD"
    push $P5003, "&UNDERLINE"
    push $P5003, "&INVERSE"
    push $P5003, "&BOLD_OFF"
    push $P5003, "&UNDERLINE_OFF"
    push $P5003, "&INVERSE_OFF"
    push $P5003, "%attrs"
    push $P5003, "&color"
    push $P5003, "&colored"
    push $P5003, "&colorvalid"
    push $P5003, "&colorstrip"
    push $P5003, "&uncolor"
    push $P5003, "\e[0m"
    push $P5003, "&?ROUTINE"
    push $P5003, "\e[1m"
    push $P5003, "\e[4m"
    push $P5003, "\e[7m"
    push $P5003, "\e[22m"
    push $P5003, "\e[24m"
    push $P5003, "\e[27m"
    push $P5003, "27420382D80CEF05775E7415279171A93892A1F1-1372810242.10453"
    push $P5003, "src/gen/BOOTSTRAP.pm"
    push $P5003, "0"
    push $P5003, "reset"
    push $P5003, "1"
    push $P5003, "bold"
    push $P5003, "4"
    push $P5003, "underline"
    push $P5003, "7"
    push $P5003, "inverse"
    push $P5003, "30"
    push $P5003, "black"
    push $P5003, "31"
    push $P5003, "red"
    push $P5003, "32"
    push $P5003, "green"
    push $P5003, "33"
    push $P5003, "yellow"
    push $P5003, "34"
    push $P5003, "blue"
    push $P5003, "35"
    push $P5003, "magenta"
    push $P5003, "36"
    push $P5003, "cyan"
    push $P5003, "37"
    push $P5003, "white"
    push $P5003, "39"
    push $P5003, "default"
    push $P5003, "40"
    push $P5003, "on_black"
    push $P5003, "41"
    push $P5003, "on_red"
    push $P5003, "42"
    push $P5003, "on_green"
    push $P5003, "43"
    push $P5003, "on_yellow"
    push $P5003, "44"
    push $P5003, "on_blue"
    push $P5003, "45"
    push $P5003, "on_magenta"
    push $P5003, "46"
    push $P5003, "on_cyan"
    push $P5003, "47"
    push $P5003, "on_white"
    push $P5003, "49"
    push $P5003, "on_default"
    push $P5003, "$what"
    push $P5003, "@res"
    push $P5003, "@a"
    push $P5003, " "
    push $P5003, "Invalid attribute name '"
    push $P5003, "'"
    push $P5003, "$attr"
    push $P5003, "\e["
    push $P5003, ";"
    push $P5003, "m"
    push $P5003, "$how"
    push $P5003, "$el"
    push $P5003, ""
    push $P5003, "\e"
    push $P5003, "0123456789;"
    push $P5003, "%_"
    push $P5003, "$*DISPATCHER"
    push $P5003, "g"
    push $P5003, "$str"
    push $P5003, "@list"
    push $P5003, "\\e["
    push $P5003, "Bad escape sequence: "
    push $P5003, "$elem"
    push $P5003, "NAME"
    push $P5003, "Term::ANSIColor - Color screen output using ANSI escape sequences"
    push $P5003, "SYNOPSIS"
    push $P5003, "use Term::ANSIColor;\nsay color('bold'), \"this is in bold\", color('reset');\nsay colored('underline red on_green', 'what a lovely colours!');\nsay BOLD, 'good to be fat!', BOLD_OFF;\nsay 'ok' if colorvalid('magenta', 'on_black', 'inverse');\nsay '\\e[36m is ', uncolor('\\e36m');\nsay colorstrip(\"\\e[1mThis is bold\\e[0m\");"
    push $P5003, "DESCRIPTION"
    push $P5003, "Term::ANSIColor provides an interface for using colored output"
    push $P5003, "in terminals. The following functions are available:"
    push $P5003, "Term::ANSIColor provides an interface for using colored output in terminals. The following functions are available:"
    push $P5003, "color()"
    push $P5003, "C"
    push $P5003, "2"
    push $P5003, "Given a string with color names, the output produced by "
    push $P5003, "sets the terminal output so the text printed after it will be colored"
    push $P5003, "as specified. The following color names are recognised:"
    push $P5003, " sets the terminal output so the text printed after it will be colored"
    push $P5003, " sets the terminal output so the text printed after it will be colored as specified. The following color names are recognised:"
    push $P5003, "reset bold underline inverse black red green yellow blue\nmagenta cyan white default on_black on_red on_green on_yellow\non_blue on_magenta on_cyan on_white on_default"
    push $P5003, "The on_* family of colors correspond to the background colors."
    push $P5003, "colored()"
    push $P5003, " is similar to "
    push $P5003, ". It takes two Str arguments,"
    push $P5003, "where the first is the colors to be used, and the second is the string"
    push $P5003, "to be colored. The "
    push $P5003, " sequence is automagically placed after"
    push $P5003, "the string."
    push $P5003, ". It takes two Str arguments, where the first is the colors to be used, and the second is the string"
    push $P5003, ". It takes two Str arguments, where the first is the colors to be used, and the second is the string to be colored. The "
    push $P5003, " sequence is automagically placed after the string."
    push $P5003, "colorvalid()"
    push $P5003, " gets an array of color specifications (like those"
    push $P5003, "passed to "
    push $P5003, ") and returns true if all of them are valid,"
    push $P5003, "false otherwise."
    push $P5003, " gets an array of color specifications (like those passed to "
    push $P5003, ") and returns true if all of them are valid, false otherwise."
    push $P5003, "colorstrip()"
    push $P5003, "colorstrip"
    push $P5003, ", given a string, removes all the escape sequences"
    push $P5003, "in it, leaving the plain text without effects."
    push $P5003, ", given a string, removes all the escape sequences in it, leaving the plain text without effects."
    push $P5003, "uncolor()"
    push $P5003, "Given escape sequences, "
    push $P5003, " returns a string with readable"
    push $P5003, "color names. E.g. passing \"\\e[36;44m\" will result in \"cyan on_blue\"."
    push $P5003, " returns a string with readable color names. E.g. passing \"\\e[36;44m\" will result in \"cyan on_blue\"."
    push $P5003, "Constants"
    push $P5003, "Term::ANSIColor"
    push $P5003, " provides constants which are just strings of"
    push $P5003, "appropriate escape sequences. The following constants are available:"
    push $P5003, " provides constants which are just strings of appropriate escape sequences. The following constants are available:"
    push $P5003, "RESET BOLD UNDERLINE INVERSE BOLD_OFF UNDERLINE_OFF INVERSE_OFF"
    push $P5003, "pod"
    push $P5003, "GLOBAL"
    push $P5003, "ALL"
    push $P5003, "DEFAULT"
    push $P5003, "ANSIColor"
    push $P5003, "3B5823CF115D2D332A76E16C0814B4A030A2FFA1-1372810037.12773"
    push $P5003, "src/stage2/QASTNode.nqp"
    push $P5003, "28FAC381EB59BA79DA1D75F70404C20E0548F4F5-1372810034.5696"
    push $P5003, "src/stage2/NQPCORE.setting"
    push $P5003, "p6typecheckrv"
    push $P5003, "p6decontrv"
    push $P5003, "6"
    push $P5003, "Ss"
    .const 'Sub' $P5004 = 'cuid_27_1372810499.65851' 
    capture_lex $P5004
    $P5005 = $P5004()
    nqp_deserialize_sc "[encoded data, 50136 characters]", cur_sc, $P5003, $P5005, conflicts
    unless conflicts goto if21_end55 
    get_hll_global $P5006, "ModuleLoader"
    $P5007 = $P5006."resolve_repossession_conflicts"(conflicts)
  if21_end55:
    .const "LexInfo" $P5001 = "cuid_1_1372810499.65851"
    nqp_get_sc_object $P5002, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 2
    $P5001."set_static_lexpad"($P5002)
    .const "LexInfo" $P5001 = "cuid_2_1372810499.65851"
    nqp_get_sc_object $P5002, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 7
    $P5001."set_static_lexpad"($P5002)
    .const "LexInfo" $P5001 = "cuid_3_1372810499.65851"
    nqp_get_sc_object $P5002, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 11
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_3_1372810499.65851" 
    nqp_get_sc_object $P5002, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 8
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_4_1372810499.65851"
    nqp_get_sc_object $P5002, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 19
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_4_1372810499.65851" 
    nqp_get_sc_object $P5002, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 16
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_5_1372810499.65851"
    nqp_get_sc_object $P5002, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 23
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_5_1372810499.65851" 
    nqp_get_sc_object $P5002, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 20
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_6_1372810499.65851"
    nqp_get_sc_object $P5002, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 27
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_6_1372810499.65851" 
    nqp_get_sc_object $P5002, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 24
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_7_1372810499.65851"
    nqp_get_sc_object $P5002, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 31
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_7_1372810499.65851" 
    nqp_get_sc_object $P5002, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 28
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_8_1372810499.65851"
    nqp_get_sc_object $P5002, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 35
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_8_1372810499.65851" 
    nqp_get_sc_object $P5002, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 32
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_9_1372810499.65851"
    nqp_get_sc_object $P5002, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 39
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_9_1372810499.65851" 
    nqp_get_sc_object $P5002, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 36
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_10_1372810499.65851"
    nqp_get_sc_object $P5002, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 88
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_11_1372810499.65851" 
    nqp_get_sc_object $P5002, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 92
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_12_1372810499.65851" 
    nqp_get_sc_object $P5002, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 94
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_13_1372810499.65851" 
    nqp_get_sc_object $P5002, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 91
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_10_1372810499.65851" 
    nqp_get_sc_object $P5002, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 85
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_14_1372810499.65851"
    nqp_get_sc_object $P5002, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 112
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_14_1372810499.65851" 
    nqp_get_sc_object $P5002, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 106
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_15_1372810499.65851" 
    nqp_get_sc_object $P5002, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 115
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_16_1372810499.65851"
    nqp_get_sc_object $P5002, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 121
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_16_1372810499.65851" 
    nqp_get_sc_object $P5002, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 113
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_17_1372810499.65851"
    nqp_get_sc_object $P5002, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 125
    $P5001."set_static_lexpad"($P5002)
    .const "LexInfo" $P5001 = "cuid_18_1372810499.65851"
    nqp_get_sc_object $P5002, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 132
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_18_1372810499.65851" 
    nqp_get_sc_object $P5002, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 127
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_19_1372810499.65851" 
    nqp_get_sc_object $P5002, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 126
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_17_1372810499.65851" 
    nqp_get_sc_object $P5002, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 122
    perl6_associate_sub_code_object $P5001, $P5002
    .const "LexInfo" $P5001 = "cuid_20_1372810499.65851"
    nqp_get_sc_object $P5002, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 143
    $P5001."set_static_lexpad"($P5002)
    .const "LexInfo" $P5001 = "cuid_21_1372810499.65851"
    nqp_get_sc_object $P5002, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 150
    $P5001."set_static_lexpad"($P5002)
    .const 'Sub' $P5001 = "cuid_21_1372810499.65851" 
    nqp_get_sc_object $P5002, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 145
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_22_1372810499.65851" 
    nqp_get_sc_object $P5002, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 152
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_23_1372810499.65851" 
    nqp_get_sc_object $P5002, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 155
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_24_1372810499.65851" 
    nqp_get_sc_object $P5002, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 154
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_25_1372810499.65851" 
    nqp_get_sc_object $P5002, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 151
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_20_1372810499.65851" 
    nqp_get_sc_object $P5002, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 140
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_2_1372810499.65851" 
    nqp_get_sc_object $P5002, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 307
    perl6_associate_sub_code_object $P5001, $P5002
    .const 'Sub' $P5001 = "cuid_1_1372810499.65851" 
    nqp_get_sc_object $P5002, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 3
    perl6_associate_sub_code_object $P5001, $P5002
    nqp_get_sc_object $P5001, "FC270E3F92DFCE08DE374241B7A946C7DC50B67C", 0
    set_hll_global "GLOBAL", $P5001
    .return () 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_27_1372810499.65851") :anon :lex :outer("cuid_28_1372810499.65851")
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/Term/ANSIColor.pm"
    new $P5001, 'ResizablePMCArray'
    .const 'Sub' $P5002 = "cuid_3_1372810499.65851" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_4_1372810499.65851" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_5_1372810499.65851" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_6_1372810499.65851" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_7_1372810499.65851" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_8_1372810499.65851" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_9_1372810499.65851" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_11_1372810499.65851" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_12_1372810499.65851" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_13_1372810499.65851" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_10_1372810499.65851" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_14_1372810499.65851" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_15_1372810499.65851" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_16_1372810499.65851" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_18_1372810499.65851" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_19_1372810499.65851" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_17_1372810499.65851" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_21_1372810499.65851" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_22_1372810499.65851" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_23_1372810499.65851" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_24_1372810499.65851" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_25_1372810499.65851" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_20_1372810499.65851" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_2_1372810499.65851" 
    push $P5001, $P5002
    .const 'Sub' $P5002 = "cuid_1_1372810499.65851" 
    push $P5001, $P5002
    .return ($P5001) 
.end
.HLL "perl6"
.namespace []
.sub "" :subid("cuid_29_1372810499.65851") :load
.annotate 'file', "/usr/local/lib/parrot/4.6.0/languages/perl6/lib/Term/ANSIColor.pm"
    .const 'Sub' $P5001 = "cuid_26_1372810499.65851" 
    $P5002 = $P5001()
    .return ($P5002) 
.end