use central functionality

2023-08-10 23:06:31 +02:00 · 2023-08-10 23:06:31 +02:00 · fe2cf94d70
parent 651d0d989b
commit fe2cf94d70
1 changed files with 1 additions and 1 deletions
--- a/src/CLI.f90
+++ b/src/CLI.f90
@ -178,7 +178,7 @@ subroutine CLI_init()
      case ('-r', '--rs', '--restart')
        if (.not. hasArg) call IO_error(610,ext_msg='--jobname')
        arg = getArg(i+1)
-        read(arg,*,iostat=stat) CLI_restartInc
+        CLI_restartInc = IO_strAsInt(arg)
        if (CLI_restartInc < 0 .or. stat /= 0) call IO_error(611,ext_msg=arg)
    end select
  end do