<p><b>dwj07@fsu.edu</b> 2012-04-12 11:07:47 -0600 (Thu, 12 Apr 2012)</p><p><br>
        -- BRANCH COMMIT --<br>
<br>
        Fixing segfaults caused by split_explicit halo updates.<br>
</p><hr noshade><pre><font color="gray">Modified: branches/omp_blocks/io/src/core_ocean/mpas_ocn_time_integration_split.F
===================================================================
--- branches/omp_blocks/io/src/core_ocean/mpas_ocn_time_integration_split.F        2012-04-11 16:58:01 UTC (rev 1773)
+++ branches/omp_blocks/io/src/core_ocean/mpas_ocn_time_integration_split.F        2012-04-12 17:07:47 UTC (rev 1774)
@@ -163,10 +163,10 @@
          ! ---  update halos for diagnostic variables
 
          call mpas_timer_start(&quot;se halo diag&quot;, .false., timer_halo_diagnostic)
-         call mpas_dmpar_exch_halo_field(block % state % time_levs(2) % state % Vor_edge)
+         call mpas_dmpar_exch_halo_field(domain % blocklist % state % time_levs(2) % state % Vor_edge)
          if (config_h_mom_eddy_visc4 &gt; 0.0) then
-            call mpas_dmpar_exch_halo_field(block % state % time_levs(2) % state % divergence)
-            call mpas_dmpar_exch_halo_field(block % state % time_levs(2) % state % vorticity)
+           call mpas_dmpar_exch_halo_field(domain % blocklist % state % time_levs(2) % state % divergence)
+           call mpas_dmpar_exch_halo_field(domain % blocklist % state % time_levs(2) % state % vorticity)
          end if
          call mpas_timer_stop(&quot;se halo diag&quot;, timer_halo_diagnostic)
 
@@ -695,7 +695,7 @@
 
          ! update halo for thickness and tracer tendencies
          call mpas_timer_start(&quot;se halo tracers&quot;, .false., timer_halo_tracers)
-         call mpas_dmpar_exch_halo_field(block % tend % tracers)
+         call mpas_dmpar_exch_halo_field(domain % blocklist % tend % tracers)
          call mpas_timer_stop(&quot;se halo tracers&quot;, timer_halo_tracers)
 
          block =&gt; domain % blocklist

</font>
</pre>