This is io.c in view mode; [Download] [Up]
#include <stdio.h>
m_input(p,n_args)
float *p;
{
p[1] = (n_args > 1) ? p[1] : 0.;
p[2] = 0;
n_args = 3;
fprintf(stderr,"Opening input file as unit %d\n",(int)p[1]);
m_open(p,n_args);
}
m_output(p,n_args)
float *p;
{
p[1] = (n_args > 1) ? p[1] : 1.;
p[2] = 2;
n_args = 3;
fprintf(stderr,"Opening output file as unit %d\n",(int)p[1]);
m_open(p,n_args);
}
These are the contents of the former NiCE NeXT User Group NeXTSTEP/OpenStep software archive, currently hosted by Netfuture.ch.