]> git.draconx.ca Git - cdecl99.git/blobdiff - testsuite.at
Avoid POSIX character classes in the test suite.
[cdecl99.git] / testsuite.at
index 1e6796580fa2a7c8325fbfba6edbf5cdf423f8c6..861d2c68c2bf23556ca7788e32c63761dbbb9153 100644 (file)
@@ -1,4 +1,4 @@
-AT_COPYRIGHT([Copyright © 2020 Nick Bowler])
+AT_COPYRIGHT([Copyright © 2020-2021, 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
@@ -28,11 +28,16 @@ AT_ARG_OPTION_ARG([random-iterations],
     [Number of randomized testcases to perform (default: 500)])],
   [random_iter=$at_optarg], [random_iter=])
 
+m4_define([RE_LOWER], [abcdefghijklmnopqrstuvwxyz])
+m4_define([RE_UPPER], m4_toupper(m4_defn([RE_LOWER])))
+m4_define([RE_ALPHA], m4_defn([RE_UPPER])m4_defn([RE_LOWER]))
+m4_define([RE_ALNUM], m4_defn([RE_ALPHA])[0-9])
+
 m4_divert_push([PREPARE_TESTS])dnl
 : ${LIBTOOL="$SHELL $builddir/libtool"}
-random_seed=`printf '%s' "$random_seed" | tr -cd '@<:@:digit:@:>@'`
+random_seed=`printf '%s' "$random_seed" | tr -cd '0123456789'`
 random_seed=${random_seed:-0}
-random_iter=`printf '%s' "$random_iter" | tr -cd '@<:@:digit:@:>@'`
+random_iter=`printf '%s' "$random_iter" | tr -cd '0123456789'`
 random_iter=`expr "$random_iter" '|' 500`
 m4_divert_pop([PREPARE_TESTS])