X-Git-Url: https://git.draconx.ca/gitweb/cdecl99.git/blobdiff_plain/0be9665d13739d12085ef2f5c2d4a47215d7612d..ed1e54031b12f5f5889f13ab75a88b903ced68c4:/tests/stress.at

diff --git a/tests/stress.at b/tests/stress.at
index 9b45cea..77c0d20 100644
--- a/tests/stress.at
+++ b/tests/stress.at
@@ -79,3 +79,13 @@ m4_define([sanity_check], [AT_CHECK([$AS_TR_SH([$2]) false])])
 m4_map([sanity_check], [sanity_tests])
 
 AT_CLEANUP
+
+AT_SETUP([random cross-parse])
+
+TEST_NEED_PROGRAM([randomdecl])
+TEST_NEED_PROGRAM([crossparse])
+
+printf 'Using seed %d\n' "$random_seed" >&AS_MESSAGE_LOG_FD
+AT_CHECK([randomdecl -n "$random_iter" -s "$random_seed"],, [stdout-nolog])
+AT_CHECK([crossparse -f stdout])
+AT_CLEANUP