SineSwiper

<?xml version="1.0" encoding="utf-8"?>
<ModsConfigData>
  <version>1.3.3052 rev621</version>
  <activeMods>
    <li>brrainz.harmony</li>
    <li>ludeon.rimworld</li>
    <li>ludeon.rimworld.royalty</li>
    <li>unlimitedhugs.hugslib</li>
    <li>erdelf.humanoidalienraces</li>
    <li>unlimitedhugs.allowtool</li>

SineSwiper

RandomElementByWeight with totalWeight=0 - use TryRandomElementByWeight.
Verse.Log:Error(String, Boolean)
Verse.GenCollection:RandomElementByWeight(IEnumerable`1, Func`2)
RimWorld.PawnApparelGenerator:DMD<DMD<GenerateWorkingPossibleApparelSetFor_Patch0>?1551514240::GenerateWorkingPossibleApparelSetFor_Patch0>(Pawn, Single, List`1)
RimWorld.PawnApparelGenerator:DMD<DMD<GenerateStartingApparelFor_Patch2>?139917440::GenerateStartingApparelFor_Patch2>(Pawn, PawnGenerationRequest)
Verse.PawnGenerator:DMD<DMD<GenerateGearFor_Patch1>?-1373472768::GenerateGearFor_Patch1>(Pawn, PawnGenerationRequest)
Verse.PawnGenerator:TryGenerateNewPawnInternal(PawnGenerationRequest&, String&, Boolean, Boolean)
Verse.PawnGenerator:GenerateNewPawnInternal(PawnGenerationRequest&)
Verse.PawnGenerator:GenerateOrRedressPawnInternal(PawnGenerationRequest)
Verse.PawnGenerator:DMD<DMD<GeneratePawn_Patch1>?-375606656::GeneratePawn_Patch1>(PawnGenerationRequest)

SineSwiper

Spotify:
    + 100% of favorites collection (though, this is the baseline, so I don't know what's missing)
    + Has a real Windows client
    + Remote playback
    - Doesn't work on Roku
    + Works on Amazon Fire + Echo
    + Works on Android
    + Playlists work fine
    + Discover Weekly and Release Radar playlists
    ~ No thumbs up/down system; Put favorite songs into a Starred list

SineSwiper

use Net::Travis::API::UA;
use Devel::Dwarn;

my $ua = Net::Travis::API::UA->new();
#my $result = $ua->get('/repos/dbsrgits/dbix-class');
my $result = $ua->get('/repos/dbsrgits/dbix-class/builds/23558604');

die "Failed!" unless ($result->content_type eq 'application/json');

my $repo_info = $result->content_json;

SineSwiper

package # Hide from PAUSE
   DBIx::Class::SQLMaker::SQLStatement;

use parent 'DBIx::Class::SQLMaker';

# SQL::Statement does not understand
# INSERT INTO $table DEFAULT VALUES
# Adjust SQL here instead
sub insert {  # basically just a copy of the MySQL version...
   my $self = shift;

SineSwiper

use v5.10;
use MetaCPAN::API;
use Data::Dumper;
use List::AllUtils qw(min max);
use DateTime;
use DateTime::Format::ISO8601;

my @score_label = qw(
   Abysmal
   Poor

SineSwiper

### Old ERROR_* code ###

Z:\code\_others\Pegex>perl -Ilib xt\speed.t
ok 1 - ./xt/grammars/pegex.pgx parses in 0.105833 seconds
ok 2 - ./xt/grammars/testml.pgx parses in 0.155526 seconds
ok 3 - ./xt/grammars/json.pgx parses in 0.028492 seconds
ok 4 - ./xt/grammars/yaml.pgx parses in 0.067088 seconds
ok 5 - ./xt/grammars/pg-lexer.pgx parses in 0.983403 seconds
ok 6 - ./xt/grammars/Pg.pgx parses in 10.429001 seconds
1..6

SineSwiper

use P9Y::ProcessTable;
use Data::Dump;
 
my $p = P9Y::ProcessTable->new;
my @list = $p->table;

dd \@list;

SineSwiper

sub near ($$$) {
    my ($got, $expect, $test) = @_;
    my $d = $expect ? abs($got/$expect - 1) : abs($got);
    local $Test::Builder::Level = $Test::Builder::Level + 1;
    $expect =~ /nan/i ? 
       ok( $got eq $expect, $test)  || diag("NaN is? $got ~= $expect") :
       cmp_ok($d, '<', $eps, $test) || diag("near? $got ~= $expect");
}

SineSwiper

(11:18:06 AM) SineSwiper: some interesting stuff: http://eli.thegreenplace.net/2010/01/02/top-down-operator-precedence-parsing/
(11:20:42 AM) SineSwiper: especially this: http://eli.thegreenplace.net/2009/03/20/a-recursive-descent-parser-with-an-infix-expression-evaluator/
(11:20:56 AM) SineSwiper: this is exactly the problem I'm having with a_expr and the like
(11:21:45 AM) SineSwiper: and I was close to what the solution was supposed to be: descending levels of recursion
(11:23:17 AM) SineSwiper: ingy: ^^^
(11:34:24 AM) SineSwiper: it's looking like Pegex should be supporting some form of %left/%right syntax

(9:47:03 PM) SineSwiper: ingy: the more I'm converting this, the more I'm thinking there should be a { } syntax in Pegex that introduces an Acmeist "return language"
(9:48:37 PM) SineSwiper: the tree needs to be warped into place, and it's annoying that simple changes like "opt_nowait:   NOWAIT { TRUE }" end up having to be split into two files
(9:48:41 PM) rking: SineSwiper: What do you mean by “"retu