mirror of
https://github.com/elliotnunn/sys7.1-doc-wip.git
synced 2024-06-01 04:41:39 +00:00
454 lines
17 KiB
C
454 lines
17 KiB
C
/*
|
|
File: TextUtils.h
|
|
|
|
Contains: C Interface to the Macintosh Libraries
|
|
|
|
Written by: Don Louv
|
|
|
|
Copyright: © 1985-1993 by Apple Computer, Inc., all rights reserved.
|
|
|
|
Change History (most recent first):
|
|
|
|
<SM6> 8/17/93 JDR update from Reality
|
|
<19> 8/2/93 DTY Move EqualString inlines into TextUtilsPriv.h.
|
|
<18> 3/20/93 ngk Fix to <17>, Stupid _CmpString returns 0 if strings are equal,
|
|
so need to NOT result in inline (glue used to do this for you).
|
|
<17> 3/19/93 DTY Add InlineEqualString, CaseSensitiveEqualString,
|
|
MarkSensitiveEqualString, and CaseAndMarkSensitiveEqualString in
|
|
a further effort to reduce glue required by the system.
|
|
<16> 10/16/92 PKE For new IM: Change reserved field name in NBreakTable to length,
|
|
reflecting its real usage.
|
|
<15> 8/28/92 DCL Fixed enums with commas before the closing brace. MPW now
|
|
complains.
|
|
<14> 6/11/92 DCL Cleanup & formatting to match Interface Stacks. Happy Happy Joy
|
|
Joy.
|
|
<13> 5/29/92 DCL Moved DateTime stuff to OSUtils, and intl stuff to
|
|
IntlResources.
|
|
<12> 5/7/92 DCL NIIM: Movin date & time Stuff from DateTime to TextUtils.
|
|
<11> 5/6/92 DCL NIIM: Moved KeyTrans back from TextUtils to Events.
|
|
<10> 5/5/92 DCL For New Inside Mac: removing 'sc' prefixes from some calls,
|
|
moving some calls from script to TextUtils, and moving some from
|
|
TextUtils & QuickDraw to QuickdrawText. Weeeeeeee!
|
|
<9> 4/28/92 KST Get rid of the compiler warning.
|
|
<8> 4/17/92 DCL For New Inside Mac: Mo' Better Call Names. Str -> String, Secs
|
|
-> Seconds. Sorry, no more Secs.
|
|
<7> 4/15/92 DCL For New Inside Mac: Moved StyledLineBreakCode from script to
|
|
TextUtils.
|
|
<6> 4/15/92 DCL For New Inside Mac: Moved many definitions from Script to
|
|
TextUtils. And added new synonyms. #1025005
|
|
<5> 4/6/92 DCL For New Inside Mac: Moved declarations from Script.[aph] to
|
|
TextUtils.[aph]. #1025005
|
|
<4> 4/1/92 DCL Fix the calls from xxxxIntlxxxx to xxxxxxxxxIntl.
|
|
<3> 3/30/92 DCL New and Improved routine names for New Improved Inside Mac.
|
|
#1025005
|
|
<2+> 3/26/92 DCL Moved IUMetric here. I slipped and dropped it in DateTime.
|
|
Need better mousegrips.
|
|
<2> 3/26/92 DCL For New IM: Moved many declarations and routines from
|
|
Packages.[ph] to TextUtils.[ph]
|
|
<1> 3/12/92 DCL first checked in
|
|
|
|
*/
|
|
|
|
|
|
|
|
#ifndef __TEXTUTILS__
|
|
#define __TEXTUTILS__
|
|
|
|
#ifndef __TYPES__
|
|
#include <Types.h>
|
|
#endif
|
|
|
|
#ifndef __SCRIPT__
|
|
#include <Script.h>
|
|
#endif
|
|
|
|
#ifndef __OSUTILS__
|
|
#include <OSUtils.h>
|
|
#endif
|
|
|
|
|
|
enum {
|
|
// New constants for System 7.0: <#9>
|
|
|
|
/* Constants for truncWhere argument in TruncString and TruncText */
|
|
truncEnd = 0, /* Truncate at end */
|
|
truncMiddle = 0x4000, /* Truncate in middle */
|
|
smTruncEnd = 0, /* Truncate at end obsolete */
|
|
smTruncMiddle = 0x4000, /* Truncate in middle obsolete */
|
|
|
|
/* Constants for TruncString and TruncText results */
|
|
notTruncated = 0, /* No truncation was necessary */
|
|
truncated = 1, /* Truncation performed */
|
|
truncErr = -1, /* General error */
|
|
smNotTruncated = 0, /* No truncation was necessary obsolete */
|
|
smTruncated = 1, /* Truncation performed obsolete */
|
|
smTruncErr = -1 /* General error obsolete */
|
|
};
|
|
|
|
enum {
|
|
fVNumber = 0, /*first version of NumFormatString*/
|
|
|
|
/* Special language code values for Language Order */
|
|
systemCurLang = -2, /* current (itlbLang) lang for system script */
|
|
systemDefLang = -3, /* default (table) lang for system script */
|
|
currentCurLang = -4, /* current (itlbLang) lang for current script */
|
|
currentDefLang = -5, /* default lang for current script */
|
|
scriptCurLang = -6, /* current (itlbLang) lang for specified script */
|
|
scriptDefLang = -7 /* default language for a specified script */
|
|
};
|
|
enum {
|
|
iuSystemCurLang = -2, /* <obsolete> current (itlbLang) lang for system script */
|
|
iuSystemDefLang = -3, /* <obsolete> default (table) lang for system script */
|
|
iuCurrentCurLang = -4, /* <obsolete> current (itlbLang) lang for current script */
|
|
iuCurrentDefLang = -5, /* <obsolete> default lang for current script */
|
|
iuScriptCurLang = -6 /* <obsolete> current (itlbLang) lang for specified script */
|
|
};
|
|
enum {
|
|
iuScriptDefLang = -7 /* <obsolete> default language for a specified script */
|
|
};
|
|
|
|
|
|
enum {smBreakWord,smBreakChar,smBreakOverflow};
|
|
typedef unsigned char StyledLineBreakCode;
|
|
|
|
enum {fPositive,fNegative,fZero};
|
|
typedef unsigned char FormatClass;
|
|
|
|
enum {fFormatOK,fBestGuess,fOutOfSynch,fSpuriousChars,fMissingDelimiter,
|
|
fExtraDecimal,fMissingLiteral,fExtraExp,fFormatOverflow,fFormStrIsNAN,
|
|
fBadPartsTable,fExtraPercent,fExtraSeparator,fEmptyFormatString};
|
|
typedef unsigned char FormatResultType;
|
|
|
|
|
|
struct NumFormatString {
|
|
char fLength;
|
|
char fVersion;
|
|
char data[254]; /*private data*/
|
|
};
|
|
|
|
typedef struct NumFormatString NumFormatString;
|
|
typedef struct NumFormatString NumFormatStringRec;
|
|
|
|
struct FVector {
|
|
short start;
|
|
short length;
|
|
};
|
|
|
|
typedef struct FVector FVector;
|
|
|
|
|
|
typedef FVector TripleInt[3]; /* index by [fPositive..fZero] */
|
|
|
|
struct ScriptRunStatus {
|
|
char script;
|
|
char variant;
|
|
};
|
|
|
|
typedef struct ScriptRunStatus ScriptRunStatus;
|
|
|
|
|
|
/* New types for System 7.0:
|
|
|
|
type for truncWhere parameter in new TruncString, TruncText */
|
|
typedef short TruncCode;
|
|
|
|
|
|
enum {shortDate,longDate,abbrevDate};
|
|
typedef unsigned char DateForm;
|
|
|
|
enum {
|
|
/* String2Date status values */
|
|
fatalDateTime = 0x8000, /*String2Date and String2Time mask to a fatal error*/
|
|
longDateFound = 1, /*String2Date mask to long date found*/
|
|
leftOverChars = 2, /*String2Date & Time mask to warn of left over characters*/
|
|
sepNotIntlSep = 4, /*String2Date & Time mask to warn of non-standard separators*/
|
|
fieldOrderNotIntl = 8, /*String2Date & Time mask to warn of non-standard field order*/
|
|
extraneousStrings = 16, /*String2Date & Time mask to warn of unparsable strings in text*/
|
|
tooManySeps = 32, /*String2Date & Time mask to warn of too many separators*/
|
|
sepNotConsistent = 64, /*String2Date & Time mask to warn of inconsistent separators*/
|
|
tokenErr = 0x8100, /*String2Date & Time mask for 'tokenizer err encountered'*/
|
|
cantReadUtilities = 0x8200,
|
|
dateTimeNotFound = 0x8400,
|
|
dateTimeInvalid = 0x8800
|
|
|
|
};
|
|
|
|
|
|
|
|
typedef short StringToDateStatus;
|
|
typedef short String2DateStatus;
|
|
|
|
struct DateCacheRecord {
|
|
short hidden[256]; /*only for temporary use*/
|
|
};
|
|
|
|
typedef struct DateCacheRecord DateCacheRecord;
|
|
typedef DateCacheRecord *DateCachePtr;
|
|
|
|
|
|
struct BreakTable {
|
|
char charTypes[256];
|
|
short tripleLength;
|
|
short triples[1];
|
|
};
|
|
|
|
typedef struct BreakTable BreakTable;
|
|
typedef BreakTable *BreakTablePtr;
|
|
|
|
/* New NBreakTable for System 7.0: */
|
|
struct NBreakTable {
|
|
signed char flags1;
|
|
signed char flags2;
|
|
short version;
|
|
short classTableOff;
|
|
short auxCTableOff;
|
|
short backwdTableOff;
|
|
short forwdTableOff;
|
|
short doBackup;
|
|
short length; /* length of NBreakTable */ /*<16>*/
|
|
char charTypes[256];
|
|
short tables[1];
|
|
};
|
|
|
|
typedef struct NBreakTable NBreakTable;
|
|
typedef NBreakTable *NBreakTablePtr;
|
|
|
|
|
|
|
|
#ifdef __cplusplus
|
|
extern "C" {
|
|
#endif
|
|
|
|
|
|
pascal void IUDateString(long dateTime,DateForm longFlag,Str255 result)
|
|
= {0x4267,0xA9ED};
|
|
void iudatestring(long dateTime,DateForm longFlag,char *result);
|
|
pascal void DateString(long dateTime,DateForm longFlag,Str255 result,
|
|
Handle intlHandle)
|
|
= {0x3F3C,0x000E,0xA9ED};
|
|
void datestring(long dateTime,DateForm longFlag,char *result,Handle intlHandle);
|
|
pascal void IUDatePString(long dateTime,DateForm longFlag,Str255 result,
|
|
Handle intlHandle)
|
|
= {0x3F3C,0x000E,0xA9ED};
|
|
void iudatepstring(long dateTime,DateForm longFlag,char *result,Handle intlHandle);
|
|
pascal void IUTimeString(long dateTime,Boolean wantSeconds,Str255 result)
|
|
= {0x3F3C,0x0002,0xA9ED};
|
|
void iutimestring(long dateTime,Boolean wantSeconds,char *result);
|
|
pascal void TimeString(long dateTime,Boolean wantSeconds,Str255 result,
|
|
Handle intlHandle)
|
|
= {0x3F3C,0x0010,0xA9ED};
|
|
void timestring(long dateTime,Boolean wantSeconds,char *result,Handle intlHandle);
|
|
pascal void IUTimePString(long dateTime,Boolean wantSeconds,Str255 result,
|
|
Handle intlHandle)
|
|
= {0x3F3C,0x0010,0xA9ED};
|
|
void iutimepstring(long dateTime,Boolean wantSeconds,char *result,Handle intlHandle);
|
|
|
|
pascal void LongDateString(LongDateTime *dateTime,DateForm longFlag,Str255 result,
|
|
Handle intlHandle)
|
|
= {0x3F3C,0x0014,0xA9ED};
|
|
void longdatestring(LongDateTime *dateTime,DateForm longFlag,char *result,
|
|
Handle intlHandle);
|
|
pascal void IULDateString(LongDateTime *dateTime,DateForm longFlag,Str255 result,
|
|
Handle intlHandle)
|
|
= {0x3F3C,0x0014,0xA9ED};
|
|
void iuldatestring(LongDateTime *dateTime,DateForm longFlag,char *result,
|
|
Handle intlHandle);
|
|
pascal void LongTimeString(LongDateTime *dateTime,Boolean wantSeconds,Str255 result,
|
|
Handle intlHandle)
|
|
= {0x3F3C,0x0016,0xA9ED};
|
|
void longtimestring(LongDateTime *dateTime,Boolean wantSeconds,char *result,
|
|
Handle intlHandle);
|
|
pascal void IULTimeString(LongDateTime *dateTime,Boolean wantSeconds,Str255 result,
|
|
Handle intlHandle)
|
|
= {0x3F3C,0x0016,0xA9ED};
|
|
void iultimestring(LongDateTime *dateTime,Boolean wantSeconds,char *result,
|
|
Handle intlHandle);
|
|
|
|
pascal OSErr InitDateCache(DateCachePtr theCache)
|
|
= {0x2F3C,0x8204,0xFFF8,0xA8B5};
|
|
pascal StringToDateStatus StringToDate(Ptr textPtr,long textLen,DateCachePtr theCache,
|
|
long *lengthUsed,LongDateRec *dateTime)
|
|
= {0x2F3C,0x8214,0xFFF6,0xA8B5};
|
|
pascal String2DateStatus String2Date(Ptr textPtr,long textLen,DateCachePtr theCache,
|
|
long *lengthUsed,LongDateRec *dateTime)
|
|
= {0x2F3C,0x8214,0xFFF6,0xA8B5};
|
|
pascal StringToDateStatus StringToTime(Ptr textPtr,long textLen,DateCachePtr theCache,
|
|
long *lengthUsed,LongDateRec *dateTime)
|
|
= {0x2F3C,0x8214,0xFFF4,0xA8B5};
|
|
pascal String2DateStatus String2Time(Ptr textPtr,long textLen,DateCachePtr theCache,
|
|
long *lengthUsed,LongDateRec *dateTime)
|
|
= {0x2F3C,0x8214,0xFFF4,0xA8B5};
|
|
|
|
pascal Boolean EqualString(ConstStr255Param str1,ConstStr255Param str2,
|
|
Boolean caseSens,Boolean diacSens);
|
|
Boolean equalstring(char *str1,char *str2,Boolean caseSens,Boolean diacSens);
|
|
pascal void UpperString(Str255 theString,Boolean diacSens);
|
|
void upperstring(char *theString,Boolean diacSens);
|
|
pascal void UprString(Str255 theString,Boolean diacSens);
|
|
void uprstring(char *theString,Boolean diacSens);
|
|
pascal short RelString(ConstStr255Param str1,ConstStr255Param str2,Boolean caseSens,
|
|
Boolean diacSens);
|
|
short relstring(char *str1,char *str2,Boolean caseSens,Boolean diacSens);
|
|
|
|
pascal StringHandle GetString(short stringID)
|
|
= 0xA9BA;
|
|
pascal long Munger(Handle h,long offset,const void *ptr1,long len1,const void *ptr2,
|
|
long len2)
|
|
= 0xA9E0;
|
|
pascal void SetString(StringHandle theString,ConstStr255Param strNew)
|
|
= 0xA907;
|
|
void setstring(StringHandle theString,char *strNew);
|
|
pascal StringHandle NewString(ConstStr255Param theString)
|
|
= 0xA906;
|
|
StringHandle newstring(char *theString);
|
|
pascal void GetIndString(Str255 theString,short strListID,short index);
|
|
void getindstring(char *theString,short strListID,short index);
|
|
|
|
/* following four will be obsolete. Use equivalent PString call and pass a NIL handle */
|
|
|
|
pascal short IUMagString(const void *aPtr,const void *bPtr,short aLen,short bLen)
|
|
= {0x3F3C,0x000A,0xA9ED};
|
|
pascal short IUMagIDString(const void *aPtr,const void *bPtr,short aLen,
|
|
short bLen)
|
|
= {0x3F3C,0x000C,0xA9ED};
|
|
pascal short IUCompString(ConstStr255Param aStr,ConstStr255Param bStr);
|
|
short iucompstring(char *aStr,char *bStr);
|
|
pascal short IUEqualString(ConstStr255Param aStr,ConstStr255Param bStr);
|
|
short iuequalstring(char *aStr,char *bStr);
|
|
|
|
pascal void StringToNum(ConstStr255Param theString,long *theNum);
|
|
void stringtonum(char *theString,long *theNum);
|
|
pascal void NumToString(long theNum,Str255 theString);
|
|
void numtostring(long theNum,char *theString);
|
|
|
|
pascal short CompareText(const void *aPtr,const void *bPtr,short aLen,
|
|
short bLen,Handle itl2Handle)
|
|
= {0x3F3C,0x001A,0xA9ED};
|
|
pascal short IUMagPString(const void *aPtr,const void *bPtr,short aLen,
|
|
short bLen,Handle itl2Handle)
|
|
= {0x3F3C,0x001A,0xA9ED};
|
|
pascal short IdenticalText(const void *aPtr,const void *bPtr,short aLen,
|
|
short bLen,Handle itl2Handle)
|
|
= {0x3F3C,0x001C,0xA9ED};
|
|
pascal short IUMagIDPString(const void *aPtr,const void *bPtr,short aLen,
|
|
short bLen,Handle itl2Handle)
|
|
= {0x3F3C,0x001C,0xA9ED};
|
|
pascal short CompareString(ConstStr255Param aStr,ConstStr255Param bStr,
|
|
Handle itl2Handle);
|
|
short comparestring(char *aStr,char *bStr,Handle intlHandle);
|
|
pascal short IUCompPString(ConstStr255Param aStr,ConstStr255Param bStr,
|
|
Handle itl2Handle);
|
|
short iucomppstring(char *aStr,char *bStr,Handle intlHandle);
|
|
pascal short IdenticalString(ConstStr255Param aStr,ConstStr255Param bStr,
|
|
Handle itl2Handle);
|
|
short identicalstring(char *aStr,char *bStr,Handle intlHandle);
|
|
pascal short IUEqualPString(ConstStr255Param aStr,ConstStr255Param bStr,
|
|
Handle itl2Handle);
|
|
short iuequalpstring(char *aStr,char *bStr,Handle intlHandle);
|
|
pascal short ScriptOrder(ScriptCode script1,ScriptCode script2)
|
|
= {0x3F3C,0x001E,0xA9ED};
|
|
pascal short IUScriptOrder(ScriptCode script1,ScriptCode script2)
|
|
= {0x3F3C,0x001E,0xA9ED};
|
|
pascal short LanguageOrder(LangCode language1,LangCode language2)
|
|
= {0x3F3C,0x0020,0xA9ED};
|
|
pascal short IULangOrder(LangCode language1,LangCode language2)
|
|
= {0x3F3C,0x0020,0xA9ED};
|
|
pascal short TextOrder(const void *aPtr,const void *bPtr,short aLen,short bLen,
|
|
ScriptCode aScript,ScriptCode bScript,LangCode aLang,LangCode bLang)
|
|
= {0x3F3C,0x0022,0xA9ED};
|
|
pascal short IUTextOrder(const void *aPtr,const void *bPtr,short aLen,short bLen,
|
|
ScriptCode aScript,ScriptCode bScript,LangCode aLang,LangCode bLang)
|
|
= {0x3F3C,0x0022,0xA9ED};
|
|
pascal short StringOrder(ConstStr255Param aStr,ConstStr255Param bStr,
|
|
ScriptCode aScript,ScriptCode bScript,LangCode aLang,LangCode bLang);
|
|
pascal short IUStringOrder(ConstStr255Param aStr,ConstStr255Param bStr,
|
|
ScriptCode aScript,ScriptCode bScript,LangCode aLang,LangCode bLang);
|
|
short iustringorder(char *aStr,char *bStr,ScriptCode aScript,ScriptCode bScript,
|
|
LangCode aLang,LangCode bLang);
|
|
|
|
pascal void FindWord(Ptr textPtr,short textLength,short offset,Boolean leadingEdge,
|
|
BreakTablePtr breaks,OffsetTable offsets)
|
|
= {0x2F3C,0x8012,0x001A,0xA8B5};
|
|
|
|
pascal void FindWordBreaks(Ptr textPtr,short textLength,short offset,Boolean leadingEdge,
|
|
BreakTablePtr breaks,OffsetTable offsets,ScriptCode script)
|
|
= {0x2F3C,0xC012,0x001A,0xA8B5};
|
|
|
|
pascal void UprText(Ptr textPtr,short len)
|
|
= {0x301F,0x205F,0xA054};
|
|
pascal void LwrText(Ptr textPtr,short len)
|
|
= {0x301F,0x205F,0xA056};
|
|
|
|
/* New for 7.0 */
|
|
pascal void LowerText(Ptr textPtr,short len)
|
|
= {0x301F,0x205F,0xA056};
|
|
pascal void StripText(Ptr textPtr,short len)
|
|
= {0x301F,0x205F,0xA256};
|
|
pascal void UpperText(Ptr textPtr,short len)
|
|
= {0x301F,0x205F,0xA456};
|
|
pascal void StripUpperText(Ptr textPtr,short len)
|
|
= {0x301F,0x205F,0xA656};
|
|
|
|
pascal StyledLineBreakCode StyledLineBreak(Ptr textPtr,long textLen,long textStart,
|
|
long textEnd,long flags,Fixed *textWidth,long *textOffset)
|
|
= {0x2F3C,0x821C,0xFFFE,0xA8B5};
|
|
|
|
pascal FormatStatus StringToFormatRec(ConstStr255Param inString,const NumberParts *partsTable,
|
|
NumFormatString *outString)
|
|
= {0x2F3C,0x820C,0xFFEC,0xA8B5};
|
|
pascal FormatStatus Str2Format(ConstStr255Param inString,const NumberParts *partsTable,
|
|
NumFormatString *outString)
|
|
= {0x2F3C,0x820C,0xFFEC,0xA8B5};
|
|
pascal FormatStatus FormatRecToString(const NumFormatString *myCanonical,const NumberParts *partsTable,
|
|
Str255 outString,TripleInt positions)
|
|
= {0x2F3C,0x8210,0xFFEA,0xA8B5};
|
|
pascal FormatStatus Format2Str(const NumFormatString *myCanonical,const NumberParts *partsTable,
|
|
Str255 outString,TripleInt positions)
|
|
= {0x2F3C,0x8210,0xFFEA,0xA8B5};
|
|
pascal FormatStatus ExtendedToString(extended80 x,const NumFormatString *myCanonical,
|
|
const NumberParts *partsTable,Str255 outString)
|
|
= {0x2F3C,0x8210,0xFFE8,0xA8B5};
|
|
pascal FormatStatus FormatX2Str(extended80 x,const NumFormatString *myCanonical,
|
|
const NumberParts *partsTable,Str255 outString)
|
|
= {0x2F3C,0x8210,0xFFE8,0xA8B5};
|
|
pascal FormatStatus StringToExtended(ConstStr255Param source,const NumFormatString *myCanonical,
|
|
const NumberParts *partsTable,extended80 *x)
|
|
= {0x2F3C,0x8210,0xFFE6,0xA8B5};
|
|
pascal FormatStatus FormatStr2X(ConstStr255Param source,const NumFormatString *myCanonical,
|
|
const NumberParts *partsTable,extended80 *x)
|
|
= {0x2F3C,0x8210,0xFFE6,0xA8B5};
|
|
|
|
pascal ScriptRunStatus FindScriptRun(Ptr textPtr,long textLen,long *lenUsed)
|
|
= {0x2F3C,0x820C,0x0026,0xA8B5};
|
|
|
|
pascal void NFindWord(Ptr textPtr,short textLength,short offset,Boolean leadingEdge,
|
|
NBreakTablePtr nbreaks,OffsetTable offsets)
|
|
= {0x2F3C,0x8012,0xFFE2,0xA8B5};
|
|
pascal short TruncString(short width,Str255 theString,TruncCode truncWhere)
|
|
= {0x2F3C,0x8208,0xFFE0,0xA8B5};
|
|
pascal short TruncText(short width,Ptr textPtr,short *length,TruncCode truncWhere)
|
|
= {0x2F3C,0x820C,0xFFDE,0xA8B5};
|
|
pascal short ReplaceText(Handle baseText,Handle substitutionText,Str15 key)
|
|
= {0x2F3C,0x820C,0xFFDC,0xA8B5};
|
|
|
|
|
|
pascal void LowercaseText(Ptr textPtr,short len,ScriptCode script) /*<60>*/
|
|
= {0x3F3C,0x0000,0x2F3C,0x800A,0xFFB6,0xA8B5};
|
|
|
|
pascal void StripDiacritics(Ptr textPtr,short len,ScriptCode script) /*<60>*/
|
|
= {0x3F3C,0x0200,0x2F3C,0x800A,0xFFB6,0xA8B5};
|
|
|
|
pascal void UppercaseText(Ptr textPtr,short len,ScriptCode script) /*<60>*/
|
|
= {0x3F3C,0x0400,0x2F3C,0x800A,0xFFB6,0xA8B5};
|
|
|
|
pascal void UppercaseStripDiacritics(Ptr textPtr,short len,ScriptCode script) /*<60>*/
|
|
= {0x3F3C,0x0600,0x2F3C,0x800A,0xFFB6,0xA8B5};
|
|
|
|
|
|
|
|
#ifdef __cplusplus
|
|
}
|
|
#endif
|
|
|
|
#endif
|