Author: bernhard Date: Wed Mar 28 13:00:47 2007 New Revision: 17816 Added: trunk/languages/plumhead/t/variables.t Modified: trunk/MANIFEST trunk/MANIFEST.SKIP
Log: [Plumhead] Add test script languages/plumhead/t/variables.t. Last test case is failing. Modified: trunk/MANIFEST ============================================================================== --- trunk/MANIFEST (original) +++ trunk/MANIFEST Wed Mar 28 13:00:47 2007 @@ -1,7 +1,7 @@ # ex: set ro: # $Id$ # -# generated by tools/dev/mk_manifest_and_skip.pl Wed Mar 28 17:03:06 2007 UT +# generated by tools/dev/mk_manifest_and_skip.pl Wed Mar 28 19:55:15 2007 UT # # See tools/dev/install_files.pl for documentation on the # format of this file. @@ -1769,6 +1769,7 @@ languages/plumhead/t/selection.txt [plumhead] languages/plumhead/t/strings.t [plumhead] languages/plumhead/t/superglobals.t [plumhead] +languages/plumhead/t/variables.t [plumhead] languages/pugs/config/makefiles/root.in [pugs] languages/pugs/include/pugs_common.h [pugs] languages/pugs/pmc/pugsany.pmc [pugs] Modified: trunk/MANIFEST.SKIP ============================================================================== --- trunk/MANIFEST.SKIP (original) +++ trunk/MANIFEST.SKIP Wed Mar 28 13:00:47 2007 @@ -1,6 +1,6 @@ # ex: set ro: # $Id$ -# generated by tools/dev/mk_manifest_and_skip.pl Wed Mar 28 17:03:06 2007 UT +# generated by tools/dev/mk_manifest_and_skip.pl Wed Mar 28 19:55:15 2007 UT # # This file should contain a transcript of the svn:ignore properties # of the directories in the Parrot subversion repository. (Needed for @@ -217,6 +217,9 @@ ^compilers/pge/PGE/pmc/.*\.pdb/ ^compilers/pge/PGE/pmc/.*\.so$ ^compilers/pge/PGE/pmc/.*\.so/ +# generated from svn:ignore of 'compilers/pirc/' +^compilers/pirc/Makefile$ +^compilers/pirc/Makefile/ # generated from svn:ignore of 'compilers/tge/' ^compilers/tge/.*\.pbc$ ^compilers/tge/.*\.pbc/ Added: trunk/languages/plumhead/t/variables.t ============================================================================== --- (empty file) +++ trunk/languages/plumhead/t/variables.t Wed Mar 28 13:00:47 2007 @@ -0,0 +1,64 @@ +# $Id$ + +=head1 NAME + +plumhead/t/variables.t - tests for Plumhead + +=head1 DESCRIPTION + +Test variables. + +=cut + +# pragmata +use strict; +use warnings; + +use FindBin; +use lib "$FindBin::Bin/../lib", "$FindBin::Bin/../../../lib"; + +use Parrot::Config (); +use Parrot::Test; +use Test::More tests => 4; + + +language_output_is( 'Plumhead', <<'END_CODE', <<'END_OUT', 'string assignment' ); +<?php +$hello = "Hallo\n"; +echo $hello; +?> +END_CODE +Hallo +END_OUT + +language_output_is( 'Plumhead', <<'END_CODE', <<'END_OUT', 'integer assignment' ); +<?php +$hello = -1000; +echo $hello; +echo "\n"; +?> +END_CODE +-1000 +END_OUT + +language_output_is( 'Plumhead', <<'END_CODE', <<'END_OUT', 'expression assignment' ); +<?php +$hello = -1000 + 2000; +echo $hello; +echo "\n"; +?> +END_CODE +1000 +END_OUT + +language_output_is( 'Plumhead', <<'END_CODE', <<'END_OUT', 'expression assignment' ); +<?php +$h = -1000; +$e = 2000; +$l = $h + $e; +echo $l; +echo "\n"; +?> +END_CODE +1000 +END_OUT
