Skip to content

Instantly share code, notes, and snippets.

@niner
niner / gist:1468847
Created December 12, 2011 20:02
Backtrace with proxied namespaces
#0 null_pmc_access (interp=0x612050, index=119) at src/pmc/null.c:2868
#1 0x00007ffff792cc45 in Parrot_Null_isa (interp=0x612050, _self=0x69bb58, _class=0x623378) at src/pmc/null.c:1197
#2 0x00007ffff79fb5be in Parrot_Proxy_isa (interp=0x789a50, _self=0x783230, _class=0x623378) at src/pmc/proxy.c:1013
#3 0x00007ffff78db2a8 in internal_ns_keyed_str (interp=0x789a50, base_ns=0x783208, key=0x61fa50, flags=0) at src/namespace.c:138
#4 0x00007ffff78dbc27 in Parrot_ns_get_namespace_keyed_str (interp=0x789a50, base_ns=0x783208, str_key=0x61fa50) at src/namespace.c:391
#5 0x00007ffff78f5c5f in Parrot_oo_get_class_str (interp=0x789a50, name=0x61fa50) at src/oo.c:433
#6 0x00007ffff79aca77 in Parrot_Class_isa (interp=0x789a50, _self=0x750248, classname=0x61fa50) at src/pmc/class.c:1133
#7 0x00007ffff79aba38 in Parrot_Class_does (interp=0x789a50, _self=0x750248, role_name=0x61fa50) at src/pmc/class.c:820
#8 0x00007ffff79c1c35 in create_buffer (interp=0x789a50, pmc=0x750248, info=0x833c00) at src/pmc/imageiofreez
@niner
niner / gist:1468875
Created December 12, 2011 20:09
Backtrace without cloning of classes
Breakpoint 2, 0x00007ffff50ca5e0 in exit () from /lib64/libc.so.6
(gdb) bt
#0 0x00007ffff50ca5e0 in exit () from /lib64/libc.so.6
#1 0x00007ffff78ac9d8 in Parrot_x_jump_out (interp=0x789a50, status=1) at src/exit.c:74
#2 0x00007ffff78ab301 in die_from_exception (interp=0x789a50, exception=0x833c78) at src/exceptions.c:153
#3 0x00007ffff78aba6d in Parrot_ex_throw_from_c (interp=0x789a50, exception=0x833c78) at src/exceptions.c:356
#4 0x00007ffff78abe00 in Parrot_ex_throw_from_c_args (interp=0x789a50, ret_addr_unused=0x0, exitcode=46, format=0x7ffff7ad1670 "%s() in read-only proxy of '%Ss'") at src/exceptions.c:440
#5 0x00007ffff79f88c1 in cant_do_write_method (interp=0x789a50, pmc=0x783208, index=160) at src/pmc/proxy.c:108
#6 0x00007ffff79fdc60 in Parrot_Proxy_set_pmc_keyed_str_orig (interp=0x789a50, _self=0x783208, key=0x70e818, value=0x833c50) at src/pmc/proxy.c:1856
#7 0x00007ffff79fc4a4 in Parrot_Proxy_set_pmc_keyed_str (interp=0x789a50, _self=0x783208, key=0x70e818, value=0x833c50) at src/pmc/pro
#0 0x00007ffff4e30d95 in raise () from /lib64/libc.so.6
#1 0x00007ffff4e322ab in abort () from /lib64/libc.so.6
#2 0x00007ffff7883b2f in Parrot_confess (cond=0x7ffff7a702b8 "(pmc) == NULL || PMC_IS_NULL(pmc) || PObj_is_shared_TEST(pmc) || (pmc)->orig_interp == (interp)", file=0x7ffff7a7023d "src/gc/gc_gms.c",
line=2253) at src/exceptions.c:554
#3 0x00007ffff7895798 in gc_gms_check_sanity (interp=0x789a10) at src/gc/gc_gms.c:2245
#4 0x00007ffff789189a in gc_gms_mark_and_sweep (interp=0x789a10, flags=0) at src/gc/gc_gms.c:810
#5 0x00007ffff7893918 in gc_gms_allocate_pmc_header (interp=0x789a10, flags=0) at src/gc/gc_gms.c:1474
#6 0x00007ffff7889af3 in Parrot_gc_new_pmc_header (interp=0x789a10, flags=0) at src/gc/api.c:312
#7 0x00007ffff78d3c49 in get_new_pmc_header (interp=0x789a10, base_type=16, flags=0) at src/pmc.c:571
#8 0x00007ffff78d339b in Parrot_pmc_new (interp=0x789a10, base_type=16) at src/pmc.c:217
.sub main :main
.local pmc task, sayer, dummy
sayer = get_global 'sayer'
dummy = new ['Integer']
task = new ['Task']
setattribute task, 'code', sayer
setattribute task, 'data', dummy
schedule task
wait task
.end
class Perl5Object {
has OpaquePointer $!ptr;
has PerlInterpreter $!perl5;
submethod BUILD(:$!ptr, PerlInterpreter :$!perl5) {
}
method sink() {
self;
}
1 parameters at (eval 1) line 8.
["Perl6"]
Perl6
Array.new("Perl6")
ok 1
2 parameters at (eval 1) line 8.
["Perl", 6]
Perl 6
Internal error: Unwound entire stack and missed handler
@niner
niner / gist:810b7fef636a660af1c9
Created September 12, 2014 09:27
systemd irssi configuration
nine@ns1:~> cat /etc/systemd/system/irssi.service
[Unit]
Description=IRC client
[Service]
Type=forking
User=nine
ExecStart=/usr/bin/screen -dmS irssi irssi
WorkingDirectory=/home/nine
role Perl5Class[$package] {
has $.parent is rw;
Bar.^add_fallback(-> $, $ { True },
method ($name) {
-> \self, |args {
$.parent.perl5.invoke($package, $.parent.ptr, $name, self, args.list);
}
[Unit]
Description=CMS 3000
[Service]
User=wwwrun
LimitDATA=2684354560
EnvironmentFile=/etc/sysconfig/cms3000
Environment=HOME=/var/lib/wwwrun DISPLAY=:0
ExecStart=/srv/www/cgi-bin/ZMS/script/zms_fastcgi.pl -n $PROCESSES -l /srv/www/tmp/cms.sock -M FCGI::ProcManager::MaxRequests
WorkingDirectory=/tmp
[Unit]
Description=IRC client
[Service]
Type=forking
User=nine
ExecStart=/usr/bin/screen -dmS irssi irssi
WorkingDirectory=/home/nine
[Install]