Skip to content

Commit

Permalink
Fixed preprocessor indent
Browse files Browse the repository at this point in the history
  • Loading branch information
missing-user committed Nov 14, 2024
1 parent 9650e02 commit 4b615bc
Showing 1 changed file with 3 additions and 3 deletions.
6 changes: 3 additions & 3 deletions src/xspech.f90
Original file line number Diff line number Diff line change
Expand Up @@ -245,11 +245,11 @@ subroutine read_command_args

! Prepare the "hidden" ext filepath that has a "." prefix.
! Split ext into directory path and basename using INDEX function, then concatenate them again with a "." inbetween
#ifdef _WIN32
#ifdef _WIN32
basenamestart = INDEX(ext, '\', .TRUE.)
#else
#else
basenamestart = INDEX(ext, '/', .TRUE.)
#endif
#endif
! folder + . + filename
hiddenext = trim(ext(1:basenamestart))//"."//trim(ext(basenamestart+1:))

Expand Down

0 comments on commit 4b615bc

Please sign in to comment.