Skip to content
This repository
tag: v4.0
Fetching contributors…

Octocat-spinner-32-eaf2f5

Cannot retrieve contributors at this time

executable file 22 lines (17 sloc) 0.287 kb
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21
use v6;

class Main {

    say '1..2';

    my $x := 1;
    my $y := 2;
    my $x1 := 0;
    my $y1 := 0;
    { :$x1, :$y1 } := { y1 => $y, x1 => $x };
    if $x1 != 1 {
        print 'not '
    };
    say 'ok ', $x1;
    if $y1 != 2 {
        print 'not '
    };
    say 'ok ', $y1;

}
Something went wrong with that request. Please try again.