# $Id: hello.t 18515 2007-05-12 12:19:34Z bernhard $

=head1 NAME

lisp/t/atoms.t - tests for Parrot Common Lisp

=head1 DESCRIPTION

Basic types.

=cut

# pragmata
use strict;
use warnings;

use FindBin;
use lib "$FindBin::Bin/../lib", "$FindBin::Bin/../../../lib";

# core Perl modules
use Test::More     tests => 1;

# Parrot modules
use Parrot::Test;

language_output_is( 'Lisp', <<'END_CODE', <<'END_OUT', 'integer 1' );
(print 1)
END_CODE
1
END_OUT

# $Id$

=head1 NAME

lisp/t/atoms.t - tests for Parrot Common Lisp

=head1 DESCRIPTION

Basic types.

=cut

# pragmata
use strict;
use warnings;

use FindBin;
use lib "$FindBin::Bin/../lib", "$FindBin::Bin/../../../lib";

# core Perl modules
use Test::More     tests => 1;

# Parrot modules
use Parrot::Test;

language_output_is( 'Lisp', <<'END_CODE', <<'END_OUT', 'integer 1' );
(print 1)
END_CODE
1
END_OUT

Set a couple of SVN properties.
Set a couple of SVN properties.


git-svn-id: 6e74a02f85675cec270f5d931b0f6998666294a3@18736 d31e2699-5ff4-0310-a27c-f18f2fbe73fe
