-# Copyright © 2012, 2020, 2022 Nick Bowler
+# Copyright © 2012, 2020, 2022-2023 Nick Bowler
#
# This program is free software: you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
AT_BANNER([Randomized tests])
dnl Verify the RNG implementation
-AT_SETUP([xoshiro256p sanity])
-
-TEST_NEED_PROGRAM([rng-test])
-AT_CHECK([rng-test >out
-grep -v '^ok' out], [0], [1..200
-])
-
-AT_CLEANUP
+TEST_TAP_SIMPLE([xoshiro256p sanity], [rng-test],
+ [TEST_NEED_PROGRAM([rng-test])])
dnl Verify that randomdecl actually produces all keywords and a variety
dnl of different declarations.
[[^type], [type name]],
[[inline], [inline function specifier]],
[[inline inline], [redundant function specifiers]],
- [[function (@<:@@<:@:alnum:@:>@_@:>@* as], [named function parameter]],
- [[function (void)], [empty prototype declaration]],
+ [[function [(]@<:@]]RE_ALNUM()_[[@:>@* as], [named function parameter]],
+ [[function [(]void[)]], [empty prototype declaration]],
[[function returning], [non-prototype function declaration]],
[[\.\.\.], [variadic function]],
[[const], [const qualifier]],
[[pointer to function], [pointer to a function]],
])
-m4_define([sanity_sed], [/$1/i\
-FOUND $2])AT_DATA([sanity.sed], [#n
-m4_map_sep([sanity_sed], [m4_newline], [sanity_tests])
+m4_define([sanity_awk], [[/$1/ { found["$2"] = 1; }
+]])AT_DATA([sanity.awk],
+[m4_map([sanity_awk], [sanity_tests])dnl
+END { for (k in found) print "FOUND", k; }
])
-sed -n '/^FOUND/p' sanity.sed | LC_ALL=C sort -u >expout
+
+m4_define([sanity_exp], [[FOUND $2
+]])
+LC_ALL=C sort >expout <<'EOF'
+m4_map([sanity_exp], [sanity_tests])dnl
+EOF
printf 'Using seed %d\n' "$random_seed" >&AS_MESSAGE_LOG_FD
AT_CHECK([randomdecl -En 10000 -s "$random_seed" >decls], [0])
-AT_CHECK([sed -f sanity.sed decls | LC_ALL=C sort -u], [0], [expout])
+AT_CHECK([$AWK -f sanity.awk decls | LC_ALL=C sort], [0], [expout])
AT_CLEANUP