Author: bernhard Date: Fri Jun 1 13:52:29 2007 New Revision: 18728 Added: trunk/languages/lisp/t/arithmetics.t (contents, props changed) Modified: trunk/MANIFEST trunk/MANIFEST.SKIP
Log: [languages/lisp] Start with a test file for arithmetics. Modified: trunk/MANIFEST ============================================================================== --- trunk/MANIFEST (original) +++ trunk/MANIFEST Fri Jun 1 13:52:29 2007 @@ -1,7 +1,7 @@ # ex: set ro: # $Id$ # -# generated by tools/dev/mk_manifest_and_skip.pl Wed May 23 08:18:31 2007 UT +# generated by tools/dev/mk_manifest_and_skip.pl Fri Jun 1 20:49:58 2007 UT # # See tools/dev/install_files.pl for documentation on the # format of this file. @@ -1411,6 +1411,8 @@ languages/lisp/lisp/pred.l [lisp] languages/lisp/read.pir [lisp] languages/lisp/system.pir [lisp] +languages/lisp/t/arithmetics.t [lisp] +languages/lisp/t/atoms.t [lisp] languages/lisp/t/harness [lisp] languages/lisp/t/hello.t [lisp] languages/lisp/types.pir [lisp] Modified: trunk/MANIFEST.SKIP ============================================================================== --- trunk/MANIFEST.SKIP (original) +++ trunk/MANIFEST.SKIP Fri Jun 1 13:52:29 2007 @@ -1,6 +1,6 @@ # ex: set ro: # $Id$ -# generated by tools/dev/mk_manifest_and_skip.pl Sat May 12 14:07:21 2007 UT +# generated by tools/dev/mk_manifest_and_skip.pl Fri Jun 1 20:49:58 2007 UT # # This file should contain a transcript of the svn:ignore properties # of the directories in the Parrot subversion repository. (Needed for @@ -849,12 +849,14 @@ # generated from svn:ignore of 'languages/lua/src/' ^languages/lua/src/.*\.pbc$ ^languages/lua/src/.*\.pbc/ -^languages/lua/src/ASTGrammar\.pir$ -^languages/lua/src/ASTGrammar\.pir/ +^languages/lua/src/PASTGrammar_gen\.pir$ +^languages/lua/src/PASTGrammar_gen\.pir/ +^languages/lua/src/POSTGrammar_gen\.pir$ +^languages/lua/src/POSTGrammar_gen\.pir/ ^languages/lua/src/dumplex_gen\.pir$ ^languages/lua/src/dumplex_gen\.pir/ -^languages/lua/src/lua51_grammar_gen\.pir$ -^languages/lua/src/lua51_grammar_gen\.pir/ +^languages/lua/src/lua51_gen\.pir$ +^languages/lua/src/lua51_gen\.pir/ ^languages/lua/src/lua51_testlex_gen\.pir$ ^languages/lua/src/lua51_testlex_gen\.pir/ # generated from svn:ignore of 'languages/lua/t/' @@ -1013,6 +1015,9 @@ ^languages/perl6/src/pmc/.*\.pdb/ ^languages/perl6/src/pmc/.*\.so$ ^languages/perl6/src/pmc/.*\.so/ +# generated from svn:ignore of 'languages/perl6/t/' +^languages/perl6/t/spec$ +^languages/perl6/t/spec/ # generated from svn:ignore of 'languages/pheme/lib/' ^languages/pheme/lib/.*\.pbc$ ^languages/pheme/lib/.*\.pbc/ Added: trunk/languages/lisp/t/arithmetics.t ============================================================================== --- (empty file) +++ trunk/languages/lisp/t/arithmetics.t Fri Jun 1 13:52:29 2007 @@ -0,0 +1,30 @@ +# $Id$ + +=head1 NAME + +lisp/t/arithmetics.t - tests for Parrot Common Lisp + +=head1 DESCRIPTION + +Basic math. + +=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 3 ) ) +END_CODE +4 +END_OUT
