12345678910111213141516171819202122 |
- #! /usr/bin/env perl
- # Copyright 2015-2016 The OpenSSL Project Authors. All Rights Reserved.
- #
- # Licensed under the OpenSSL license (the "License"). You may not use
- # this file except in compliance with the License. You can obtain a copy
- # in the file LICENSE in the source distribution or at
- # https://www.openssl.org/source/license.html
- use strict;
- use warnings;
- use Math::BigInt;
- use OpenSSL::Test qw/:DEFAULT srctop_file/;
- setup("test_bn");
- plan tests => 1;
- ok(run(test(["bntest", srctop_file("test", "bntests.txt")])),
- "running bntest bntests.txt");
|