Home | History | Annotate | Download | only in libxmlrpg
      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 (a] 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