* Supplementary character code conversion functions for
*   EBCDIC environments.
*
* Copy: See Copyright for the status of this software.
*
* Author: Patrick Monnerat <pm@datasphere.ch>, DATASPHERE S.A.

/if not defined(TRANSCODE_H__)
/define TRANSCODE_H__

/include "libxmlrpg/dict"
/include "libxmlrpg/xmlstdarg"

d xmlZapDict pr extproc('xmlZapDict') d dict like(xmlDictPtr)

d xmlTranscodeResult… d pr * extproc('xmlTranscodeResult') const char * d s * value options(*string) const xmlChar * d encoding * value options(*string) const char * d dict like(xmlDictPtr) options(*omit) d freeproc * value procptr

d xmlTranscodeString… d pr * extproc('xmlTranscodeString') const xmlChar * d s * value options(*string) const char * d encoding * value options(*string) const char * d dict like(xmlDictPtr) options(*omit)

d xmlTranscodeWString… d pr * extproc('xmlTranscodeWString') const xmlChar * d s * value options(*string) const char * d encoding * value options(*string) const char * d dict like(xmlDictPtr) options(*omit)

d xmlTranscodeHString… d pr * extproc('xmlTranscodeHString') const xmlChar * d s * value options(*string) const char * d encoding * value options(*string) const char * d dict like(xmlDictPtr) options(*omit)

/if not defined(XML_NO_SHORT_NAMES)

d xmlTR pr * extproc('xmlTranscodeResult') const char * d s * value options(*string) const xmlChar * d encoding * value options(*string) const char * d dict like(xmlDictPtr) options(*omit) d freeproc * value procptr

d xmlTS pr * extproc('xmlTranscodeString') const xmlChar * d s * value options(*string) const char * d encoding * value options(*string) const char * d dict like(xmlDictPtr) options(*omit)

d xmlTW pr * extproc('xmlTranscodeWString') const xmlChar * d s * value options(*string) const char * d encoding * value options(*string) const char * d dict like(xmlDictPtr) options(*omit)

d xmlTH pr * extproc('xmlTranscodeHString') const xmlChar * d s * value options(*string) const char * d encoding * value options(*string) const char * d dict like(xmlDictPtr) options(*omit)

/endif

d xmlVasprintf pr * extproc('xmlVasprintf') d dict like(xmlDictPtr) options(*omit) d encoding * value options(*string) const char * d fmt * value options(*string) const xmlChar * d args likeds(xmlVaList)

/endif