X-Git-Url: https://git.draconx.ca/gitweb/cdecl99.git/blobdiff_plain/879d69d46fdf7ddf33beac6c32c7f2646d97d0ca..1e7603ac5a3cca436d75ab0ee0778ec18919cbd8:/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