Skip to content

Commit 1c87df9

Browse files
committed
windows test case for path with spaces
1 parent 62bef00 commit 1c87df9

File tree

1 file changed

+4
-0
lines changed

1 file changed

+4
-0
lines changed

test/system/test_path.f90

Lines changed: 4 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -42,6 +42,10 @@ subroutine test_join_path(error)
4242

4343
call checkpath(error, 'join_path', 'C:\Users\Bob\Pictures\2025', path)
4444
if (allocated(error)) return
45+
46+
path = join_path('C:\Users\John Doe', 'Pictures\2025') ! path with spaces
47+
call checkpath(error, 'join_path', 'C:\Users\John Doe\Pictures\2025', path)
48+
if (allocated(error)) return
4549
else
4650
path = join_path('/home', 'Alice')
4751
call checkpath(error, 'join_path', '/home/Alice', path)

0 commit comments

Comments
 (0)