Added list comprehension test.

Spec: https://github.com/perl6/specs/blob/master/S04-control.pod#loop-statements