From 6c6be5ab09bf3bfa71902a8268c9ff5485e76647 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Ond=C5=99ej=20=C4=8Cert=C3=ADk?= Date: Thu, 10 Dec 2020 13:11:19 -0700 Subject: [PATCH 1/2] Use distinct file names This seems to avoid a filename race conditions on macOS. Fixes #264. --- src/tests/bitsets/test_stdlib_bitset_large.f90 | 16 ++++++++-------- 1 file changed, 8 insertions(+), 8 deletions(-) diff --git a/src/tests/bitsets/test_stdlib_bitset_large.f90 b/src/tests/bitsets/test_stdlib_bitset_large.f90 index 96d83d036..f5d5631a0 100644 --- a/src/tests/bitsets/test_stdlib_bitset_large.f90 +++ b/src/tests/bitsets/test_stdlib_bitset_large.f90 @@ -254,13 +254,13 @@ subroutine test_io() 'write_bitset' call set2 % from_string( bitstring_33 ) - open( newunit=unit, file='test.txt', status='replace', & + open( newunit=unit, file='test1.txt', status='replace', & form='formatted', action='write' ) call set2 % write_bitset(unit) call set1 % write_bitset(unit) call set0 % write_bitset(unit) close( unit ) - open( newunit=unit, file='test.txt', status='old', & + open( newunit=unit, file='test1.txt', status='old', & form='formatted', action='read' ) call set3 % read_bitset(unit) call set5 % read_bitset(unit) @@ -276,13 +276,13 @@ subroutine test_io() close( unit ) call set12 % from_string( bitstring_33 // bitstring_33 ) - open( newunit=unit, file='test.txt', status='replace', & + open( newunit=unit, file='test2.txt', status='replace', & form='formatted', action='write' ) call set12 % write_bitset(unit) call set11 % write_bitset(unit) call set10 % write_bitset(unit) close( unit ) - open( newunit=unit, file='test.txt', status='old', & + open( newunit=unit, file='test2.txt', status='old', & form='formatted', action='read' ) call set13 % read_bitset(unit) call set15 % read_bitset(unit) @@ -297,13 +297,13 @@ subroutine test_io() close( unit ) - open( newunit=unit, file='test.txt', status='replace', & + open( newunit=unit, file='test3.txt', status='replace', & form='formatted', action='write' ) call set2 % write_bitset(unit, advance='no') call set1 % write_bitset(unit, advance='no') call set0 % write_bitset(unit) close( unit ) - open( newunit=unit, file='test.txt', status='old', & + open( newunit=unit, file='test3.txt', status='old', & form='formatted', action='read' ) call set3 % read_bitset(unit, advance='no') call set4 % read_bitset(unit, advance='no') @@ -319,13 +319,13 @@ subroutine test_io() close( unit ) - open( newunit=unit, file='test.txt', status='replace', & + open( newunit=unit, file='test4.txt', status='replace', & form='formatted', action='write' ) call set12 % write_bitset(unit, advance='no') call set11 % write_bitset(unit, advance='no') call set10 % write_bitset(unit) close( unit ) - open( newunit=unit, file='test.txt', status='old', & + open( newunit=unit, file='test4.txt', status='old', & form='formatted', action='read' ) call set13 % read_bitset(unit, advance='no') call set14 % read_bitset(unit, advance='no') From f2c71cadf8b390b009949641efec04e315244b30 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Ond=C5=99ej=20=C4=8Cert=C3=ADk?= Date: Thu, 10 Dec 2020 13:15:39 -0700 Subject: [PATCH 2/2] Rename tests in test_stdlib_bitset_64 --- src/tests/bitsets/test_stdlib_bitset_64.f90 | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/src/tests/bitsets/test_stdlib_bitset_64.f90 b/src/tests/bitsets/test_stdlib_bitset_64.f90 index fd92d458d..566db8ec1 100644 --- a/src/tests/bitsets/test_stdlib_bitset_64.f90 +++ b/src/tests/bitsets/test_stdlib_bitset_64.f90 @@ -147,13 +147,13 @@ subroutine test_io() 'write_bitset' call set2 % from_string( bitstring_33 ) - open( newunit=unit, file='test.txt', status='replace', & + open( newunit=unit, file='test64_1.txt', status='replace', & form='formatted', action='write' ) call set2 % write_bitset(unit) call set1 % write_bitset(unit) call set0 % write_bitset(unit) close( unit ) - open( newunit=unit, file='test.txt', status='old', & + open( newunit=unit, file='test64_1.txt', status='old', & form='formatted', action='read' ) call set3 % read_bitset(unit) call set5 % read_bitset(unit) @@ -169,13 +169,13 @@ subroutine test_io() close( unit ) - open( newunit=unit, file='test.txt', status='replace', & + open( newunit=unit, file='test64_2.txt', status='replace', & form='formatted', action='write' ) call set2 % write_bitset(unit, advance='no') call set1 % write_bitset(unit, advance='no') call set0 % write_bitset(unit) close( unit ) - open( newunit=unit, file='test.txt', status='old', & + open( newunit=unit, file='test64_2.txt', status='old', & form='formatted', action='read' ) call set3 % read_bitset(unit, advance='no') call set4 % read_bitset(unit, advance='no')