6.2.  PVM   C++ 215

//  6.1

ftinclude "pvm3.h"
#include <iostream>
^include <string.h>

int main(int argc,char *argv[])
{

int RetCode,Messageld;

int PTid, Tid;

char Message[100];

float Result[1] ;

PTid = pwm_mytid() ;

RetCode = pvm_spawn("program6-2",NULL,0,"",1,&Tid)
i?(RetCode == 1)(

Messageld = 1;

strcpy(Message,"22") ;

pvm_initsend(PvmDataDefault) ;

pvm_pkstr(Message) ;

pvm_send(Tid,Messageld) ;

pvm_recv(Tid,Messageld) ;

pvm_upkfloat(Result,1,1) ;

cout  Result[0]  endl;

pvm_exit() ;

return(0) ;

}
else{

cerr  "  . "  endl;

pvm_exit() ;

return(1) ;

}

  pvm_send()      PVM-, 
     ( 6.2),   pvm_recv(|
     .                                      

                                              

libpvm3                             ,                           

                                             

<pvm3.h> <iostream> <string.h>

     

C++ - program6-l -I $PVM_ROOT/include -L $PVM_ROOT/lib/
$PVM_ARCH -1 pvm3             ,           , ,

  

Solaris 8, PVM 3.4.3, SuSELinux 7.1,gcc 2.95.2.                              