| version 1.1, 2004/06/21 12:46:04 |
version 1.2, 2009/03/16 14:25:57 |
|
|
| /* -*- mode: C -*- */ |
/* -*- mode: C -*- */ |
| /* $OpenXM$ */ |
/* $OpenXM: OpenXM/src/ox_maple/simple.c,v 1.1 2004/06/21 12:46:04 takayama Exp $ */ |
| |
|
| /* A sample implementation for maple |
/* A sample implementation for maple |
| of an OpenXM client with OpenXM C library */ |
of an OpenXM client with OpenXM C library */ |
| Line 33 int ml_start_asir() |
|
| Line 33 int ml_start_asir() |
|
| } |
} |
| return 0; |
return 0; |
| } |
} |
| |
|
| |
int ml_start_maple() |
| |
{ |
| |
char *server = "ox_maple"; |
| |
|
| |
ml_init(); |
| |
|
| |
sv = ox_start("localhost", "ox", server); |
| |
if (sv == NULL) { |
| |
ox_printf("simple:: I cannot connect to servers.\n"); |
| |
return -1; |
| |
} |
| |
return 0; |
| |
} |
| |
|
| |
|
| |
|
| |
|
| int ml_push_int(int i) { |
int ml_push_int(int i) { |
| if (sv == NULL) ml_start_asir(); |
if (sv == NULL) ml_start_asir(); |