test/recipes/30-test_evp.t

   1 #! /usr/bin/perl
   2
   3 use strict;
   4 use warnings;
   5
   6 use OpenSSL::Test qw/:DEFAULT srctop_file/;
   7
   8 setup("test_evp");
   9
  10 plan tests => 1;
  11 ok(run(test(["evp_test", srctop_file("test", "evptests.txt")])),
  12    "running evp_test evptests.txt");