version 1.1, 1999/10/08 02:12:15 |
version 1.4, 2005/06/16 05:07:24 |
|
|
|
/* $OpenXM: OpenXM/src/k097/dm.c,v 1.3 2003/07/21 12:41:22 takayama Exp $ */ |
#include <stdio.h> |
#include <stdio.h> |
#include "d.h" |
#include "d.h" |
|
|
Line 39 void *mymalloc(int size) { |
|
Line 39 void *mymalloc(int size) { |
|
void *GC_malloc(int size) { |
void *GC_malloc(int size) { |
return((void *)malloc(size)); |
return((void *)malloc(size)); |
} |
} |
|
void *sGC_malloc(int size) { |
|
return ((void *) GC_malloc(size)); |
|
} |
|
|
sendKan(int p) { /* do nothing */ } |
sendKan(int p) { /* do nothing */ } |
|
|
Line 55 void testNewFunction(objectp op) |
|
Line 58 void testNewFunction(objectp op) |
|
} |
} |
|
|
struct object KSpop() { |
struct object KSpop() { |
struct object obj; |
struct object obj = OINIT; |
obj.tag = 0; |
obj.tag = 0; |
fprintf(stderr," Do not use Test.\n"); |
fprintf(stderr," Do not use Test.\n"); |
return(obj); |
return(obj); |