sanity check for key mismatch

This commit is contained in:
Sharan Roongta 2020-09-30 23:33:09 +02:00
parent 15ef6c8ceb
commit 898306f82e
2 changed files with 6 additions and 0 deletions

View File

@ -498,6 +498,9 @@ subroutine IO_error(error_ID,el,ip,g,instance,ext_msg)
msg = 'Abrupt end of file'
case (708)
msg = '--- expected after YAML file header'
case (710)
msg = 'key mismatch'
!-------------------------------------------------------------------------------------------------
! errors related to the grid solver

View File

@ -952,6 +952,9 @@ function tNode_get_byKey_asIndex(self,key) result(keyIndex)
endif
enddo
if(keyIndex == -1) call IO_error(710,ext_msg=key)
end function tNode_get_byKey_asIndex