Rename test_distribution_PRNG -> test_random

Author: milancurcic

src/tests/stats/CMakeLists.txt

@@ -27,7 +27,7 @@ ADDTEST(moment)
 ADDTEST(rawmoment)
 ADDTEST(var)
 ADDTEST(varn)
-ADDTEST(distribution_PRNG)
+ADDTEST(random)
 ADDTEST(distribution_uniform)
 
 if(DEFINED CMAKE_MAXIMUM_RANK)

src/tests/stats/Makefile.manual

@@ -8,7 +8,6 @@ SRCGEN = $(SRCFYPP:.fypp=.f90)
 $(SRCGEN): %.f90: %.fypp common.fypp
 	fypp $(FYPPFLAGS) $< $@
 
-PROGS_SRC = $(SRCGEN) test_mean.f90 test_moment.f90 test_var.f90 \
-            test_distribution_PRNG.f90
+PROGS_SRC = $(SRCGEN) test_mean.f90 test_moment.f90 test_var.f90 test_random.f90
 
 include ../Makefile.manual.test.mk

src/tests/stats/test_random.f90

@@ -1,17 +1,17 @@
-module test_stats_distribution_prng
+module test_stats_random
     use stdlib_kinds, only: int8, int16, int32, int64
     use stdlib_random, only : random_seed, dist_rand
     use stdlib_test, only: new_unittest, unittest_type, error_type, check
 
     implicit none
 
     private
-    public :: collect_stats_distribution_prng
+    public :: collect_stats_random
 
 contains
 
     !> Collect all exported unit tests
-    subroutine collect_stats_distribution_prng(testsuite)
+    subroutine collect_stats_random(testsuite)
         !> Collection of tests
         type(unittest_type), allocatable, intent(out) :: testsuite(:)
 
@@ -23,7 +23,7 @@ subroutine collect_stats_distribution_prng(testsuite)
             new_unittest("random_rand_iint64", test_random_rand_iint8) &
         ]
 
-    end subroutine collect_stats_distribution_prng
+    end subroutine collect_stats_random
 
     subroutine test_random_seed(error)
         !> Error handling
@@ -104,13 +104,13 @@ subroutine test_random_rand_iint64(error)
         call check(error, all(res == ans))
     end subroutine test_random_rand_iint64
 
-end module test_stats_distribution_prng
+end module test_stats_random
 
 
 program tester
     use iso_fortran_env, only: error_unit
     use stdlib_test, only: new_testsuite, run_testsuite, testsuite_type
-    use test_stats_distribution_prng, only: collect_stats_distribution_prng
+    use test_stats_random, only: collect_stats_random
     implicit none
 
     integer :: stat, is
@@ -120,7 +120,7 @@ program tester
     stat = 0
 
     testsuites = [ &
-        new_testsuite("stats_distribution_prng", collect_stats_distribution_prng) &
+        new_testsuite("stats_random", collect_stats_random) &
         ]
 
     do is = 1, size(testsuites)