clearer error messages

This commit is contained in:
Philip Eisenlohr 2023-07-14 10:23:23 -04:00
parent 7c875371a6
commit b235742472
2 changed files with 5 additions and 5 deletions

View File

@ -183,9 +183,9 @@ subroutine CLI_init()
end select
end do
if (.not. allocated(geomArg)) call IO_error(612,ext_msg='--help for instructions',label1='--geom')
if (.not. allocated(loadArg)) call IO_error(612,ext_msg='--help for instructions',label1='--load')
if (.not. allocated(materialArg)) call IO_error(612,ext_msg='--help for instructions',label1='--material')
if (.not. allocated(geomArg)) call IO_error(612,ext_msg='--geom')
if (.not. allocated(loadArg)) call IO_error(612,ext_msg='--load')
if (.not. allocated(materialArg)) call IO_error(612,ext_msg='--material')
call setWorkingDirectory(trim(workingDirArg))
CLI_geomFile = getPathRelCWD(geomArg,'geometry')

View File

@ -556,11 +556,11 @@ subroutine IO_error(error_ID,ext_msg,label1,ID1,label2,ID2)
case (603)
msg = 'invalid data for table'
case (610)
msg = 'no argument value specified'
msg = 'missing argument for option'
case (611)
msg = 'could not parse restart increment'
case (612)
msg = 'missing argument'
msg = 'missing option'
case (630)
msg = 'JOBNAME must not contain any slashes'
case (640)