Annotation of OpenXM/src/kan96xx/Kan/Kclass/rawcmo.c, Revision 1.2
1.2 ! takayama 1: /* $OpenXM$ */
1.1 maekawa 2: /* Kclass/rawcmo.c */
3: #include <stdio.h>
4: #include "../datatype.h"
5: #include "../stackm.h"
6: #include "../extern.h"
7: #include "../gradedset.h"
8: #include "../extern2.h"
9: #include "../kclass.h"
10:
11: /* Printing function : see fprintClass */
12: void fprintCMOClass(FILE *fp,struct object op)
13: {
14: if (fp != stdout) warningKan("fprintfCMOClass() can output only to stdout.\n");
15: /* cmo functions are defined in the plugin. So, we use
16: executeString */
17: KSpush(op);
18: KSexecuteString("[(cmoDumpCmo) 3 -1 roll ] extension pop ");
19: }
20:
21:
22:
23:
24:
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>