test/recipes/90-test_memleak.t

   1 #! /usr/bi/nperl
   2
   3 use OpenSSL::Test;
   4
   5 setup("test_memleak");
   6 plan tests => 2;
   7 ok(run(test(["memleaktest"])), "running leak test");
   8 ok(run(test(["memleaktest", "freeit"])), "running no leak test");