Author: bernhard
Date: Tue Mar 14 10:58:58 2006
New Revision: 11900
Modified:
trunk/t/examples/japh.t
Log:
Add comments why JAPHs are failing.
Modified: trunk/t/examples/japh.t
==============================================================================
--- trunk/t/examples/japh.t (original)
+++ trunk/t/examples/japh.t Tue Mar 14 10:58:58 2006
@@ -1,5 +1,4 @@
-#! perl
-# Copyright: 2005 The Perl Foundation. All Rights Reserved.
+# Copyright: 2005-2006 The Perl Foundation. All Rights Reserved.
# $Id$
use strict;
@@ -37,13 +36,13 @@
# known reasons for failure
-my %todo = ( 1 => 'unknown reason',
- 2 => 'unknown reason',
- 4 => 'unknown reason',
+my %todo = ( 1 => 'opcode "pack" is gone',
+ 2 => 'opcode "pack" is gone',
+ 4 => 'namespace has changed',
8 => 'works only on little endian',
- 9 => 'unknown reason',
- 10 => 'unknown reason',
- 11 => 'unknown reason',
+ 9 => 'P1 is no longer special',
+ 10 => 'core dump',
+ 11 => 'opcode "pack" is gone, other reasons',
12 => 'unknown reason',
13 => 'unreliable, but often succeeds',
14 => 'unknown reason',
