]> git.ipfire.org Git - thirdparty/openssl.git/blob - test/recipes/30-test_afalg.t
Raise an error on syscall failure in tls_retry_write_records
[thirdparty/openssl.git] / test / recipes / 30-test_afalg.t
1 #! /usr/bin/env perl
2 # Copyright 2015-2020 The OpenSSL Project Authors. All Rights Reserved.
3 #
4 # Licensed under the Apache License 2.0 (the "License"). You may not use
5 # this file except in compliance with the License. You can obtain a copy
6 # in the file LICENSE in the source distribution or at
7 # https://www.openssl.org/source/license.html
8
9 use strict;
10 use OpenSSL::Test qw/:DEFAULT/;
11 use OpenSSL::Test::Utils;
12
13 my $test_name = "test_afalg";
14 setup($test_name);
15
16 plan skip_all => "$test_name not supported for this build"
17 if disabled("afalgeng");
18
19 plan tests => 1;
20
21 ok(run(test(["afalgtest"])), "running afalgtest");