Skip to content
Snippets Groups Projects
Commit c1cf7bbf authored by Stephan Schulz's avatar Stephan Schulz
Browse files

ALL_Staggered_f: abort on VTK error

parent 76b228fd
No related branches found
No related tags found
1 merge request!18Fortran error tests
Show whitespace changes
Inline Side-by-side
example/ALL_Staggered_f.F90
+ 2
− 0
View file @ c1cf7bbf
...@@ -217,6 +217,7 @@ contains ...@@ -217,6 +217,7 @@ contains
write(stdout, '(a)') error_msg write(stdout, '(a)') error_msg
! Maybe also abort if the output is necesssary or handle this ! Maybe also abort if the output is necesssary or handle this
! some other way. ! some other way.
stop
endif endif
#endif #endif
call jall%balance() call jall%balance()
...@@ -235,6 +236,7 @@ contains ...@@ -235,6 +236,7 @@ contains
write(stdout, '(a)') error_msg write(stdout, '(a)') error_msg
! Maybe also abort if the output is necesssary or handle this ! Maybe also abort if the output is necesssary or handle this
! some other way. ! some other way.
stop
endif endif
#endif #endif
......
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment