Tk Source Code

Check-in [5693942f]
Login

Many hyperlinks are disabled.
Use anonymous login to enable hyperlinks.

Overview
Comment:Fixed failed compile.
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | core-8-5-branch
Files: files | file ages | folders
SHA1: 5693942fd23b29f626ad135ff373874d8e4353ea
User & Date: dgp 2015-03-21 17:17:46
Context
2015-04-07
01:12
Further cleanup of scrolling, drawing, resize in Cocoa; thanks to Marc Culler for patches check-in: fd7346bd user: kevin_walzer tags: core-8-5-branch
2015-03-21
17:42
merge mark check-in: 081c15ab user: dgp tags: trunk
17:17
Fixed failed compile. check-in: 5693942f user: dgp tags: core-8-5-branch
04:12
Additional copyright notices check-in: 97a36262 user: kevin_walzer tags: core-8-5-branch
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Changes to macosx/tkMacOSXWm.c.

338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381










382
383
384
385
386
387
388
@end
#endif

@interface NSDrawerWindow : NSWindow
{
    id _i1, _i2;
}

- (id) retain
{
#if DEBUG_ZOMBIES
    const char *title = [[self title] UTF8String];
    if (title != NULL) {
	printf("Retaining %s with count %lu\n", title, [self retainCount]);
    }
#endif
    return [super retain];
}

- (id) retain
{
#if DEBUG_ZOMBIES
    const char *title = [[self title] UTF8String];
    if (title != NULL) {
	printf("Retaining %s with count %lu\n", title, [self retainCount]);
    }
#endif
    return [super retain];
}
@end

@implementation TKWindow
@end

@implementation TKWindow(TKWm)
- (BOOL) canBecomeKeyWindow
{
    TkWindow *winPtr = TkMacOSXGetTkWindow(self);

    return (winPtr && winPtr->wmInfoPtr && (winPtr->wmInfoPtr->macClass ==
	    kHelpWindowClass || winPtr->wmInfoPtr->attributes &
	    kWindowNoActivatesAttribute)) ? NO : YES;
}











@end

#pragma mark -

/*
 *----------------------------------------------------------------------
 *







<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<















>
>
>
>
>
>
>
>
>
>







338
339
340
341
342
343
344






















345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
@end
#endif

@interface NSDrawerWindow : NSWindow
{
    id _i1, _i2;
}






















@end

@implementation TKWindow
@end

@implementation TKWindow(TKWm)
- (BOOL) canBecomeKeyWindow
{
    TkWindow *winPtr = TkMacOSXGetTkWindow(self);

    return (winPtr && winPtr->wmInfoPtr && (winPtr->wmInfoPtr->macClass ==
	    kHelpWindowClass || winPtr->wmInfoPtr->attributes &
	    kWindowNoActivatesAttribute)) ? NO : YES;
}

- (id) retain
{
#if DEBUG_ZOMBIES
    const char *title = [[self title] UTF8String];
    if (title != NULL) {
	printf("Retaining %s with count %lu\n", title, [self retainCount]);
    }
#endif
    return [super retain];
}
@end

#pragma mark -

/*
 *----------------------------------------------------------------------
 *
6008
6009
6010
6011
6012
6013
6014
6015
6016
6017
6018
6019
6020
6021
6022
	goto done;
    }

    NSArray *macWindows = [NSApp orderedWindows];
    NSInteger windowCount = [macWindows count];

    if (!windowCount) {
	ckfree(windows);
	windows = NULL;
    } else {
	windowPtr = windows + table.numEntries;
	*windowPtr-- = NULL;
	for (NSWindow *w in macWindows) {
	    hPtr = Tcl_FindHashEntry(&table, (char*) w);
	    if (hPtr != NULL) {







|







5996
5997
5998
5999
6000
6001
6002
6003
6004
6005
6006
6007
6008
6009
6010
	goto done;
    }

    NSArray *macWindows = [NSApp orderedWindows];
    NSInteger windowCount = [macWindows count];

    if (!windowCount) {
	ckfree((char *)windows);
	windows = NULL;
    } else {
	windowPtr = windows + table.numEntries;
	*windowPtr-- = NULL;
	for (NSWindow *w in macWindows) {
	    hPtr = Tcl_FindHashEntry(&table, (char*) w);
	    if (hPtr != NULL) {