1
1
openmpi/ompi/mca/pml/v/base/vprotocol_base_parasite.c
Aurelien Bouteiller 77565d60d9 Heavy modification of the pml_v framework.
* Code cleanup and rationalization
* Fixed: mca_pml_base_send/recv_request are now allocated before recreation by the PML-V
* Fixed: pointer arithmetic bug in sender based that crashed 
* Changed: directory structure. This is one step forward using autogen.sh to build static-components.h (it needs to have the directory structure of a mca framework for this). 

This commit was SVN r15878.
2007-08-16 05:52:30 +00:00

48 строки
1.6 KiB
C

/*
* Copyright (c) 2004-2007 The Trustees of the University of Tennessee.
* All rights reserved.
* $COPYRIGHT$
*
* Additional copyrights may follow
*
* $HEADER$
*/
#include "base.h"
#include "vprotocol_base_request.h"
int mca_vprotocol_base_parasite(void) {
if(mca_vprotocol.add_procs)
mca_pml.pml_add_procs = mca_vprotocol.add_procs;
if(mca_vprotocol.del_procs)
mca_pml.pml_del_procs = mca_vprotocol.del_procs;
if(mca_vprotocol.progress)
mca_pml.pml_progress = mca_vprotocol.progress;
if(mca_vprotocol.add_comm)
mca_pml.pml_add_comm = mca_vprotocol.add_comm;
if(mca_vprotocol.del_comm)
mca_pml.pml_del_comm = mca_vprotocol.del_comm;
if(mca_vprotocol.irecv_init)
mca_pml.pml_irecv_init = mca_vprotocol.irecv_init;
if(mca_vprotocol.irecv)
mca_pml.pml_irecv = mca_vprotocol.irecv;
if(mca_vprotocol.recv)
mca_pml.pml_recv = mca_vprotocol.recv;
if(mca_vprotocol.isend_init)
mca_pml.pml_isend_init = mca_vprotocol.isend_init;
if(mca_vprotocol.isend)
mca_pml.pml_isend = mca_vprotocol.isend;
if(mca_vprotocol.send)
mca_pml.pml_send = mca_vprotocol.send;
if(mca_vprotocol.iprobe)
mca_pml.pml_iprobe = mca_vprotocol.iprobe;
if(mca_vprotocol.probe)
mca_pml.pml_probe = mca_vprotocol.probe;
if(mca_vprotocol.start)
mca_pml.pml_start = mca_vprotocol.start;
if(mca_vprotocol.dump)
mca_pml.pml_dump = mca_vprotocol.dump;
return mca_vprotocol_base_request_parasite();
}