I hereby claim:
- I am jjatria on github.
- I am jjatria (https://keybase.io/jjatria) on keybase.
- I have a public key ASC5pMTi6LbL-PlveySXQVzho3UV4PSgfw3lRyMMq9XaAgo
To claim this, I am signing this object:
$if(%discnumber%,disc_%discnumber%\,)$right(0%track%,2).$replace($regexp($regexp($regexp($regexp($regexp($regexp($regexp($regexp($regexp($regexp($regexp($regexp($regexp($replace($lower(%title%),.,, ,_,'',,ñ,n,æ,ae,¹,1,²,2,³,3,×,times,ç,c),';_*',.),'[àáâãäå]',a),'[èéêë]',e),'[ìíîï]',i),'[òóôõöø]',o),'[ùúûü]',u),'[ðþ]',th),'[ýÿ]',y),'[+&]',and),'[¿?¡!#@%^,¤‘’¥°]',),'([._]?[[({]|(\)|\]|\})[._]?|\/)',.),'(\)|\])|\}$',),'^[[({]',),_-_,.,_._,.,..,.) |
# Compare results of if-blocks and inline-ifs in Praat | |
# Author: J J Atria | |
results = Create Table with column names: "table", 0, "sorted branching time" | |
# How long the data set | |
rows = 10000 | |
# How many iterations per data set | |
iterations = 20 |
# A bash function to add a -v option to Praat | |
# for printing the current version | |
praat() { | |
if [[ $@ == "-v" ]]; then | |
s=$(mktemp) | |
echo "printline 'praatVersion$'" > "$s" | |
praat "$s" | |
rm "$s" | |
else |
# Calculate the factorial of a number using | |
# a recursive procedure. | |
# A demonstration of the limitations of Praat | |
# procedures (and of possible workarounds). | |
# | |
# Author: José Joaquín Atria | |
procedure factorial: .n | |
# Cannot use an inline if here | |
if !variableExists("factorial.level") |
I hereby claim:
To claim this, I am signing this object:
#!/usr/bin/env perl | |
use feature qw( say ); | |
use JSON; | |
use LWP::Simple; | |
use DateTime; | |
my $url = "https://www.wanikani.com/api/user/$ENV{WANIKANI_API_KEY}"; | |
my $level = $ARGV[0] // current_level(); |
{ | |
"name": "English_default", | |
"speech_rate": 2.1184947958366696, | |
"mean_f0": 94.61124538100846, | |
"min_f0": 75.73525640729208, | |
"max_f0": 100.77011149739079, | |
"range_f0": 25.034855090098702, | |
"sd_f0": 5.503345067513809, | |
"mean_intensity": 73.06003609952407, | |
"min_intensity": 62.3023482497762, |
package Modulino::Load; | |
# ABSTRACT: Load modulinos into their own namespaces | |
use strict; | |
use warnings; | |
use Module::Runtime 'is_module_name'; | |
use Carp 'croak'; | |
# We heard you like legacy code |
Although I love using Raku, the fact that it is still a relatively young language means that there is a fair amount that is lacking when it comes to tooling, etc. Until recently, this included a way to calculate code coverage: how much of the code in a library is extercised (=covered) by that library's test suite.
Now, truth be told, this feature has been available for some time in the Comma IDE. But this (together with other arguably essential developer tools like profiling, etc) is only available in the "Complete" edition, which requires a paid subscription.
Still, I knew that the Raku compiler kept track of covered lines, so I always felt like this should be doable. It only needed someone to actually do it.
So, consider my surprise when, while recently browsing raku.land, I came across App::RaCoCo, which claims to be 'a Raku Code Coverage tool'. Sweet!