ftp.nice.ch/pub/next/unix/audio/cmusic.bs.N.tar.gz#/src/cmusic/ug.show.c

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

/* SHOW unit generator */

#include "ug.head.h"
#include "mm.head.h"

show

UGHEAD{
    UGINIT;
     register int anyprinted = 0;

    fputs("SHOW:",stderr);
    fputs(sprintf(Junk," narg=%d, Ngen=%d\n",narg, Ngen),stderr);
    for(arg=0;arg<narg;arg++)
	fputs(sprintf(Junk," ap[%d]=0%O, lens[%d]=%.0f, incs[%d]=%d\n",
	    arg,ap[arg],arg,lens[arg],arg,incs[arg]),stderr);
    UGLOOP{
	for(arg=0; arg<narg; arg++){
	    anyprinted = 0;
	    if(i == 0 || incs[arg] != 0){
		fputs(sprintf(Junk," Arg[%d]=%8.3f",arg,VAL(arg)),stderr);
		anyprinted = 1;
	    }
	    ap[arg].v += incs[arg];
	}
	if(anyprinted)fputs("\n",stderr);
    }
}

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