ftp.nice.ch/pub/next/audio/apps/Looching.2.1.I.bs.tar.gz#/Looching.2.1.I.bs/Stopit.m

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

/* Generated by Interface Builder */

#include <libc.h>
#include <strings.h>

extern int Pid;

#import "Stopit.h"

@implementation Stopit

- terminate:sender
{
	if (Pid > 0) {
		char s[10] = "kill ";
		char num[10];

		sprintf(num,"%d",Pid);
		strcat(s,num);
		system(s);
		}

	[super terminate:self];
}


@end

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