#!/usr/bin/perl

use strict;
use lib qw(t . lib ../lib ../../lib ../../../lib ../../../../lib );
use Parrot::Test tests => 3;

language_output_is('pyparrot', <<'CODE', <<'OUTPUT', 'slices');
l1 = [ 1, 2, 3, 4, 5]
print l1[1:]
print l1[-1:]
CODE
OUTPUT

language_output_is('pyparrot', <<'CODE', <<'OUTPUT', 'noarg');
CODE
OUTPUT

language_output_is('pyparrot', <<'CODE', <<'OUTPUT', 'noarg');
CODE
OUTPUT