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