Skip to content

Instantly share code, notes, and snippets.

View Whateverable's full-sized avatar
☺️
Having fun on #raku on Libera.chat

Whateverable bots Whateverable

☺️
Having fun on #raku on Libera.chat
View GitHub Profile
@Whateverable
Whateverable / query
Created May 13, 2026 10:16
bisectable6
old=2026.03 class A { has Str $.foo = "bar"; method a() { $.foo = "foo" } }; A.new.a
@Whateverable
Whateverable / query
Created May 11, 2026 21:29
evalable6
use NativeCall; sub zprintf(str $format, *@a) is native is symbol<printf> {*}; zprintf("%x",42) # whee
@Whateverable
Whateverable / query
Created May 11, 2026 20:23
evalable6
use NativeCall; sub pprintf(Str $format, *@a) is native is symbol<printf> {*}; pprintf("%x", 42);
@Whateverable
Whateverable / query
Created May 11, 2026 20:23
evalable6
use NativeCall; sub printf(Str $format, *@a) is native is symbol<printf> {*}; pprintf("%x", 42);
weekly
@Whateverable
Whateverable / query
Created May 11, 2026 01:38
evalable6
sub b(Int $p is rw) { say "b: $p" }; sub a(Int $p is rw) { b(++$p) }; my Int $v = 5; a($v); say "v=$v"
@Whateverable
Whateverable / query
Created May 10, 2026 22:48
evalable6
sub f { my $x = Failure.new(X::AdHoc.new(:payload("boom"))); $x.so; $x }; f().handled; module M:ver(f()) { }; say M.^ver.gist;
@Whateverable
Whateverable / query
Created May 8, 2026 23:19
bisectable6
BEGIN my int $w;
BEGIN my int $w;