mirror of
https://github.com/elliotnunn/boot3.git
synced 2024-07-06 02:28:55 +00:00
5b0f0cc134
Resource forks are included only for .rsrc files. These are DeRezzed into their data fork. 'ckid' resources, from the Projector VCS, are not included. The Tools directory, containing mostly junk, is also excluded.
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
|