#!perl
# some checks for human compilation (lang=en_US). currently only for sanity, not
# thorough at all.
use 5.010;
use strict;
use warnings;
use FindBin '$Bin';
use lib "$Bin";
require "testlib.pl";
use Test::More 0.96;
my @tests = (
{schema=>"int",
result=>"bilangan bulat"},
# array
# -- test ordinate()
{schema=>[array => elems => ["int"]],
result=>"larik, elemen ke-1 harus: bilangan bulat"},
);
# XXX use test_sah_cases() when it supports js
for my $test (@tests) {
test_human(lang=>"id_ID", %$test);
}
done_testing;