/* $Id: pvmfgettid.m4,v 1.2 1996/10/04 15:27:09 pvmsrc Exp $ */ #include "pvm3.h" #include "pvm_consts.h" void FUNCTION(pvmfgettid) ARGS(`STRING_ARG(group), inum, tid') STRING_ARG_DECL(group); int *inum, *tid; { char tgroup[MAX_GRP_NAME + 1]; /* * Copy the group name to make sure there's * a NUL at the end. */ if (ftocstr(tgroup, sizeof(tgroup), STRING_PTR(group), STRING_LEN(group))){ *tid = PvmBadParam; return; } *tid = pvm_gettid(tgroup, *inum); }