[BACK]Return to rawcmo.c CVS log [TXT][DIR] Up to [local] / OpenXM / src / kan96xx / Kan / Kclass

File: [local] / OpenXM / src / kan96xx / Kan / Kclass / rawcmo.c (download)

Revision 1.1.1.1 (vendor branch), Fri Oct 8 02:12:02 1999 UTC (24 years, 8 months ago) by maekawa
Branch: OpenXM
CVS Tags: ALPHA
Changes since 1.1: +0 -0 lines

o import OpenXM sources

/* Kclass/rawcmo.c   */
#include <stdio.h>
#include "../datatype.h"
#include "../stackm.h"
#include "../extern.h"
#include "../gradedset.h"
#include "../extern2.h"
#include "../kclass.h"

/* Printing function : see fprintClass */
void fprintCMOClass(FILE *fp,struct object op)
{
  if (fp != stdout) warningKan("fprintfCMOClass() can output only to stdout.\n");
  /* cmo functions are defined in the plugin. So, we use
     executeString */
  KSpush(op);
  KSexecuteString("[(cmoDumpCmo) 3 -1 roll ] extension pop ");
}