1/* -*- mode: C; coding: macintosh; -*- */ 2 3#ifndef OSXMACTCL_H 4#define OSXMACTCL_H 5#pragma once 6 7#ifdef __cplusplus 8extern "C" { 9#endif 10 11#if TARGET_RT_MAC_MACHO 12 13OSErr FSpLocationFromPath (int length, CONST84 char *path, FSRefPtr fileRefPtr); 14 15OSErr FSpPathFromLocation (FSRefPtr fsrefP, int* length, Handle *fullPath); 16 17/* CFString to external DString */ 18int CFStringToExternalDString(Tcl_Interp * interp, CFStringRef strRef, Tcl_DString * dsPtr); 19 20/* CFString to DString */ 21int CFStringToUtfDString(Tcl_Interp * interp, CFStringRef strRef, Tcl_DString * dsPtr); 22 23/* decomposed utf8 buffer to external DString */ 24int DUtfToExternalDString(Tcl_Interp * interp, CONST84 char * src, int length, Tcl_DString * dsPtr); 25 26/* decomposed utf8 buffer to DString */ 27int DUtfToUtfDString(Tcl_Interp * interp, CONST84 char * src, int length, Tcl_DString * dsPtr); 28 29/* external buffer to decomposed utf8 DString */ 30int ExternalToDUtfDString(Tcl_Interp * interp, CONST84 char * src, int length, Tcl_DString * dsPtr); 31 32/* utf8 buffer to decomposed utf8 DString */ 33int UtfToDUtfDString(Tcl_Interp * interp, CONST84 char * src, int length, Tcl_DString * dsPtr); 34 35/* CFStringRef to decomposed Unicode Tcl_Obj */ 36Tcl_Obj * CFStringToTclObj(CFStringRef strRef); 37 38/* Unicode Tcl_Obj * to CFStringRef */ 39CFStringRef TclObjToCFString(Tcl_Obj * inObj); 40 41#endif 42 43#ifdef __cplusplus 44} 45#endif 46 47#endif 48