[svn:parrot] r48776 - in trunk: . examples/japh t/examples

[jkeenan at svn.parrot.org]

Author: jkeenan
Date: Sat Sep  4 01:50:43 2010
New Revision: 48776
URL: https://trac.parrot.org/parrot/changeset/48776

Log:
Per discussion in http://trac.parrot.org/parrot/ticket/1679, removing examples of JAPHs written in PASM and corresponding test.

Deleted:
   trunk/examples/japh/
   trunk/t/examples/japh.t
Modified:
   trunk/MANIFEST

Modified: trunk/MANIFEST
==============================================================================
--- trunk/MANIFEST	Fri Sep  3 23:14:03 2010	(r48775)
+++ trunk/MANIFEST	Sat Sep  4 01:50:43 2010	(r48776)
@@ -1,7 +1,7 @@
 # ex: set ro:
 # $Id$
 #
-# generated by tools/dev/mk_manifest_and_skip.pl Wed Sep  1 00:17:03 2010 UT
+# generated by tools/dev/mk_manifest_and_skip.pl Sat Sep  4 01:49:20 2010 UT
 #
 # See below for documentation on the format of this file.
 #
@@ -604,11 +604,6 @@
 examples/io/http.pir                                        [examples]
 examples/io/httpd.pir                                       [examples]
 examples/io/post.pir                                        [examples]
-examples/japh/README                                        [examples]
-examples/japh/japh1.pasm                                    [examples]
-examples/japh/japh3.pasm                                    [examples]
-examples/japh/japh4.pasm                                    [examples]
-examples/japh/japh5.pasm                                    [examples]
 examples/json/postalcodes.pir                               [examples]
 examples/json/test.pir                                      [examples]
 examples/languages/abc/MAINTAINER                           [examples]
@@ -1686,7 +1681,6 @@
 t/dynpmc/subclass_with_pir_method.t                         [test]
 t/dynpmc/subproxy.t                                         [test]
 t/examples/catchall.t                                       [test]
-t/examples/japh.t                                           [test]
 t/examples/library.t                                        [test]
 t/examples/namespace.t                                      [test]
 t/examples/pasm.t                                           [test]

Deleted: trunk/t/examples/japh.t
==============================================================================
--- trunk/t/examples/japh.t	Sat Sep  4 01:50:43 2010	(r48775)
+++ /dev/null	00:00:00 1970	(deleted)
@@ -1,56 +0,0 @@
-#!perl
-# Copyright (C) 2005-2009, Parrot Foundation.
-# $Id$
-
-use strict;
-use warnings;
-use lib qw( . lib ../lib ../../lib );
-use Test::More;
-use Parrot::Test tests => 5;
-use Parrot::Config;
-
-=head1 NAME
-
-t/examples/japh.t - Test some JAPHs
-
-=head1 SYNOPSIS
-
-    % prove t/examples/japh.t
-
-=head1 DESCRIPTION
-
-Test the JAPHs in 'examples/japh'.
-For now there are only JAPHs in PASM.
-
-Some JAPH are not really suitable for inclusion in automated tests.
-
-=head1 TODO
-
-Get the TODO JAPHs working or decide that they are not suitable for testing.
-
-=cut
-
-# known reasons for failure
-my %todo = ();
-if ( defined( $ENV{TEST_PROG_ARGS}) && $ENV{TEST_PROG_ARGS} =~ /--runcore=jit/ ) {
-    $todo{4} = 'broken with JIT';
-}
-
-# run all tests and tell about todoness
-foreach ( 1..5 ) {
-    my $pasm_fn = "examples/japh/japh$_.pasm";
-    unless ( -e $pasm_fn ) {
-        pass("deleted");
-        next;
-    }
-
-    my @todo = $todo{$_} ? ( todo => $todo{$_} ) : ();
-    example_output_is( $pasm_fn, "Just another Parrot Hacker\n", @todo );
-}
-
-# Local Variables:
-#   mode: cperl
-#   cperl-indent-level: 4
-#   fill-column: 100
-# End:
-# vim: expandtab shiftwidth=4: