=================================================================== RCS file: /home/cvs/OpenXM/src/kan96xx/Kan/usage.c,v retrieving revision 1.23 retrieving revision 1.24 diff -u -p -r1.23 -r1.24 --- OpenXM/src/kan96xx/Kan/usage.c 2003/09/12 02:52:50 1.23 +++ OpenXM/src/kan96xx/Kan/usage.c 2003/11/17 00:28:13 1.24 @@ -1,4 +1,4 @@ -/* $OpenXM: OpenXM/src/kan96xx/Kan/usage.c,v 1.22 2003/08/26 12:46:05 takayama Exp $ */ +/* $OpenXM: OpenXM/src/kan96xx/Kan/usage.c,v 1.23 2003/09/12 02:52:50 takayama Exp $ */ #include #include "datatype.h" #include "stackm.h" @@ -68,6 +68,7 @@ void Kusage2(fp,s) }else if (strcmp(s,"closefile")==0) { fppp(fp,"<< fd closefile >>\n"); fppp(fp,"file fd;\n"); + fppp(fp,"cf. file (open a file)\n"); }else if (strcmp(s,"coefficients")==0 || strcmp(s,"coeff")==0) { fppp(fp,"<< f v coeff [exponents coefficients] >>\n"); fppp(fp,"poly f,v; list of integers exponents; list of poly coefficients;\n"); @@ -166,6 +167,7 @@ void Kusage2(fp,s) fppp(fp,"It opens the <> with the <>. <> is the\n"); fppp(fp,"file descripter and is used in writestring and closefile.\n"); fppp(fp,"If filename part is an integer, it calls fdopen() and returns the file descripter.\n"); + fppp(fp,"cf. closefile, writestring, pushfile \n"); }else if (strcmp(s,"for")==0) { fppp(fp,"<>\n"); fppp(fp,"integer init inc limit;\n");