ftp.nice.ch/pub/next/developer/languages/smalltalk/smalltalk.1.2.alpha5.s.tar.gz#/smalltalk-1.2.alpha5/objc/objclib/STAppDelegate.m

This is STAppDelegate.m in view mode; [Download] [Up]

#import "STAppDelegate.h"

@implementation STAppDelegate

- appWillInit:sender
{
	if (stObject)
		msgSend(stObject, symbolToOOP(sel_getName(_cmd)), cObjectToOOP(sender), nil);
	return self;
}

- appDidInit:sender
{
	if (stObject)
		msgSend(stObject, symbolToOOP(sel_getName(_cmd)), cObjectToOOP(sender), nil);
	return self;
}

- appDidHide:sender
{
	if (stObject)
		msgSend(stObject, symbolToOOP(sel_getName(_cmd)), cObjectToOOP(sender), nil);
	return self;
}

- appDidUnhide:sender
{
	if (stObject)
		msgSend(stObject, symbolToOOP(sel_getName(_cmd)), cObjectToOOP(sender), nil);
	return self;
}

- appDidBecomeActive:sender
{
	if (stObject)
		msgSend(stObject, symbolToOOP(sel_getName(_cmd)), cObjectToOOP(sender), nil);
	return self;
}

- appDidResignActive:sender
{
	if (stObject)
		msgSend(stObject, symbolToOOP(sel_getName(_cmd)), cObjectToOOP(sender), nil);
	return self;
}

- appDidUpdate:sender
{
	if (stObject)
		msgSend(stObject, symbolToOOP(sel_getName(_cmd)), cObjectToOOP(sender), nil);
	return self;
}

- appWillUpdate:sender
{
	if (stObject)
		msgSend(stObject, symbolToOOP(sel_getName(_cmd)), cObjectToOOP(sender), nil);
	return self;
}

- appWillTerminate:sender
{
	if (stObject)
		msgSend(stObject, symbolToOOP(sel_getName(_cmd)), cObjectToOOP(sender), nil);
	return self;
}

@end

These are the contents of the former NiCE NeXT User Group NeXTSTEP/OpenStep software archive, currently hosted by Netfuture.ch.