1      * Summary: va_list support for ILE/RPG.
2      *
3      * Copy: See Copyright for the status of this software.
4      *
5      * Author: Patrick Monnerat <pm@datasphere.ch>, DATASPHERE S.A.
6
7      /if not defined(XML_STDARG_H__)
8      /define XML_STDARG_H__
9
10      /include "libxmlrpg/xmlversion"
11
12      * The va_list object.
13
14     d xmlVaList       ds                  based(######typedef######)
15     d                                     align qualified
16     d  current                        *
17     d  next                           *
18
19      * Procedures.
20
21     d xmlVaStart      pr                  extproc('__xmlVaStart')
22     d  list                               like(xmlVaList)
23     d  lastargaddr                    *   value
24     d  lastargsize                  10u 0 value
25
26     d xmlVaArg        pr              *   extproc('__xmlVaArg')
27     d  list                               like(xmlVaList)
28     d  dest                           *   value
29     d  argsize                      10i 0 value
30
31     d xmlVaEnd        pr                  extproc('__xmlVaEnd')
32     d  list                               like(xmlVaList)
33
34      /endif                                                                    XML_STDARG_H__
35