User: rhaas Date: 2012/10/01 01:10 PM

Modified: /trunk/src/ GRHydro_UpdateMaskM.F90

Log: GRHydro: fix uninitialized pointer

Found by Frank Loeffler.

File Changes:

Directory: /trunk/src/ ======================

File [modified]: GRHydro_UpdateMaskM.F90 Delta lines: +4 -4 =================================================================== --- trunk/src/GRHydro_UpdateMaskM.F90 2012-09-12 18:00:56 UTC (rev 421) +++ trunk/src/GRHydro_UpdateMaskM.F90 2012-10-01 18:10:07 UTC (rev 422) @@ -252,7 +252,7 @@ g23_p => gbc_p g33_p => gcc_p vup_p => lvel_p - Bprim => Bvec_p + Bprim_p => Bvec_p else g11_p => gxx_p g12_p => gxy_p @@ -261,7 +261,7 @@ g23_p => gyz_p g33_p => gzz_p vup_p => vel_p - Bprim => Bvec_p + Bprim_p => Bvec_p end if end if if (timelevels .gt. 2) then @@ -273,7 +273,7 @@ g23_p_p => gbc_p_p g33_p_p => gcc_p_p vup_p_p => lvel_p_p - Bprim => lBvec_p_p + Bprim_p_p => lBvec_p_p else g11_p_p => gxx_p_p g12_p_p => gxy_p_p @@ -282,7 +282,7 @@ g23_p_p => gyz_p_p g33_p_p => gzz_p_p vup_p_p => vel_p_p - Bprim => Bvec_p_p + Bprim_p_p => Bvec_p_p end if end if #define gxx faulty_gxx