Ticket #439: packfile_tests.diff

File packfile_tests.diff, 3.2 KB (added by dukeleto, 6 years ago)

Better patch with MANIFEST changes included

  • MANIFEST

     
    18661866t/pmc/orderedhash.t                                         [test] 
    18671867t/pmc/os.t                                                  [test] 
    18681868t/pmc/packfile.t                                            [test] 
     1869t/pmc/packfileannotation.t                                  [test] 
     1870t/pmc/packfileannotations.t                                 [test] 
     1871t/pmc/packfileannotationkeys.t                              [test] 
    18691872t/pmc/packfileconstanttable.t                               [test] 
    18701873t/pmc/packfiledirectory.t                                   [test] 
    18711874t/pmc/packfilefixupentry.t                                  [test] 
  • t/pmc/packfileannotationkeys.t

     
     1#!perl 
     2# Copyright (C) 2006-2009, Parrot Foundation. 
     3 
     4use strict; 
     5use warnings; 
     6use lib qw( . lib ../lib ../../lib ); 
     7use Test::More; 
     8use Parrot::Test tests => 1; 
     9use Parrot::Config; 
     10 
     11=head1 NAME 
     12 
     13t/pmc/packfileannotationkeys.t - test the PackfileAnnotationKeys PMC 
     14 
     15 
     16=head1 SYNOPSIS 
     17 
     18    % prove t/pmc/packfileannotationkeys.t 
     19 
     20=head1 DESCRIPTION 
     21 
     22Tests the PackfileAnnotationKeys PMC. 
     23 
     24=cut 
     25 
     26 
     27# Packfile constructor 
     28 
     29pir_output_is( <<'CODE', <<'OUT', 'new' ); 
     30.sub 'test' :main 
     31    .local pmc pf 
     32    pf = new ['PackfileAnnotationKeys'] 
     33    $I0 = defined pf 
     34    say $I0 
     35.end 
     36CODE 
     371 
     38OUT 
  • t/pmc/packfileannotations.t

     
     1#!perl 
     2# Copyright (C) 2006-2009, Parrot Foundation. 
     3 
     4use strict; 
     5use warnings; 
     6use lib qw( . lib ../lib ../../lib ); 
     7use Test::More; 
     8use Parrot::Test tests => 1; 
     9use Parrot::Config; 
     10 
     11=head1 NAME 
     12 
     13t/pmc/packfileannotations.t - test the PackfileAnnotations PMC 
     14 
     15 
     16=head1 SYNOPSIS 
     17 
     18    % prove t/pmc/packfileannotations.t 
     19 
     20=head1 DESCRIPTION 
     21 
     22Tests the PackfileAnnotations PMC. 
     23 
     24=cut 
     25 
     26 
     27# Packfile constructor 
     28 
     29pir_output_is( <<'CODE', <<'OUT', 'new' ); 
     30.sub 'test' :main 
     31    .local pmc pf 
     32    pf = new ['PackfileAnnotations'] 
     33    $I0 = defined pf 
     34    say $I0 
     35.end 
     36CODE 
     371 
     38OUT 
  • t/pmc/packfileannotation.t

     
     1#!perl 
     2# Copyright (C) 2006-2009, Parrot Foundation. 
     3 
     4use strict; 
     5use warnings; 
     6use lib qw( . lib ../lib ../../lib ); 
     7use Test::More; 
     8use Parrot::Test tests => 1; 
     9use Parrot::Config; 
     10 
     11=head1 NAME 
     12 
     13t/pmc/packfileannotation.t - test the PackfileAnnotation PMC 
     14 
     15 
     16=head1 SYNOPSIS 
     17 
     18    % prove t/pmc/packfileannotation.t 
     19 
     20=head1 DESCRIPTION 
     21 
     22Tests the PackfileAnnotation PMC. 
     23 
     24=cut 
     25 
     26 
     27# Packfile constructor 
     28 
     29pir_output_is( <<'CODE', <<'OUT', 'new' ); 
     30.sub 'test' :main 
     31    .local pmc pf 
     32    pf = new ['PackfileAnnotation'] 
     33    $I0 = defined pf 
     34    say $I0 
     35.end 
     36CODE 
     371 
     38OUT