Author: bernhard
Date: Tue Jul 22 08:40:43 2008
New Revision: 29675
Added:
trunk/languages/pipp/t/php/comments.t
- copied, changed from r29671, /trunk/languages/pipp/t/php/hello.t
Modified:
trunk/MANIFEST
trunk/languages/pipp/t/php/hello.t
Log:
[Pipp] Move some comment tests from hello.t into comments.t.
Add a TODO test WRT to end of line comments.
Modified: trunk/MANIFEST
==============================================================================
--- trunk/MANIFEST (original)
+++ trunk/MANIFEST Tue Jul 22 08:40:43 2008
@@ -1,7 +1,7 @@
# ex: set ro:
# $Id$
#
-# generated by tools/dev/mk_manifest_and_skip.pl Tue Jul 22 13:07:40 2008 UT
+# generated by tools/dev/mk_manifest_and_skip.pl Tue Jul 22 15:34:40 2008 UT
#
# See tools/dev/install_files.pl for documentation on the
# format of this file.
@@ -2201,6 +2201,7 @@
languages/pipp/t/php/basic.t [pipp]
languages/pipp/t/php/builtin.t [pipp]
languages/pipp/t/php/closures.t [pipp]
+languages/pipp/t/php/comments.t [pipp]
languages/pipp/t/php/concat.t [pipp]
languages/pipp/t/php/constant.t [pipp]
languages/pipp/t/php/control_flow.t [pipp]
Copied: trunk/languages/pipp/t/php/comments.t (from r29671,
/trunk/languages/pipp/t/php/hello.t)
==============================================================================
--- /trunk/languages/pipp/t/php/hello.t (original)
+++ trunk/languages/pipp/t/php/comments.t Tue Jul 22 08:40:43 2008
@@ -2,11 +2,11 @@
=head1 NAME
-pipp/t/hello.t - tests for Pipp
+pipp/t/comments.t - tests for Pipp
=head1 DESCRIPTION
-A couple of 'Hello World' tests.
+Testing comments in code.
=cut
@@ -18,211 +18,54 @@
use lib "$FindBin::Bin/../../lib";
# core Perl modules
-use Test::More tests => 21;
+use Test::More tests => 5;
# Parrot modules
use Parrot::Test;
-language_output_is( 'Pipp', <<'END_CODE', 'Hello, World!', 'sea without
newline' );
-Hello, World!<?php
-?>
-END_CODE
-
-language_output_is( 'Pipp', <<'END_CODE', <<'END_EXPECTED', 'sea with one
newline' );
-Hello, World!
-<?php
-?>
-END_CODE
-Hello, World!
-END_EXPECTED
-
-language_output_is( 'Pipp', <<'END_CODE', <<'END_EXPECTED', 'sea with two
newlines' );
-Hello,
-World!
-<?php
-?>
-END_CODE
-Hello,
-World!
-END_EXPECTED
-
-language_output_is( 'Pipp', <<'END_CODE', <<'END_EXPECTED', 'sea without
following PHP code' );
-Hello,
-World!
-END_CODE
-Hello,
-World!
-END_EXPECTED
-
-language_output_is( 'Pipp', <<'END_CODE', <<'END_EXPECTED', 'sea without
following PHP code' );
-Hello,<?php
- ?> World!
-<?php
-?>
-END_CODE
-Hello, World!
-END_EXPECTED
-
-language_output_is( 'Pipp', <<'END_CODE', <<'END_EXPECTED', 'hello' );
-<?php
-echo "Hello, World!\n";
-?>
-END_CODE
-Hello, World!
-END_EXPECTED
-
-language_output_is( 'Pipp', <<'END_CODE', <<'END_EXPECTED', 'hello' );
-<?php
-echo 'Hello, World!';
-echo "\n";
-?>
-END_CODE
-Hello, World!
-END_EXPECTED
-
-
-language_output_is( 'Pipp', <<'END_CODE', 'Hello World', 'only alphanumic' );
-<?php echo "Hello World"; ?>
-END_CODE
-
-language_output_is( 'Pipp', <<'END_CODE', <<'END_EXPECTED', 'two echo
statements' );
-<?php
-echo "Hello, ";
-echo "World!\n";
-?>
-END_CODE
-Hello, World!
-END_EXPECTED
-
-language_output_is( 'Pipp', <<'END_CODE', <<'END_EXPECTED', 'two echo
statements' );
-<?php
-echo "Hello, ";
-?>Wo<?php
-echo "rl";
-?>d!
-<?php
-?>
-END_CODE
-Hello, World!
-END_EXPECTED
-
-language_output_is( 'Pipp', <<'END_CODE', <<'END_EXPECTED', 'hello with some
HTML' );
-<html>
-<head>
- <title>Servus</title>
-</head>
-<body>
-<pre>
-<?php
-echo "Hello, World!\n";
-?>
-</pre>
-</body>
-</html>
-END_CODE
-<html>
-<head>
- <title>Servus</title>
-</head>
-<body>
-<pre>
-Hello, World!
-</pre>
-</body>
-</html>
-END_EXPECTED
-
-
-language_output_is( 'Pipp', <<'END_CODE', <<'END_EXPECTED', 'hello in a
scalar' );
-<?php
-$h = "Hello, World!\n";
-echo $h;
-?>
-END_CODE
-Hello, World!
-END_EXPECTED
-
-
-language_output_is( 'Pipp', <<'END_CODE', <<'END_EXPECTED', 'hello in a hash'
);
-<?php
-$h["e"] = "Hello, World!\n";
-echo $h["e"];
-?>
-END_CODE
-Hello, World!
-END_EXPECTED
-
-
-language_output_is( 'Pipp', <<'END_CODE', <<'END_EXPECTED', 'no semicolon
befor CODE_END' );
-<?php
-echo 'Hello, ';
-echo "World!\n"
-?>
-END_CODE
-Hello, World!
-END_EXPECTED
-
-
-language_output_is( 'Pipp', <<'END_CODE', <<'END_EXPECTED', 'concatenation of
two strings' );
-<?php
-echo 'Hello, ' . "World!\n"
-?>
-END_CODE
-Hello, World!
-END_EXPECTED
-
-
-language_output_is( 'Pipp', <<'END_CODE', <<'END_EXPECTED', 'script tags' );
-<script language="php">
-echo "Hello, World!\n";
-</script>
-END_CODE
-Hello, World!
-END_EXPECTED
-
-
-language_output_is( 'Pipp', <<'END_CODE', <<'END_EXPECTED', 'end of line
comment #' );
-<script language="php">
-echo "Hello, World!\n"; # comment till end of line
-</script>
-END_CODE
-Hello, World!
-END_EXPECTED
-
-
-language_output_is( 'Pipp', <<'END_CODE', <<'END_EXPECTED', 'end of line
comment //' );
+language_output_is( 'Pipp', <<'CODE', <<'OUT', 'end of line comment //' );
<script language="php">
echo "Hello, World!\n"; // comment till end of line
</script>
-END_CODE
+CODE
Hello, World!
-END_EXPECTED
+OUT
-language_output_is( 'Pipp', <<'END_CODE', <<'END_EXPECTED', 'single line /* */
comment' );
+language_output_is( 'Pipp', <<'CODE', <<'OUT', 'single line /* */ comment' );
<script language="php">
echo "Hello, World!\n"; /* comment till end of line */
</script>
-END_CODE
+CODE
Hello, World!
-END_EXPECTED
-
+OUT
-language_output_is( 'Pipp', <<'END_CODE', <<'END_EXPECTED', 'multi line /* */
comment' );
+language_output_is( 'Pipp', <<'CODE', <<'OUT', 'multi line /* */ comment' );
<script language="php">
echo "Hello, World!\n"; /* multi
line
comment
*/
</script>
-END_CODE
+CODE
Hello, World!
-END_EXPECTED
+OUT
-language_output_is( 'Pipp', <<'END_CODE', <<'END_EXPECTED', 'script tags' );
+language_output_is( 'Pipp', <<'CODE', <<'OUT', 'three end of line comments',
todo => 'broken' );
+<?php
+//
+//
+//
+echo "asdf\n";
+?>
+CODE
+asdf
+OUT
+
+language_output_is( 'Pipp', <<'CODE', <<'OUT', 'end of line comment #' );
<script language="php">
-echo "Hello, World!\n";
+echo "Hello, World!\n"; # comment till end of line
</script>
-END_CODE
+CODE
Hello, World!
-END_EXPECTED
+OUT
Modified: trunk/languages/pipp/t/php/hello.t
==============================================================================
--- trunk/languages/pipp/t/php/hello.t (original)
+++ trunk/languages/pipp/t/php/hello.t Tue Jul 22 08:40:43 2008
@@ -18,7 +18,7 @@
use lib "$FindBin::Bin/../../lib";
# core Perl modules
-use Test::More tests => 21;
+use Test::More tests => 17;
# Parrot modules
use Parrot::Test;
@@ -181,44 +181,6 @@
END_EXPECTED
-language_output_is( 'Pipp', <<'END_CODE', <<'END_EXPECTED', 'end of line
comment #' );
-<script language="php">
-echo "Hello, World!\n"; # comment till end of line
-</script>
-END_CODE
-Hello, World!
-END_EXPECTED
-
-
-language_output_is( 'Pipp', <<'END_CODE', <<'END_EXPECTED', 'end of line
comment //' );
-<script language="php">
-echo "Hello, World!\n"; // comment till end of line
-</script>
-END_CODE
-Hello, World!
-END_EXPECTED
-
-
-language_output_is( 'Pipp', <<'END_CODE', <<'END_EXPECTED', 'single line /* */
comment' );
-<script language="php">
-echo "Hello, World!\n"; /* comment till end of line */
-</script>
-END_CODE
-Hello, World!
-END_EXPECTED
-
-
-language_output_is( 'Pipp', <<'END_CODE', <<'END_EXPECTED', 'multi line /* */
comment' );
-<script language="php">
-echo "Hello, World!\n"; /* multi
- line
- comment
-*/
-</script>
-END_CODE
-Hello, World!
-END_EXPECTED
-
language_output_is( 'Pipp', <<'END_CODE', <<'END_EXPECTED', 'script tags' );
<script language="php">
echo "Hello, World!\n";
