VSI OpenVMS Forum

Code: Select all

void
putmsg(ccode,va_alist)
unsigned long ccode;
va_dcl
{
        unsigned long args[20], *argp;
        va_list ap;
        int nargs;
        unsigned short fac;

        fac = $VMS_STATUS_FAC_NO(ccode);
        va_start(ap);
        va_count(nargs);
        args[0] = nargs--;
        args[1] = ccode;


        if (fac == SYSTEM$_FACILITY || fac == RMS$_FACILITY)
                argp = &args[2];
        else
        {
                args[2] = nargs;
                argp = &args[3];
        }

        while (nargs-- > 0)
                *argp++ = va_arg(ap,unsigned long);

        va_end(ap);

        SYS$PUTMSG(args,(void(*)())put_output,0,0);
}

Code: Select all

#include <stdio.h>
#include <varargs.h>

void test(n, va_alist)
int n;
va_dcl
{
    int i;
    va_list ap;
    va_start(ap);
    for(i = 0; i < n; i++)
    {
       printf("%d : %s\n", i, va_arg(ap, char *));
    }
    va_end(ap);
}

int main(int argc, char *argv[])
{
    test(1, "A");
    test(2, "A", "BB");
    test(3, "A", "BB", "CCC");
    return 0;
}

Code: Select all

#include <stdio.h>
#include <stdarg.h>

void test(int n, ...)
{
    int i;
    va_list ap;
    va_start(ap, n);
    for(i = 0; i < n; i++)
    {
       printf("%d : %s\n", i, va_arg(ap, char *));
    }
    va_end(ap);
}

int main(int argc, char *argv[])
{
    test(1, "A");
    test(2, "A", "BB");
    test(3, "A", "BB", "CCC");
    return 0;
}