OpenXM/src/kan96xx/Kan/usage.c - diff

Return to usage.c CVS log

Up to [local] / OpenXM / src / kan96xx / Kan

version 1.4, 2000/02/24 12:33:47

version 1.6, 2000/06/08 08:35:03

Line 1

/* $OpenXM: OpenXM/src/kan96xx/Kan/usage.c,v 1.3 2000/02/24 00:27:12 takayama Exp $ */

/* $OpenXM: OpenXM/src/kan96xx/Kan/usage.c,v 1.5 2000/03/09 12:04:52 takayama Exp $ */

#include <stdio.h>

#include "datatype.h"

#include "stackm.h"

Line 147 char *s;

fppp(fp," [(getpid) ] extension result-integer \n");

fppp(fp," [(getenv) envName] extension valueOfEnvName \n");

fppp(fp," [(stat) fname] extension v \n");

fppp(fp," v = [null,[(error no), p] or [0, [ ]]\n");

fppp(fp," v = [null,[(error no), p]] or [0, [size ]]\n");

fppp(fp," [(forkExec) argList fdList sigblock] extension pid\n");

fppp(fp," [(getchild)] extension listOfPid (generated by forkExec)\n");

fppp(fp," [(keywords) ] extension array-of-names-of-primitives \n");

Line 188 char *s;

fppp(fp," [(lmonom) poly] gbext poly \n");

fppp(fp," [(schreyerSkelton) array_of_poly] gbext array \n");

fppp(fp," [(toes) array_of_poly] gbext poly \n");

fppp(fp," [(toe_) poly] gbext poly \n");

fppp(fp," [(toe_) array_of_poly] gbext poly cf. toVectors \n");

fppp(fp," [(isOrdered) poly] gbext poly \n");

}else if (strcmp(s,"get")==0) {

fppp(fp,"<< [f0 f1 ... fn] k get fk >>\n");