ports/openmpi
ports/openmpi
1
1
Форкнуть 0
Код Релизы Активность

Merge pull request #8092 from markalle/maintain_extent_markers

Просмотр исходного кода 
make Type_create_resized set FLAG_USER_UB
Этот коммит содержится в:
markalle 2020-10-16 11:46:25 -05:00 коммит произвёл GitHub
родитель 32dc9f6435 bca3c0ed17
Коммит 9586e989f9
Не найден ключ, соответствующий данной подписи
Идентификатор ключа GPG: 4AEE18F83AFDEB23
1 изменённых файлов: 3 добавлений и 0 удалений
Показать статистику Скачать Patch файл Скачать Diff файл Показать все файлы Свернуть все файлы

3
opal/datatype/opal_datatype_resize.c
Просмотреть файл

@ -6,6 +6,7 @@
* Copyright (c) 2009 Oak Ridge National Labs. All rights reserved. * Copyright (c) 2009 Oak Ridge National Labs. All rights reserved.
* Copyright (c) 2015-2017 Research Organization for Information Science * Copyright (c) 2015-2017 Research Organization for Information Science
* and Technology (RIST). All rights reserved. * and Technology (RIST). All rights reserved.
* Copyright (c) 2020 IBM Corporation. All rights reserved.
* $COPYRIGHT$ * $COPYRIGHT$
* *
* Additional copyrights may follow * Additional copyrights may follow
@ -24,6 +25,8 @@ int32_t opal_datatype_resize( opal_datatype_t* type, ptrdiff_t lb, ptrdiff_t ext
type->ub = lb + extent; type->ub = lb + extent;
type->flags &= ~OPAL_DATATYPE_FLAG_NO_GAPS; type->flags &= ~OPAL_DATATYPE_FLAG_NO_GAPS;
type->flags |= OPAL_DATATYPE_FLAG_USER_LB;
type->flags |= OPAL_DATATYPE_FLAG_USER_UB;
if( (extent == (ptrdiff_t)type->size) && if( (extent == (ptrdiff_t)type->size) &&
(type->flags & OPAL_DATATYPE_FLAG_CONTIGUOUS) ) { (type->flags & OPAL_DATATYPE_FLAG_CONTIGUOUS) ) {
type->flags |= OPAL_DATATYPE_FLAG_NO_GAPS; type->flags |= OPAL_DATATYPE_FLAG_NO_GAPS;