~ubuntu-branches/ubuntu/trusty/libtext-roman-perl/trusty

« back to all changes in this revision

Viewing changes to t/05-ecalder.t

  • Committer: Package Import Robot
  • Author(s): Axel Beckert, Martín Ferrari, Frank Lichtenheld, gregor herrmann, Nathan Handler, Ansgar Burchardt, Salvatore Bonaccorso, Axel Beckert
  • Date: 2013-12-23 03:49:42 UTC
  • mfrom: (1.1.1)
  • Revision ID: package-import@ubuntu.com-20131223034942-2wfam4kunyf95j8t
Tags: 3.5-1
[ Martín Ferrari ]
* Now there is an unofficial release on CPAN, I'm putting the homepage and
  the debian/watch file again.

[ Frank Lichtenheld ]
* build-stamp should depend on configure-stamp, not build.
  binary-arch should not depend on clean. Also call
  make as $(MAKE). Fixes parallel build. Found by Daniel Schepler.
* Add $(MAKE) test call. Actually touch build-stamp to not run
  the tests twice.

[ gregor herrmann ]
* debian/control: Added: Vcs-Svn field (source stanza); Vcs-Browser
  field (source stanza); Homepage field (source stanza). Removed: XS-
  Vcs-Svn fields.
* Update Homepage field and remove pseudo-field from description.
* debian/rules: remove emtpy /usr/lib/perl5 directory.
* debian/rules: delete /usr/lib/perl5 only if it exists.
* debian/watch: use dist-based URL.
* debian/control: Changed: Switched Vcs-Browser field to ViewSVN
  (source stanza).
* debian/control: Added: ${misc:Depends} to Depends: field.

[ Nathan Handler ]
* debian/watch: Update to ignore development releases.

[ Ansgar Burchardt ]
* debian/control: Convert Vcs-* fields to Git.

[ gregor herrmann ]
* debian/control: update {versioned,alternative} (build) dependencies.

[ Salvatore Bonaccorso ]
* Change Vcs-Git to canonical URI (git://anonscm.debian.org)

[ Axel Beckert ]
* Switch debian/watch and Homepage header to metacpan.org URLs
  + Detects new upstream versions again
* New upstream release
* Rewrite (no more working) debian/rules from scratch with dh-style
  debhelper (compatibility level 9)
  + Remove Changes from debian/docs
* Remove empty directory /usr/share/perl5/Text/Roman/ in debian/rules
* Bump Standards-Version to 3.9.5 (no further changes)
* Rewrite short and long description based on upstream's README
* Switch to source format "3.0 (quilt)"
* Add myself as Uploader

Show diffs side-by-side

added added

removed removed

Lines of Context:
 
1
#!perl
 
2
use strict;
 
3
use warnings qw(all);
 
4
 
 
5
use Carp qw(croak);
 
6
use Test::Simple tests => 7;
 
7
 
 
8
use Text::Roman qw/isroman roman2int int2roman ismilhar milhar2int/;
 
9
ok(1, 'use Text::Roman');
 
10
 
 
11
# test reciprocity
 
12
 
 
13
my $n = 3999;
 
14
my @r;
 
15
$r[$_] = int2roman($_) for 1 .. $n;
 
16
ok(1, "array created");
 
17
for (1 .. $n) {
 
18
    my $ar;
 
19
    croak "$_: $r[$_] != $ar" unless ($ar = roman2int($r[$_])) == $_;
 
20
}
 
21
ok(1, "reciprocity tested");
 
22
 
 
23
ok(isroman("IV"), "is roman");
 
24
ok(!isroman("IVI"), "is not roman");
 
25
ok(milhar2int("IV_VIII") == 4008, "milhar converted");
 
26
 
 
27
ok(1, "done");