Menu
▾
▴
SF.net SVN: frontierkernel: [1399] Frontier/branches/Int64/Common/source
|
From: <kar...@us...> - 2006-06-06 19:55:56
|
Revision: 1399 Author: karstenw Date: 2006-06-06 12:54:31 -0700 (Tue, 06 Jun 2006) ViewCVS: http://svn.sourceforge.net/frontierkernel/?rev=1399&view=rev Log Message: ----------- comment work Modified Paths: -------------- Frontier/branches/Int64/Common/IowaRuntime/Headers/iowaruntime.h Frontier/branches/Int64/Common/IowaRuntime/Source/iowaruntime.c Frontier/branches/Int64/Common/Paige/headers/PAIGE.H Frontier/branches/Int64/Common/UserLandIACToolkit/landgetparam.c Frontier/branches/Int64/Common/headers/FDllCall.h Frontier/branches/Int64/Common/headers/stringdefs.h Frontier/branches/Int64/Common/headers/strings.h Frontier/branches/Int64/Common/resources/Mac/SHELL.R Frontier/branches/Int64/Common/source/aeutils.c Frontier/branches/Int64/Common/source/appletglue.c Frontier/branches/Int64/Common/source/cancoon.c Frontier/branches/Int64/Common/source/claybrowservalidate.c Frontier/branches/Int64/Common/source/claylinelayout.c Frontier/branches/Int64/Common/source/filelaunch.c Frontier/branches/Int64/Common/source/langexternal.c Frontier/branches/Int64/Common/source/langipc.c Frontier/branches/Int64/Common/source/langpack.c Frontier/branches/Int64/Common/source/langscan.c Frontier/branches/Int64/Common/source/langsystypes.c Frontier/branches/Int64/Common/source/langverbs.c Frontier/branches/Int64/Common/source/oplist.c Frontier/branches/Int64/Common/source/oprefcon.c Frontier/branches/Int64/Common/source/ops.c Frontier/branches/Int64/Common/source/osacomponent.c Frontier/branches/Int64/Common/source/resources.c Frontier/branches/Int64/Common/source/shellmouse.c Frontier/branches/Int64/Common/source/shellprint.c Frontier/branches/Int64/Common/source/strings.c Frontier/branches/Int64/Common/source/stringverbs.c Frontier/branches/Int64/Common/source/wpengine.c Frontier/branches/Int64/Common/source/zoom.c Modified: Frontier/branches/Int64/Common/IowaRuntime/Headers/iowaruntime.h =================================================================== --- Frontier/branches/Int64/Common/IowaRuntime/Headers/iowaruntime.h 2006-06-06 19:53:23 UTC (rev 1398) +++ Frontier/branches/Int64/Common/IowaRuntime/Headers/iowaruntime.h 2006-06-06 19:54:31 UTC (rev 1399) @@ -112,7 +112,7 @@ boolean runCard (Handle, boolean, short, short, tycardeventcallback); -// 2006-04-03 - kw --- renamed parameter +// 2006-04-03 kw: renamed parameter boolean runHostedCard (WindowPtr hostwindow, Handle hpackedcard, boolean flscriptedcard, tycardeventcallback pcallback); boolean setObjectValue (hdlcard, bigstring, Handle); Modified: Frontier/branches/Int64/Common/IowaRuntime/Source/iowaruntime.c =================================================================== --- Frontier/branches/Int64/Common/IowaRuntime/Source/iowaruntime.c 2006-06-06 19:53:23 UTC (rev 1398) +++ Frontier/branches/Int64/Common/IowaRuntime/Source/iowaruntime.c 2006-06-06 19:54:31 UTC (rev 1399) @@ -613,7 +613,7 @@ static void filterevent (EventRecord *ev) { - // 2006-04-03 - kw --- renamed callback -> lCallback + // 2006-04-03 kw: renamed callback -> lCallback tycardeventcallback lCallback = (**runtimedata).callback; if (lCallback == nil) @@ -675,7 +675,7 @@ return true if the buttonhit has been fully processed */ - // 2006-04-03 - kw --- renamed callback -> lCallback + // 2006-04-03 kw: renamed callback -> lCallback tycardeventcallback lCallback = (**runtimedata).callback; EventRecord ev; @@ -706,7 +706,7 @@ giving him a chance to save data from the card. */ - // 2006-04-03 - kw --- renamed callback -> lCallback + // 2006-04-03 kw: renamed callback -> lCallback tycardeventcallback lCallback = (**runtimedata).callback; EventRecord ev; @@ -2298,7 +2298,7 @@ boolean runModalCard (Handle hpackedcard, boolean flscriptedcard, short top, short pLeft, tycardeventcallback pCallback) { - // 2006-04-03 - kw --- renamed params left -pLeft, callback -> pCallback + // 2006-04-03 kw: renamed params left -pLeft, callback -> pCallback /* dmb 1.0b24: changed flcallback logic. we no longer call back on activate and update events that we just handled Modified: Frontier/branches/Int64/Common/Paige/headers/PAIGE.H =================================================================== --- Frontier/branches/Int64/Common/Paige/headers/PAIGE.H 2006-06-06 19:53:23 UTC (rev 1398) +++ Frontier/branches/Int64/Common/Paige/headers/PAIGE.H 2006-06-06 19:54:31 UTC (rev 1399) @@ -1961,7 +1961,7 @@ /* Async Lock/Unlock */ -// 2006-04-04 - kw --- removed parameter names +// 2006-04-04 kw: removed parameter names //extern PG_PASCAL (pg_boolean) pgSetLockID (pg_ref pg, long ID); extern PG_PASCAL (pg_boolean) pgSetLockID (pg_ref, long); extern PG_PASCAL (long) pgGetLockID (pg_ref pg); @@ -2118,7 +2118,7 @@ extern PG_PASCAL (short) pgFindStyleSheet (pg_ref pg, const style_info_ptr compare_style, const style_info_ptr mask); -// 2006-04-04 - kw --- removed parameter names +// 2006-04-04 kw: removed parameter names // extern PG_PASCAL (short) pgGetIndStyleSheet (pg_ref pg, short index, style_info_ptr stylesheet); extern PG_PASCAL (short) pgGetIndStyleSheet (pg_ref, short, style_info_ptr); @@ -2135,7 +2135,7 @@ extern PG_PASCAL (short) pgFindParStyleSheet (pg_ref pg, const par_info_ptr compare_style, const par_info_ptr mask); -// 2006-04-04 - kw --- removed parameter names +// 2006-04-04 kw: removed parameter names // extern PG_PASCAL (short) pgGetIndParStyleSheet (pg_ref pg, short index, par_info_ptr stylesheet); extern PG_PASCAL (short) pgGetIndParStyleSheet (pg_ref, short, par_info_ptr); @@ -2145,14 +2145,14 @@ extern PG_PASCAL (void) pgApplyNamedStyle (pg_ref pg, select_pair_ptr selection, pg_c_string_ptr stylename, short draw_mode); -// 2006-04-04 - kw --- removed parameter names +// 2006-04-04 kw: removed parameter names // extern PG_PASCAL (void) pgApplyNamedStyleIndex (pg_ref pg, select_pair_ptr selection, long index, short draw_mode); extern PG_PASCAL (void) pgApplyNamedStyleIndex (pg_ref, select_pair_ptr, long, short); extern PG_PASCAL (long) pgNumNamedStyles (pg_ref pg); extern PG_PASCAL (long) pgGetNamedStyleIndex (pg_ref pg, pg_c_string_ptr stylename); -// 2006-04-04 - kw --- removed parameter names +// 2006-04-04 kw: removed parameter names // extern PG_PASCAL (void) pgGetNamedStyleInfo (pg_ref pg, long index, style_info_ptr style, font_info_ptr font, par_info_ptr par); extern PG_PASCAL (void) pgGetNamedStyleInfo (pg_ref, long, style_info_ptr, font_info_ptr, par_info_ptr); @@ -2359,7 +2359,7 @@ extern PG_PASCAL (void) pgInsertExclusionShape (pg_ref pg, pg_short_t position, shape_ref exclude_shape, short draw_mode); -// 2006-04-04 - kw --- removed parameter names +// 2006-04-04 kw: removed parameter names // extern PG_PASCAL (void) pgAttachParExclusion (pg_ref pg, long position, pg_short_t index, short draw_mode); extern PG_PASCAL (void) pgAttachParExclusion (pg_ref, long, pg_short_t, short); Modified: Frontier/branches/Int64/Common/UserLandIACToolkit/landgetparam.c =================================================================== --- Frontier/branches/Int64/Common/UserLandIACToolkit/landgetparam.c 2006-06-06 19:53:23 UTC (rev 1398) +++ Frontier/branches/Int64/Common/UserLandIACToolkit/landgetparam.c 2006-06-06 19:54:31 UTC (rev 1399) @@ -144,7 +144,7 @@ if (!landgetparam (hverb, key, longtype, ¶m)) return (false); - /* kw - 2006-02-19 --- don't dereference the nil handle... */ + /* 2006-02-19 kw: don't dereference the nil handle... */ #if TARGET_API_MAC_CARBON == 1 /*PBS 03/14/02: AE OS X fix.*/ if (copydatahandle (&(param.desc), &theData)) Modified: Frontier/branches/Int64/Common/headers/FDllCall.h =================================================================== --- Frontier/branches/Int64/Common/headers/FDllCall.h 2006-06-06 19:53:23 UTC (rev 1398) +++ Frontier/branches/Int64/Common/headers/FDllCall.h 2006-06-06 19:54:31 UTC (rev 1399) @@ -263,7 +263,7 @@ odbBool (xCALLBACK *xOdbNewListValue) (odbRef odb, odbValueRecord *value, odbBool flRecord); odbBool (xCALLBACK *xOdbGetListCount) (odbRef odb, odbValueRecord *value, long * cnt); - // 2006-04-04 - kw --- removed parameter names + // 2006-04-04 kw: removed parameter names // odbBool (xCALLBACK *xOdbDeleteListValue) (odbRef odb, odbValueRecord *value, long index, char * recordname); odbBool (xCALLBACK *xOdbDeleteListValue) (odbRef, odbValueRecord *, long, char *); // odbBool (xCALLBACK *xOdbSetListValue) (odbRef odb, odbValueRecord *value, long index, char * recordname, odbValueRecord *valueData); Modified: Frontier/branches/Int64/Common/headers/stringdefs.h =================================================================== --- Frontier/branches/Int64/Common/headers/stringdefs.h 2006-06-06 19:53:23 UTC (rev 1398) +++ Frontier/branches/Int64/Common/headers/stringdefs.h 2006-06-06 19:54:31 UTC (rev 1399) @@ -75,7 +75,7 @@ #define STR_picture BIGSTRING ("\x07" "picture") #if LONGINT_LONGDATE == 1 // long type names - // kw - 2006-01-30 --- new types added + // 2006-01-30 kw: new types added #define STR_longlong BIGSTRING ("\x06" "sint64") #define STR_longdate BIGSTRING ("\x0c" "longdatetime") #endif Modified: Frontier/branches/Int64/Common/headers/strings.h =================================================================== --- Frontier/branches/Int64/Common/headers/strings.h 2006-06-06 19:53:23 UTC (rev 1398) +++ Frontier/branches/Int64/Common/headers/strings.h 2006-06-06 19:54:31 UTC (rev 1399) @@ -33,6 +33,10 @@ #include "memory.h" #endif +#ifndef langinclude +#include "lang.h" // for tylonglongint +#endif + #ifdef PASCALSTRINGVERSION #define nullterminate(s) do {s [stringlength(s) + 1] = '\0';} while (0) #else @@ -247,7 +251,11 @@ extern boolean pullstringsuffix (bigstring, bigstring, unsigned char); /*7.0.2b1 Radio PBS*/ #if LONGINT_LONGDATE == 1 // additional functions declarations + extern boolean stringreverse (bigstring bs); + +extern boolean hexstringtolonglongint (bigstring bshex, tylonglongint *n); + #endif extern void initstrings (void); Modified: Frontier/branches/Int64/Common/resources/Mac/SHELL.R =================================================================== --- Frontier/branches/Int64/Common/resources/Mac/SHELL.R 2006-06-06 19:53:23 UTC (rev 1398) +++ Frontier/branches/Int64/Common/resources/Mac/SHELL.R 2006-06-06 19:54:31 UTC (rev 1399) @@ -1283,7 +1283,7 @@ noAutoCenter }; -/* kw - 2006-02-05 --- missing; taken from carbon DLOG 518 */ +/* 2006-02-05 kw: missing; taken from carbon DLOG 518 */ resource 'DLOG' (512, "find", purgeable) { {0, 0, 123, 451}, noGrowDocProc, @@ -1295,7 +1295,7 @@ noAutoCenter }; -/* kw - 2006-02-05 --- personalisation dialog - was in root resourcefork */ +/* 2006-02-05 kw: personalisation dialog - was in root resourcefork */ resource 'DLOG' (515, "personalisation", purgeable) { {32, 188, 326, 453}, dBoxProc, @@ -1307,7 +1307,7 @@ noAutoCenter }; -/* kw - 2006-02-05 --- personalisation dialog - was in root resourcefork */ +/* 2006-02-05 kw: personalisation dialog - was in root resourcefork */ resource 'DLOG' (516, "tableinfo", purgeable) { {50, 100, 250, 452}, dBoxProc, @@ -1319,7 +1319,7 @@ noAutoCenter }; -/* kw - 2006-02-05 --- reconcile dialog - was in root resourcefork */ +/* 2006-02-05 kw: reconcile dialog - was in root resourcefork */ resource 'DLOG' (25000, "reconcile", purgeable) { {137, 259, 339, 611}, dBoxProc, @@ -3076,7 +3076,7 @@ }; -/* kw - 2006-02-05 --- missing; taken from carbon DLOG 518 */ +/* 2006-02-05 kw: missing; taken from carbon DLOG 518 */ resource 'DITL' (512, "Find Dialog", purgeable, preload) { { /* array DITLarray: 12 elements */ /* [1] */ @@ -3155,7 +3155,7 @@ }; -/* kw - 2006-02-05 --- personalisation dialog - was in root resourcefork */ +/* 2006-02-05 kw: personalisation dialog - was in root resourcefork */ resource 'DITL' (515, "Personalisation Dialog", purgeable, preload) { { /* array DITLarray: 9 elements */ /* [1] */ @@ -3216,7 +3216,7 @@ } }; -/* kw - 2006-02-05 --- table info dialog - was in root resourcefork */ +/* 2006-02-05 kw: table info dialog - was in root resourcefork */ resource 'DITL' (516, "tableinfo", purgeable) { { /* array DITLarray: 12 elements */ /* [1] */ @@ -3294,7 +3294,7 @@ } }; -/* kw - 2006-02-05 --- reconcile dialog - was in root resourcefork */ +/* 2006-02-05 kw: reconcile dialog - was in root resourcefork */ resource 'DITL' (25000) { { /* array DITLarray: 8 elements */ /* [1] */ @@ -3348,8 +3348,7 @@ } }; -/* kw - 2006-02-05 --- personalisation dialog - was in root resourcefork */ -/* kw - 2006-02-05 --- personalisation dialog - was in root resourcefork */ +/* 2006-02-05 kw: personalisation dialog - was in root resourcefork */ #if 0 @@ -3775,7 +3774,7 @@ "scroll bar" }; -/* kw - 2006-02-05 --- missing; taken from old root */ +/* 2006-02-05 kw: missing; taken from old root */ resource 'CNTL' (25000) { {64, 9, 89, 169}, 0, Modified: Frontier/branches/Int64/Common/source/aeutils.c =================================================================== --- Frontier/branches/Int64/Common/source/aeutils.c 2006-06-06 19:53:23 UTC (rev 1398) +++ Frontier/branches/Int64/Common/source/aeutils.c 2006-06-06 19:54:31 UTC (rev 1399) @@ -46,7 +46,7 @@ len = AEGetDescDataSize (desc); -/* kw - 2005-12-12 - we should return at least a zero sized handle +/* 2005-12-12 kw: we should return at least a zero sized handle if (len < 1) { *h = nil; Modified: Frontier/branches/Int64/Common/source/appletglue.c =================================================================== --- Frontier/branches/Int64/Common/source/appletglue.c 2006-06-06 19:53:23 UTC (rev 1398) +++ Frontier/branches/Int64/Common/source/appletglue.c 2006-06-06 19:54:31 UTC (rev 1399) @@ -41,7 +41,7 @@ boolean rectlessthan (Rect r1, Rect r2); boolean unicaseequalstrings (void *pvoid1, void *pvoid2); -// kw - 2005-12-15 - compiler warning rename +// 2005-12-15 kw: compiler warning rename boolean oldclutconverter (short idx, RGBColor *rgb); boolean emptyrect (Rect r); boolean pushhandleonhandle (Handle hsource, Handle hdest); Modified: Frontier/branches/Int64/Common/source/cancoon.c =================================================================== --- Frontier/branches/Int64/Common/source/cancoon.c 2006-06-06 19:53:23 UTC (rev 1398) +++ Frontier/branches/Int64/Common/source/cancoon.c 2006-06-06 19:54:31 UTC (rev 1399) @@ -235,7 +235,7 @@ 5.1.5b10 dmb: use ccfindrootwindow to avoid guest databases */ - tyconfigrecord lconfig; // 2006-04-03 - kw --- renamed + tyconfigrecord lconfig; // 2006-04-03 kw: renamed hdlwindowinfo hinfo; // if (shellpushfrontrootglobals ()) @@ -271,7 +271,7 @@ register hdlcancoonrecord hc = hcancoon; tycancoonwindowinfo windowinfo; - tyconfigrecord lconfig; // 2006-04-03 - kw --- renamed + tyconfigrecord lconfig; // 2006-04-03 kw: renamed Rect r; clearbytes (&windowinfo, sizeof (windowinfo)); Modified: Frontier/branches/Int64/Common/source/claybrowservalidate.c =================================================================== --- Frontier/branches/Int64/Common/source/claybrowservalidate.c 2006-06-06 19:53:23 UTC (rev 1398) +++ Frontier/branches/Int64/Common/source/claybrowservalidate.c 2006-06-06 19:54:31 UTC (rev 1399) @@ -152,7 +152,7 @@ static boolean browsercompareforcollision (hdlheadrecord hnode, long pdragmodified, bigstring bs1, bigstring bs2, ptrdraginfo draginfo) { -// 2006-04-03 - kw --- renamed dragmodified +// 2006-04-03 kw: renamed dragmodified /* 5.0.2b18 dmb: set tmpbit of subs too, so we can detect illegal moves */ Modified: Frontier/branches/Int64/Common/source/claylinelayout.c =================================================================== --- Frontier/branches/Int64/Common/source/claylinelayout.c 2006-06-06 19:53:23 UTC (rev 1398) +++ Frontier/branches/Int64/Common/source/claylinelayout.c 2006-06-06 19:54:31 UTC (rev 1399) @@ -754,7 +754,7 @@ /*special tweaked-up code for drawing the selected line*/ { - Rect lrframe = *rtext; // 2006-04-03 - kw --- renamed rframe + Rect lrframe = *rtext; // 2006-04-03 kw: renamed rframe lrframe.right = lrframe.left + stringpixels (bshead); Modified: Frontier/branches/Int64/Common/source/filelaunch.c =================================================================== --- Frontier/branches/Int64/Common/source/filelaunch.c 2006-06-06 19:53:23 UTC (rev 1398) +++ Frontier/branches/Int64/Common/source/filelaunch.c 2006-06-06 19:54:31 UTC (rev 1399) @@ -126,7 +126,7 @@ OSType fndrCreator; Boolean wasChanged; AliasHandle targetAlias; - long idx; // 2006-04-03 - kw --- renamed + long idx; // 2006-04-03 kw: renamed long nTargets = 1; FSSpec targets[1]; FSSpec *targetList; Modified: Frontier/branches/Int64/Common/source/langexternal.c =================================================================== --- Frontier/branches/Int64/Common/source/langexternal.c 2006-06-06 19:53:23 UTC (rev 1398) +++ Frontier/branches/Int64/Common/source/langexternal.c 2006-06-06 19:54:31 UTC (rev 1399) @@ -2887,9 +2887,9 @@ register tyvaluetype type = langgetvaluetype (typeid); - // kw - 2006-01-30 --- for new int types - these were added at the end + // 2006-01-30 kw: for new int types - these were added at the end // not sure if these need to be externaltypes - // kw - 2006-06-02 --- re-enabled; externaltype is bad for tylonglongint + // 2006-06-02 kw: re-enabled; externaltype is bad for tylonglongint #if LONGINT_LONGDATE == 1 // in langexternalgetvaluetype() if ( (type < longlongintvaluetype) && (type >= outlinevaluetype)) Modified: Frontier/branches/Int64/Common/source/langipc.c =================================================================== --- Frontier/branches/Int64/Common/source/langipc.c 2006-06-06 19:53:23 UTC (rev 1398) +++ Frontier/branches/Int64/Common/source/langipc.c 2006-06-06 19:54:31 UTC (rev 1399) @@ -297,7 +297,7 @@ // modelled after case binaryvaluetype case longlongintvaluetype: case longdatetimevaluetype: - // 2006-05-05 - kw --- copyvaluedata() is off limits here I guess + // 2006-05-05 kw: copyvaluedata() is off limits here I guess /* if (!copyvaluedata (v)) return (false); */ @@ -1057,7 +1057,7 @@ register short i; long ctparams; hdltreenode hlist = nil; - AEDescList directparam = {typeNull, 0L}; // kw - 2006-02-18 --- AEDISPOSAL + AEDescList directparam = {typeNull, 0L}; // 2006-02-18 kw: AEDISPOSAL typaramrecord param; tyvaluerecord val; hdltreenode hparam; @@ -4283,7 +4283,7 @@ */ OSErr err; - AEDesc desc = {typeNull, 0L}; // kw - 2006-02-18 - AEDISPOSAL + AEDesc desc = {typeNull, 0L}; // 2006-02-18 kw: AEDISPOSAL tyfastverbcontext savecontext; long curA5; Modified: Frontier/branches/Int64/Common/source/langpack.c =================================================================== --- Frontier/branches/Int64/Common/source/langpack.c 2006-06-06 19:53:23 UTC (rev 1398) +++ Frontier/branches/Int64/Common/source/langpack.c 2006-06-06 19:54:31 UTC (rev 1399) @@ -260,7 +260,7 @@ // LONGLONGINTCONSTRUCTIONSITE case longlongintvaluetype: case longdatetimevaluetype: { -/* 2006-06-02 - kw --- my intention was to store these as binaries with the proper type +/* 2006-06-02 kw: my intention was to store these as binaries with the proper type Unfortunately coercetobinary currently calls langpack.... */ @@ -699,7 +699,7 @@ { fl = langunpackhandle (false, &v.data.binaryvalue, h, &ixunpack); - // 2006-06-02 - kw --- temporarily switched off; doesn't work + // 2006-06-02 kw: temporarily switched off; doesn't work if (false) //(v.valuetype == binaryvaluetype) { Modified: Frontier/branches/Int64/Common/source/langscan.c =================================================================== --- Frontier/branches/Int64/Common/source/langscan.c 2006-06-06 19:53:23 UTC (rev 1398) +++ Frontier/branches/Int64/Common/source/langscan.c 2006-06-06 19:54:31 UTC (rev 1399) @@ -449,7 +449,7 @@ if (flfloat) { double d; - Handle fx; // 2006-05-15 - kw --- renamed due to ambiguity + Handle fx; // 2006-05-15 kw: renamed due to ambiguity stringtofloat (bsnumber, &d); @@ -461,21 +461,28 @@ (*val).data.binaryvalue = fx; } else { + #if LONGINT_LONGDATE == 1 // in parsepopnumber() + tylonglongint x; #else long x; + #endif bigstring bstest; if (flhex) { + #if LONGINT_LONGDATE == 1 // in parsepopnumber() + // "0x" + 16 hex chars if (stringlength (bsnumber) > 18) goto overflow; hexstringtolonglongint (bsnumber, &x); + #else + if (stringlength (bsnumber) > 10) goto overflow; @@ -483,14 +490,18 @@ #endif } else { + #if LONGINT_LONGDATE == 1 // in parsepopnumber() + stringtolonglongint (bsnumber, &x); #else stringtonumber (bsnumber, &x); + #endif popleadingchars (bsnumber, '0'); #if LONGINT_LONGDATE == 1 // in parsepopnumber() + longlonginttostring (x, bstest, 10); #else numbertostring (x, bstest); @@ -503,12 +514,16 @@ } #if LONGINT_LONGDATE == 1 // in parsepopnumber() + /* check if result fits in a long, if yes use long */ if ( (x < (tylonglongint)LONG_MAX) && (x > (tylonglongint)LONG_MIN)) { + setlongvalue ((long)x, val); } + else { + setlonglongintvalue (x, val); } #else Modified: Frontier/branches/Int64/Common/source/langsystypes.c =================================================================== --- Frontier/branches/Int64/Common/source/langsystypes.c 2006-06-06 19:53:23 UTC (rev 1398) +++ Frontier/branches/Int64/Common/source/langsystypes.c 2006-06-06 19:54:31 UTC (rev 1399) @@ -388,8 +388,8 @@ } } -#if 0 //AEDISPOSAL == 1 - // kw - 2006-03-04 --- gotta crash with find next +#if AEDISPOSAL == 999 + // 2006-03-04 kw: gotta crash with find next AEDisposeDesc(&coerceddesc); #endif @@ -683,7 +683,7 @@ setemptystring (bs); // get each path element out of the alias -// kw - 2006-02-02 --- todo: replace this +// 2006-02-02 kw: todo: replace this /* extern OSErr GetAliasInfo( AliasHandle alias, Modified: Frontier/branches/Int64/Common/source/langverbs.c =================================================================== --- Frontier/branches/Int64/Common/source/langverbs.c 2006-06-06 19:53:23 UTC (rev 1398) +++ Frontier/branches/Int64/Common/source/langverbs.c 2006-06-06 19:54:31 UTC (rev 1399) @@ -864,7 +864,7 @@ if ((type >= outlinevaluetype) && (type <= pictvaluetype)) { #if LONGINT_LONGDATE == 1 // delete me after debugging - // kw - 2006-01-30 debugging aids + // 2006-01-30 kw: debugging aids int x = type; if ((type == 38) || (type == 39)) { Modified: Frontier/branches/Int64/Common/source/oplist.c =================================================================== --- Frontier/branches/Int64/Common/source/oplist.c 2006-06-06 19:53:23 UTC (rev 1398) +++ Frontier/branches/Int64/Common/source/oplist.c 2006-06-06 19:54:31 UTC (rev 1399) @@ -53,8 +53,8 @@ #define oplistversionnumber 1 -// kw - 2006-05-24 --- moved here from frontierdefs.h; -// kw - 2006-02-15 --- oplanglist accelerator - set to 1 to turn on +// 2006-05-24 kw: moved here from frontierdefs.h; +// 2006-02-15 kw: oplanglist accelerator - set to 1 to turn on #define OPLANGLISTACCEL 0 Modified: Frontier/branches/Int64/Common/source/oprefcon.c =================================================================== --- Frontier/branches/Int64/Common/source/oprefcon.c 2006-06-06 19:53:23 UTC (rev 1398) +++ Frontier/branches/Int64/Common/source/oprefcon.c 2006-06-06 19:54:31 UTC (rev 1399) @@ -97,7 +97,7 @@ Handle hrefcon; long lenrefcon; - // kw - 2006-01-19 - after crash - was "Handle hrefcon = (**hnode).hrefcon;" + // 2006-01-19 kw: after crash - was "Handle hrefcon = (**hnode).hrefcon;" if (hnode != nil) hrefcon = (**hnode).hrefcon; Modified: Frontier/branches/Int64/Common/source/ops.c =================================================================== --- Frontier/branches/Int64/Common/source/ops.c 2006-06-06 19:53:23 UTC (rev 1398) +++ Frontier/branches/Int64/Common/source/ops.c 2006-06-06 19:54:31 UTC (rev 1399) @@ -309,7 +309,7 @@ convert a bigstring into a tylonglongint */ /* - 2006-05-13 - kw - first write; modelled after stringtonumber + 2006-05-13 kw: first write; modelled after stringtonumber */ long i, n; Modified: Frontier/branches/Int64/Common/source/osacomponent.c =================================================================== --- Frontier/branches/Int64/Common/source/osacomponent.c 2006-06-06 19:53:23 UTC (rev 1398) +++ Frontier/branches/Int64/Common/source/osacomponent.c 2006-06-06 19:54:31 UTC (rev 1399) @@ -1282,7 +1282,7 @@ AEDesc list; register ScrpSTElement *pstyle; - #ifdef fldebug // 2006-04-04 - kw --- this was fldegug + #ifdef fldebug // 2006-04-04 kw: this was fldegug if (totype != typeStyledText) DebugStr ("\punexpected coercion"); @@ -3276,7 +3276,7 @@ long curA5 = SetUpAppA5 (); #endif - #ifdef fldebug // 2006-04-04 - kw --- this was fldegug + #ifdef fldebug // 2006-04-04 kw: this was fldegug if ((*desc).descriptorType != typeInsertionLoc) DebugStr ("\punexpected coercion"); Modified: Frontier/branches/Int64/Common/source/resources.c =================================================================== --- Frontier/branches/Int64/Common/source/resources.c 2006-06-06 19:53:23 UTC (rev 1398) +++ Frontier/branches/Int64/Common/source/resources.c 2006-06-06 19:54:31 UTC (rev 1399) @@ -664,7 +664,7 @@ errcode = FSOpenResourceFile (&myRef, fork.length, fork.unicode, permission, &newrnum); #else - // kw 2005-12-17 - OS9 compliance + // 2005-12-17 kw: OS9 compliance newrnum = FSpOpenResFile (fs, permission); #endif Modified: Frontier/branches/Int64/Common/source/shellmouse.c =================================================================== --- Frontier/branches/Int64/Common/source/shellmouse.c 2006-06-06 19:53:23 UTC (rev 1398) +++ Frontier/branches/Int64/Common/source/shellmouse.c 2006-06-06 19:54:31 UTC (rev 1399) @@ -435,7 +435,7 @@ if (TrackGoAway (w, mousept)) { - // 2006-04-03 - kw --- brace for ambiguity warning + // 2006-04-03 kw: brace for ambiguity warning if (keyboardstatus.floptionkey) shellcloseall (w, true); else Modified: Frontier/branches/Int64/Common/source/shellprint.c =================================================================== --- Frontier/branches/Int64/Common/source/shellprint.c 2006-06-06 19:53:23 UTC (rev 1398) +++ Frontier/branches/Int64/Common/source/shellprint.c 2006-06-06 19:54:31 UTC (rev 1399) @@ -673,7 +673,7 @@ #ifdef WIN95VERSION -// kw - 2006-06 - splitted for each platform +// 2005-06 kw: splitted for each platform #pragma mark shellprint windows boolean shellprint (WindowPtr w, boolean fldialog) { Modified: Frontier/branches/Int64/Common/source/strings.c =================================================================== --- Frontier/branches/Int64/Common/source/strings.c 2006-06-06 19:53:23 UTC (rev 1398) +++ Frontier/branches/Int64/Common/source/strings.c 2006-06-06 19:54:31 UTC (rev 1399) @@ -1931,7 +1931,7 @@ 2.1b4 dmb: always copy into type, even when returning false for bad length */ - // kw 2005-11-28 changed to unsigned for better match with stringlength() + // 2005-11-28 kw: changed to unsigned for better match with stringlength() register unsigned short len = stringlength (bs); boolean fl = true; @@ -2551,7 +2551,7 @@ return (false); } - // 2005-08-26 --- kw better bytemark detecting + // 2005-08-26 kw: better bytemark detecting // see http://en.wikipedia.org/wiki/Byte_Order_Mark if (inputcharset == kCFStringEncodingUTF8) // we handle utf-8 input { @@ -2882,7 +2882,7 @@ #if LONGINT_LONGDATE == 1 // stringreverse() boolean stringreverse (bigstring bs) { - // 2006-03-17 - kw --- initial write; needed for longlonginttostring + // 2006-03-17 kw: initial write; needed for longlonginttostring // reverse a bigstring by swapping bytes 1 & len, 2 & len-1,... unsigned char e, s, i, t; Modified: Frontier/branches/Int64/Common/source/stringverbs.c =================================================================== --- Frontier/branches/Int64/Common/source/stringverbs.c 2006-06-06 19:53:23 UTC (rev 1398) +++ Frontier/branches/Int64/Common/source/stringverbs.c 2006-06-06 19:54:31 UTC (rev 1399) @@ -2198,7 +2198,7 @@ utf16toansi (h, hresult); - disposehandle(h); // kw 2005-07-23 --- memleak + disposehandle(h); // 2005-07-23 kw: memleak return (setheapvalue (hresult, stringvaluetype, v)); } @@ -2216,7 +2216,7 @@ utf8toansi (h, hresult); - disposehandle(h); // kw 2005-07-23 --- memleak + disposehandle(h); // 2005-07-23 kw: memleak return (setheapvalue (hresult, stringvaluetype, v)); } @@ -2234,7 +2234,7 @@ ansitoutf8 (h, hresult); - disposehandle(h); // kw 2005-07-23 --- memleak + disposehandle(h); // 2005-07-23 kw: memleak return (setheapvalue (hresult, stringvaluetype, v)); } @@ -2252,7 +2252,7 @@ ansitoutf16 (h, hresult); - disposehandle (h); // kw 2005-07-23 --- memleak + disposehandle (h); // 2005-07-23 kw: memleak return (setheapvalue (hresult, stringvaluetype, v)); } Modified: Frontier/branches/Int64/Common/source/wpengine.c =================================================================== --- Frontier/branches/Int64/Common/source/wpengine.c 2006-06-06 19:53:23 UTC (rev 1398) +++ Frontier/branches/Int64/Common/source/wpengine.c 2006-06-06 19:54:31 UTC (rev 1399) @@ -1961,7 +1961,7 @@ 4.1b6 dmb: call SetFractEnable(true) so tab columns will line up */ - /* kw - 2005-12-05 remove this after print error correction */ + /* 2005-12-05 kw: remove this after print error correction */ #if TARGET_API_MAC_CARBON == 1 #pragma unused(pagenumber) return (false); Modified: Frontier/branches/Int64/Common/source/zoom.c =================================================================== --- Frontier/branches/Int64/Common/source/zoom.c 2006-06-06 19:53:23 UTC (rev 1398) +++ Frontier/branches/Int64/Common/source/zoom.c 2006-06-06 19:54:31 UTC (rev 1399) @@ -117,7 +117,7 @@ CGrafPtr deskport; - return; // kw - 2005-12-20 - killing zoomrects + return; // 2005-12-20 kw: killing zoomrects #if ACCESSOR_CALLS_ARE_FUNCTIONS == 1 deskport = CreateNewPort(); #else This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site. |
