1 * Supplementary character code conversion functions for 2 * EBCDIC environments. 3 * 4 * Copy: See Copyright for the status of this software. 5 * 6 * Author: Patrick Monnerat <pm@datasphere.ch>, DATASPHERE S.A. 7 8 /if not defined(TRANSCODE_H__) 9 /define TRANSCODE_H__ 10 11 /include "libxmlrpg/dict" 12 /include "libxmlrpg/xmlstdarg" 13 14 d xmlZapDict pr extproc('xmlZapDict') 15 d dict like(xmlDictPtr) 16 17 d xmlTranscodeResult... 18 d pr * extproc('xmlTranscodeResult') const char * 19 d s * value options(*string) const xmlChar * 20 d encoding * value options(*string) const char * 21 d dict like(xmlDictPtr) options(*omit) 22 d freeproc * value procptr 23 24 d xmlTranscodeString... 25 d pr * extproc('xmlTranscodeString') const xmlChar * 26 d s * value options(*string) const char * 27 d encoding * value options(*string) const char * 28 d dict like(xmlDictPtr) options(*omit) 29 30 d xmlTranscodeWString... 31 d pr * extproc('xmlTranscodeWString') const xmlChar * 32 d s * value options(*string) const char * 33 d encoding * value options(*string) const char * 34 d dict like(xmlDictPtr) options(*omit) 35 36 d xmlTranscodeHString... 37 d pr * extproc('xmlTranscodeHString') const xmlChar * 38 d s * value options(*string) const char * 39 d encoding * value options(*string) const char * 40 d dict like(xmlDictPtr) options(*omit) 41 42 /if not defined(XML_NO_SHORT_NAMES) 43 d xmlTR pr * extproc('xmlTranscodeResult') const char * 44 d s * value options(*string) const xmlChar * 45 d encoding * value options(*string) const char * 46 d dict like(xmlDictPtr) options(*omit) 47 d freeproc * value procptr 48 49 d xmlTS pr * extproc('xmlTranscodeString') const xmlChar * 50 d s * value options(*string) const char * 51 d encoding * value options(*string) const char * 52 d dict like(xmlDictPtr) options(*omit) 53 54 d xmlTW pr * extproc('xmlTranscodeWString') const xmlChar * 55 d s * value options(*string) const char * 56 d encoding * value options(*string) const char * 57 d dict like(xmlDictPtr) options(*omit) 58 59 d xmlTH pr * extproc('xmlTranscodeHString') const xmlChar * 60 d s * value options(*string) const char * 61 d encoding * value options(*string) const char * 62 d dict like(xmlDictPtr) options(*omit) 63 /endif 64 65 d xmlVasprintf pr * extproc('xmlVasprintf') 66 d dict like(xmlDictPtr) options(*omit) 67 d encoding * value options(*string) const char * 68 d fmt * value options(*string) const xmlChar * 69 d args likeds(xmlVaList) 70 71 /endif 72