From b1664ce8eaf54e1e462469d8ccfb99618fc7483b Mon Sep 17 00:00:00 2001 From: Karl Hammond Date: Fri, 2 Dec 2022 00:00:57 -0600 Subject: [PATCH] replaced unit 0 with error_unit --- unittest/fortran/test_fortran_fixexternal.f90 | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/unittest/fortran/test_fortran_fixexternal.f90 b/unittest/fortran/test_fortran_fixexternal.f90 index 61fea1be9d..d46e1ec673 100644 --- a/unittest/fortran/test_fortran_fixexternal.f90 +++ b/unittest/fortran/test_fortran_fixexternal.f90 @@ -51,7 +51,7 @@ CONTAINS CALL instance%fix_external_set_energy_peratom('ext1', e) CALL instance%fix_external_set_virial_peratom('ext1', v) CLASS DEFAULT - WRITE(0,*) 'UMM...this should never happen.' + WRITE(error_unit,*) 'UMM...this should never happen.' STOP 1 END SELECT END SUBROUTINE f_callback_ss @@ -93,7 +93,7 @@ CONTAINS CALL instance%fix_external_set_energy_peratom('ext1', e) CALL instance%fix_external_set_virial_peratom('ext1', v) CLASS DEFAULT - WRITE(0,*) 'UMM...this should never happen.' + WRITE(error_unit,*) 'UMM...this should never happen.' STOP 1 END SELECT END SUBROUTINE f_callback_sb @@ -135,7 +135,7 @@ CONTAINS CALL instance%fix_external_set_energy_peratom('ext1', e) CALL instance%fix_external_set_virial_peratom('ext1', v) CLASS DEFAULT - WRITE(0,*) 'UMM...this should never happen.' + WRITE(error_unit,*) 'UMM...this should never happen.' STOP 1 END SELECT END SUBROUTINE f_callback_bb