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

Return to option.c CVS log

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

version 1.15, 2004/09/17 02:42:57

version 1.16, 2005/06/16 05:07:23

Line 1

/* $OpenXM: OpenXM/src/kan96xx/Kan/option.c,v 1.14 2003/11/20 09:20:36 takayama Exp $ */

/* $OpenXM: OpenXM/src/kan96xx/Kan/option.c,v 1.15 2004/09/17 02:42:57 takayama Exp $ */

#include <stdio.h>

#include "datatype.h"

#include "stackm.h"

Line 60 struct object KsystemVariable(ob)

extern int RestrictedMode, RestrictedMode_saved;

int n,i;

struct object ob1,ob2,ob3,ob4;

struct object ob1 = OINIT;

struct object ob2 = OINIT;

struct object ob3 = OINIT;

struct object ob4 = OINIT;

struct object rob = NullObject;

switch (getoaSize(ob)) {

case 1: /* get the value */