Blame os400/libxmlrpg/dict.rpgle

Packit 423ecb
      * Summary: string dictionary
Packit 423ecb
      * Description: dictionary of reusable strings, just used to avoid
Packit 423ecb
      *         allocation and freeing operations.
Packit 423ecb
      *
Packit 423ecb
      * Copy: See Copyright for the status of this software.
Packit 423ecb
      *
Packit 423ecb
      * Author: Patrick Monnerat <pm@datasphere.ch>, DATASPHERE S.A.
Packit 423ecb
Packit 423ecb
      /if not defined(XML_DICT_H__)
Packit 423ecb
      /define XML_DICT_H__
Packit 423ecb
Packit 423ecb
      * The dictionary.
Packit 423ecb
Packit 423ecb
     d xmlDictPtr      s               *   based(######typedef######)
Packit 423ecb
Packit 423ecb
      /include "libxmlrpg/xmlversion"
Packit 423ecb
      /include "libxmlrpg/xmlTypesC"
Packit 423ecb
      /include "libxmlrpg/tree"
Packit 423ecb
Packit 423ecb
      * Initializer
Packit 423ecb
Packit 423ecb
     d xmlInitializeDict...
Packit 423ecb
     d                 pr                  extproc('xmlInitializeDict')
Packit 423ecb
     d                                     like(xmlCint)
Packit 423ecb
Packit 423ecb
      * Constructor and destructor.
Packit 423ecb
Packit 423ecb
     d xmlDictCreate   pr                  extproc('xmlDictCreate')
Packit 423ecb
     d                                     like(xmlDictPtr)
Packit 423ecb
Packit 423ecb
     d xmlDictSetLimit...
Packit 423ecb
     d                 pr                  extproc('xmlDictSetLimit')
Packit 423ecb
     d                                     like(xmlCsize_t)
Packit 423ecb
     d  dict                               value like(xmlDictPtr)
Packit 423ecb
     d  limit                              value like(xmlCsize_t)
Packit 423ecb
Packit 423ecb
     d xmlDictGetUsage...
Packit 423ecb
     d                 pr                  extproc('xmlDictGetUsage')
Packit 423ecb
     d                                     like(xmlCsize_t)
Packit 423ecb
     d  dict                               value like(xmlDictPtr)
Packit 423ecb
Packit 423ecb
     d xmlDictCreateSub...
Packit 423ecb
     d                 pr                  extproc('xmlDictCreateSub')
Packit 423ecb
     d                                     like(xmlDictPtr)
Packit 423ecb
     d  sub                                value like(xmlDictPtr)
Packit 423ecb
Packit 423ecb
     d xmlDictReference...
Packit 423ecb
     d                 pr                  extproc('xmlDictGetReference')
Packit 423ecb
     d                                     like(xmlCint)
Packit 423ecb
     d  dict                               value like(xmlDictPtr)
Packit 423ecb
Packit 423ecb
     d xmlDictFree     pr                  extproc('xmlDictFree')
Packit 423ecb
     d  dict                               value like(xmlDictPtr)
Packit 423ecb
Packit 423ecb
      * Lookup of entry in the dictionary.
Packit 423ecb
Packit 423ecb
     d xmlDictLookup   pr              *   extproc('xmlDictLookup')             const xmlChar *
Packit 423ecb
     d  dict                               value like(xmlDictPtr)
Packit 423ecb
     d  name                           *   value options(*string)               const xmlChar *
Packit 423ecb
     d  len                                value like(xmlCint)
Packit 423ecb
Packit 423ecb
     d xmlDictExists   pr              *   extproc('xmlDictExists')             const xmlChar *
Packit 423ecb
     d  dict                               value like(xmlDictPtr)
Packit 423ecb
     d  name                           *   value options(*string)               const xmlChar *
Packit 423ecb
     d  len                                value like(xmlCint)
Packit 423ecb
Packit 423ecb
     d xmlDictQLookup  pr              *   extproc('xmlDictQLookup')            const xmlChar *
Packit 423ecb
     d  dict                               value like(xmlDictPtr)
Packit 423ecb
     d  name                           *   value options(*string)               const xmlChar *
Packit 423ecb
     d  name                           *   value options(*string)               const xmlChar *
Packit 423ecb
Packit 423ecb
     d xmlDictOwns     pr                  extproc('xmlDictOwns')
Packit 423ecb
     d                                     like(xmlCint)
Packit 423ecb
     d  dict                               value like(xmlDictPtr)
Packit 423ecb
     d  str                            *   value options(*string)               const xmlChar *
Packit 423ecb
Packit 423ecb
     d xmlDictSize     pr                  extproc('xmlDictSize')
Packit 423ecb
     d                                     like(xmlCint)
Packit 423ecb
     d  dict                               value like(xmlDictPtr)
Packit 423ecb
Packit 423ecb
      * Cleanup function
Packit 423ecb
Packit 423ecb
     d xmlDictCleanup  pr                  extproc('xmlDictCleanup')
Packit 423ecb
Packit 423ecb
      /endif                                                                    ! XML_DICT_H__