1 #include "Bdef.h"
2 
BI_SringBS(BLACSCONTEXT * ctxt,BLACBUFF * bp,SDRVPTR send)3 void BI_SringBS(BLACSCONTEXT *ctxt, BLACBUFF *bp, SDRVPTR send)
4 {
5    int Np, Iam, msgid;
6 
7    Np = ctxt->scp->Np;
8    if (Np < 2) return;
9    Iam = ctxt->scp->Iam;
10    msgid = Mscopeid(ctxt);
11    send(ctxt, (Iam + 1)%Np, msgid, bp);
12    if (Np > 2) send(ctxt, (Np + Iam - 1)%Np, msgid, bp);
13 }
14