wrdesc.c

Go to the documentation of this file.

#include "bufrlib.h"

void wrdesc( f77int desc, f77int descary[], f77int *ndescary )
{
    char errstr[129];

/*
**  Is there room in descary for desc ?
*/
    if ( ( *ndescary + 1 ) < MAXNC ) {
    descary[(*ndescary)++] = desc;
    }
    else {
    sprintf( errstr, "BUFRLIB: WRDESC - EXPANDED SECTION 3 CONTAINS"
            " MORE THAN %d DESCRIPTORS", MAXNC );
    bort( errstr, ( f77int ) strlen( errstr ) );
    }

    return;
}