ftp.nice.ch/pub/next/unix/audio/cmix.s.tar.gz#/cmix/sys/floc.c

This is floc.c in view mode; [Download] [Up]

#include "../H/ugens.h"
#include <stdio.h>

extern int   ngens;       /*total of gens so far, initialized in main at 1*/
extern float *farrays[256];
extern int sizeof_farray[256];

float *floc(genno)
/*       returns the address of function number genno  */
{
	if(!sizeof_farray[genno]) {
               fprintf(stderr,"floc: You haven't allocated function %d yet.\n",genno);
		closesf();
	}
	return(farrays[genno]);
}

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