Author: bernhard
Date: Tue Jul 22 09:03:29 2008
New Revision: 29679

Modified:
   trunk/languages/pipp/t/php/comments.t

Log:
[Pipp] More TODO test cases with three end of line comments


Modified: trunk/languages/pipp/t/php/comments.t
==============================================================================
--- trunk/languages/pipp/t/php/comments.t       (original)
+++ trunk/languages/pipp/t/php/comments.t       Tue Jul 22 09:03:29 2008
@@ -18,7 +18,7 @@
 use lib "$FindBin::Bin/../../lib";
 
 # core Perl modules
-use Test::More     tests => 5;
+use Test::More     tests => 10;
 
 # Parrot modules
 use Parrot::Test;
@@ -51,10 +51,62 @@
 Hello, World!
 OUT
 
-language_output_is( 'Pipp', <<'CODE', <<'OUT', 'three end of line comments', 
todo => 'broken' );
+language_output_is( 'Pipp', <<'CODE', <<'OUT', 'two // comments' );
 <?php
 //
 //
+echo "asdf\n";
+?>
+CODE
+asdf
+OUT
+
+language_output_is( 'Pipp', <<'CODE', <<'OUT', 'three // comments', todo => 
'broken' );
+<?php
+//
+//
+//
+echo "asdf\n";
+?>
+CODE
+asdf
+OUT
+
+language_output_is( 'Pipp', <<'CODE', <<'OUT', 'two # comments' );
+<?php
+#
+#
+echo "asdf\n";
+?>
+CODE
+asdf
+OUT
+
+language_output_is( 'Pipp', <<'CODE', <<'OUT', 'three # comments', todo => 
'broken' );
+<?php
+#
+#
+#
+echo "asdf\n";
+?>
+CODE
+asdf
+OUT
+
+language_output_is( 'Pipp', <<'CODE', <<'OUT', 'one # and one // comment' );
+<?php
+#
+//
+echo "asdf\n";
+?>
+CODE
+asdf
+OUT
+
+language_output_is( 'Pipp', <<'CODE', <<'OUT', 'one # and two // comments', 
todo => 'broken' );
+<?php
+#
+//
 //
 echo "asdf\n";
 ?>

Reply via email to