`random()` fails with `input parameter 'a' is null`

[falsifian]

I would expect random() to return a 0-dimensional array. Instead:

pdl> random()
Error in PDL::Primitive::random: input parameter 'a' is null at ../../blib/lib/PDL/PP.pm line 955, <STDIN> line 14.
        PDL::random("PDL") called at ../../blib/lib/PDL/PP.pm line 951
        PDL::Primitive::random() called at (eval 114) line 4
        main::__ANON__() called at /home/falsifian/perl5/bin/perldl line 682
        eval {...} called at /home/falsifian/perl5/bin/perldl line 682
        main::eval_and_report("random()\x{a}") called at /home/falsifian/perl5/bin/perldl line 618
        main::process_input() called at /home/falsifian/perl5/bin/perldl line 638
        eval {...} called at /home/falsifian/perl5/bin/perldl line 638

The documentation for random says it takes the same args as zeroes, but zeroes() returns a 0-D array as expected.