When we finish one of the loops take care of the index of the begining of the loop. If it's -1 then we just complete the full datatype ... therefore we have to do something special.

This commit was SVN r8040.

ompi/datatype/new_position.c

@@ -163,10 +163,14 @@ int ompi_convertor_generic_simple_position( ompi_convertor_t* pConvertor,
                 pConvertor->stack_pos--;
                 pStack--;
                 pos_desc++;
+            } else {
+                if( pStack->index == -1 ) {
+                    pStack->disp += (pConvertor->pDesc->ub - pConvertor->pDesc->lb);
                 } else {
                     assert( DT_LOOP == description[pStack->index].loop.common.type );
                     pStack->disp += description[pStack->index].loop.extent;
                 }
+            }
             base_pointer = pConvertor->pBaseBuf + pStack->disp;
             UPDATE_INTERNAL_COUNTERS( description, pos_desc, pElem, count_desc );
             DO_DEBUG( opal_output( 0, "pack new_loop count %d stack_pos %d pos_desc %d disp %ld space %d\n",