|
1 | | -/* -*- Mode: C; c-basic-offset:4 ; -*- */ |
| 1 | +/* -*- Mode: C; c-basic-offset:4 ; indent-tabs-mode:nil -*- */ |
2 | 2 | /* |
3 | 3 | * Copyright (c) 2004-2017 The University of Tennessee and The University |
4 | 4 | * of Tennessee Research Foundation. All rights |
5 | 5 | * reserved. |
6 | 6 | * Copyright (c) 2011-2013 Cisco Systems, Inc. All rights reserved. |
7 | 7 | * Copyright (c) 2014-2015 Intel, Inc. All rights reserved. |
| 8 | + * Copyright (c) 2018 Triad National Security, LLC. All rights |
| 9 | + * reserved. |
8 | 10 | * $COPYRIGHT$ |
9 | 11 | * |
10 | 12 | * Additional copyrights may follow |
|
19 | 21 | #include "opal/datatype/opal_convertor.h" |
20 | 22 | #include "ompi/datatype/ompi_datatype.h" |
21 | 23 | #include "opal/util/output.h" |
| 24 | +#include "opal/runtime/opal.h" |
22 | 25 |
|
23 | 26 | /** |
24 | 27 | * The purpose of this test is to simulate the multi-network packing and |
@@ -199,7 +202,7 @@ int main( int argc, char* argv[] ) |
199 | 202 | recv_buffer[i] = 0xdeadbeef; |
200 | 203 | } |
201 | 204 |
|
202 | | - opal_datatype_init(); |
| 205 | + opal_init_util (NULL, NULL); |
203 | 206 | ompi_datatype_init(); |
204 | 207 |
|
205 | 208 | ompi_datatype_create_vector(NELT/2, 1, 2, MPI_INT, &datatype); |
@@ -245,6 +248,7 @@ int main( int argc, char* argv[] ) |
245 | 248 | free(segments); |
246 | 249 |
|
247 | 250 | ompi_datatype_finalize(); |
| 251 | + opal_finalize_util (); |
248 | 252 |
|
249 | 253 | return (0 == errors ? 0 : -1); |
250 | 254 | } |
0 commit comments