OpenXM/src/kan96xx/plugin/oxmisc2.c - diff

Return to oxmisc2.c CVS log

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

version 1.4, 1999/11/27 01:41:11

version 1.5, 2000/02/02 03:30:48

Line 1

/* $OpenXM: OpenXM/src/kan96xx/plugin/oxmisc2.c,v 1.3 1999/11/18 00:54:17 takayama Exp $ */

/* $OpenXM: OpenXM/src/kan96xx/plugin/oxmisc2.c,v 1.4 1999/11/27 01:41:11 takayama Exp $ */

#include <stdio.h>

#include "ox_kan.h"

#include "oxmisc2.h" /* This file requires sm1 object description. */

Line 677 static int cmoCheck00(struct object obj,int cmo[], int

#define CHECK00_N 4098 /* look up stackm.h and kclass.h */

static int typeTrans[CHECK00_N];

static int init = 0;

if (n == 0) return(1); /* For null cmolist, OK. */

/* if n == 0, report the cmo tag of the object obj.

If it cannot be translated to cmo, then return -1. */

if (!init) {

for (i=0; i<CHECK00_N; i++) {

typeTrans[i] = 0; /* unknown cmo number */

Line 706 static int cmoCheck00(struct object obj,int cmo[], int

Line 708 static int cmoCheck00(struct object obj,int cmo[], int

if (obj.tag == Sclass) {

ttt = typeTrans[ectag(obj)];

}

/* Only report the cmo tag. */

if (n == 0) {

if (ttt == 0) return(-1);

else return(ttt);

}

for (i=0; i<n; i++) {

if (ttt == cmo[i]) {

Line 949 struct object KoxCreateClient2(struct object peer,

Line 956 struct object KoxCreateClient2(struct object peer,

rob = newObjectArray(N_OF_CLIENT_FIELDS);

oxClientToObject(client,rob);

return(rob);

}

int KgetCmoTagOfObject(struct object obj) {

int k;

k=cmoCheck00(obj,(int *)NULL,0);

return(k);

}

errorOxmisc2(char *s) {