1/* Author: Daniel A. Steffen */ 2 3#ifndef OSXMACTCL_H 4#define OSXMACTCL_H 5#pragma once 6 7#if TARGET_RT_MAC_MACHO 8 9int Tcl_BeepObjCmd (ClientData clientData, Tcl_Interp *interp, int objc, Tcl_Obj *CONST84 objv[]); 10 11OSErr FSpLocationFromPath (int length, CONST84 char *path, FSSpecPtr fileSpecPtr); 12 13OSErr FSpPathFromLocation (FSSpecPtr spec, int* length, Handle *fullPath); 14 15/* CFString to external DString */ 16int CFStringToExternalDString(Tcl_Interp * interp, CFStringRef strRef, Tcl_DString * dsPtr); 17 18/* CFString to DString */ 19int CFStringToUtfDString(Tcl_Interp * interp, CFStringRef strRef, Tcl_DString * dsPtr); 20 21/* decomposed utf8 buffer to external DString */ 22int DUtfToExternalDString(Tcl_Interp * interp, CONST84 char * src, int length, Tcl_DString * dsPtr); 23 24/* decomposed utf8 buffer to DString */ 25int DUtfToUtfDString(Tcl_Interp * interp, CONST84 char * src, int length, Tcl_DString * dsPtr); 26 27/* external buffer to decomposed utf8 DString */ 28int ExternalToDUtfDString(Tcl_Interp * interp, CONST84 char * src, int length, Tcl_DString * dsPtr); 29 30/* utf8 buffer to decomposed utf8 DString */ 31int UtfToDUtfDString(Tcl_Interp * interp, CONST84 char * src, int length, Tcl_DString * dsPtr); 32 33#endif 34 35#endif 36