Skip to content
Browse files

[lazy-k] Put the example scripts into the new dir 'examples'

git-svn-id: http://svn.perl.org/parrot/trunk@35992 d31e2699-5ff4-0310-a27c-f18f2fbe73fe
  • Loading branch information...
1 parent befa664 commit 4c68048ac0a9c2cbe6d566fdb6f8e47f81aaf6c7 bernhard committed
View
0 calc.lazy → examples/calc.lazy
File renamed without changes.
View
0 cat.lazy → examples/cat.lazy
File renamed without changes.
View
0 powers2.lazy → examples/powers2.lazy
File renamed without changes.
View
6 t/calc.t
@@ -3,11 +3,11 @@
=head1 NAME
-lazy-k/t/calc.t - testing calc.lazy
+t/calc.t - testing calc.lazy
=head1 SYNOPSIS
- % cd languages && perl lazy-k/t/calc.t
+ % cd languages/lazy-k && perl lazy-k/t/calc.t
=head1 DESCRIPTION
@@ -32,7 +32,7 @@ my $is_win32 = $^O eq 'MSWin32';
my $parrot = File::Spec->catfile( File::Spec->updir(), File::Spec->updir(), $PConfig{test_prog} );
my $lazy_k = "$parrot lazy.pbc";
-my $source_fn = 'calc.lazy';
+my $source_fn = 'examples/calc.lazy';
# XXX This does not look portable.
my $cmd;
View
8 t/cat.t
@@ -1,4 +1,4 @@
-# Copyright (C) 2005-2007, The Perl Foundation.
+# Copyright (C) 2005-2009, The Perl Foundation.
# $Id$
=head1 NAME
@@ -7,7 +7,7 @@ lazy-k/t/cat.t - testing cat.lazy
=head1 SYNOPSIS
- % cd languages && perl lazy-k/t/cat.t
+ % cd languages/lazy-k && perl t/cat.t
=head1 DESCRIPTION
@@ -24,7 +24,6 @@ use warnings;
use FindBin;
use lib "$FindBin::Bin/../../../lib";
-use Data::Dumper;
use Test::More tests => 1;
use Parrot::Config qw(%PConfig);
use File::Spec ();
@@ -33,7 +32,7 @@ my $is_win32 = $^O eq 'MSWin32';
my $parrot = File::Spec->catfile( File::Spec->updir(), File::Spec->updir(), $PConfig{test_prog} );
my $lazy_k = "$parrot lazy.pbc";
-my $source_fn = 'cat.lazy';
+my $source_fn = 'examples/cat.lazy';
# XXX This does not look portable.
my $cmd;
@@ -45,5 +44,4 @@ else {
$cmd = qq{echo '1+2*3' | $lazy_k $source_fn};
}
-# die Dumper( $cmd );
is( `$cmd`, "1+2*3\n", 'cat.lazy' );

0 comments on commit 4c68048

Please sign in to comment.
Something went wrong with that request. Please try again.