root/lang/perl/Acme-Shukugawa-Atom/trunk/t/03_waiha.t @ 7989

Revision 7989, 411 bytes (checked in by daisuke, 7 years ago)

lang/perl/Acme-Shukugawa-Atom; rearrange tests

Line 
1use Test::Base;
2use utf8;
3
4plan tests => 1 + 1 * blocks;
5
6use_ok("Acme::Shukugawa::Atom");
7
8
9sub translate {
10    Acme::Shukugawa::Atom->translate(shift);
11}
12
13filters {
14    input => 'translate',
15};
16
17run_is;
18
19__DATA__
20
21===
22--- input:    ハワイ
23--- expected: ワイハー
24
25===
26--- input:    狼
27--- expected: カミオー
28
29===
30--- SKIP
31# mecabの辞書にない?
32--- input:    鋏
33--- expected: サミハー
34
35
Note: See TracBrowser for help on using the browser.