diff options
author | Laurence Kedward <laurence.kedward@bristol.ac.uk> | 2022-02-12 11:28:20 +0000 |
---|---|---|
committer | Laurence Kedward <laurence.kedward@bristol.ac.uk> | 2022-02-12 11:28:20 +0000 |
commit | 6cd53f7dfce8628b54a232c551b5f20171932dbb (patch) | |
tree | 9d543efd08b4c4f5d543de699c7478d182439873 /src/fpm_backend_console.f90 | |
parent | e8c08540a74fed38f14e69dcc2e140e9a8553441 (diff) | |
download | fpm-6cd53f7dfce8628b54a232c551b5f20171932dbb.tar.gz fpm-6cd53f7dfce8628b54a232c551b5f20171932dbb.zip |
Fix: for consistent alignment of backend console output.
Diffstat (limited to 'src/fpm_backend_console.f90')
-rw-r--r-- | src/fpm_backend_console.f90 | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/fpm_backend_console.f90 b/src/fpm_backend_console.f90 index 014e800..59d8f0e 100644 --- a/src/fpm_backend_console.f90 +++ b/src/fpm_backend_console.f90 @@ -96,12 +96,12 @@ subroutine console_update_line(console,line_no,str) !$omp critical
- n = console%n_line - line_no !+ 1 !+ 1
+ n = console%n_line - line_no
! Step back to line
write(stdout,'(A)',advance="no") repeat(LINE_UP,n)//LINE_RESET
- write(stdout,*) str
+ write(stdout,'(A)') str
! Step forward to end
write(stdout,'(A)',advance="no") repeat(LINE_DOWN,n)//LINE_RESET
|