From e8be03716ad9d3f7596b60c0c48167dc7c8b3e9d Mon Sep 17 00:00:00 2001 From: Ben Gamari Date: Fri, 26 Nov 2021 23:48:02 -0500 Subject: testsuite: Specify expected word-size of machop tests These generally expect a particular word size. --- testsuite/tests/cmm/should_run/machops/all.T | 15 ++++++++------- 1 file changed, 8 insertions(+), 7 deletions(-) diff --git a/testsuite/tests/cmm/should_run/machops/all.T b/testsuite/tests/cmm/should_run/machops/all.T index d705f331dd..a10500f7c8 100644 --- a/testsuite/tests/cmm/should_run/machops/all.T +++ b/testsuite/tests/cmm/should_run/machops/all.T @@ -1,11 +1,12 @@ setTestOpts(extra_files(['TestMachOp.hs'])) -def cmm_test(name): - test(name, normal, multi_compile_and_run, +def cmm_test(name, ws): + test(name, + [unless(wordsize(ws), skip), normal], + multi_compile_and_run, ['TestMachOp', [(name+'.cmm', '')], '']) -cmm_test('T20626a') -cmm_test('T20626b') -cmm_test('T20638') -cmm_test('T20634') -cmm_test('MachOps1') +cmm_test('T20626a', ws=64) +cmm_test('T20626b', ws=64) +cmm_test('T20638', ws=64) +cmm_test('T20634', ws=64) -- cgit v1.2.1