version 1.23, 2005/07/03 10:19:22 |
version 1.27, 2007/01/25 16:19:41 |
|
|
* DEVELOPER SHALL HAVE NO LIABILITY IN CONNECTION WITH THE USE, |
* DEVELOPER SHALL HAVE NO LIABILITY IN CONNECTION WITH THE USE, |
* PERFORMANCE OR NON-PERFORMANCE OF THE SOFTWARE. |
* PERFORMANCE OR NON-PERFORMANCE OF THE SOFTWARE. |
* |
* |
* $OpenXM: OpenXM_contrib2/asir2000/engine/init.c,v 1.22 2004/12/02 13:48:43 noro Exp $ |
* $OpenXM: OpenXM_contrib2/asir2000/engine/init.c,v 1.26 2006/02/25 06:33:31 noro Exp $ |
*/ |
*/ |
#include "ca.h" |
#include "ca.h" |
#include "version.h" |
#include "version.h" |
|
|
int current_mod = 0; |
int current_mod = 0; |
int StrassenSize = 0; |
int StrassenSize = 0; |
int outputstyle = 0; |
int outputstyle = 0; |
|
int Itvplot = 33; |
|
|
static int *lprime; |
static int *lprime; |
static int lprime_size; |
static int lprime_size; |
Line 260 char *get_asir_distribution() { |
|
Line 261 char *get_asir_distribution() { |
|
} |
} |
|
|
|
|
void create_error(ERR *err,unsigned int serial,char *msg) |
void create_error(ERR *err,unsigned int serial,char *msg,LIST trace) |
{ |
{ |
int len; |
int len; |
USINT ui; |
USINT ui,notsupp; |
NODE n,n1; |
NODE n,n1; |
LIST list; |
LIST list; |
char *msg1; |
char *msg1; |
STRING errmsg; |
STRING errmsg; |
|
|
MKUSINT(ui,serial); |
MKUSINT(ui,serial); |
|
MKUSINT(notsupp,-1); |
len = strlen(msg); |
len = strlen(msg); |
msg1 = (char *)MALLOC(len+1); |
msg1 = (char *)MALLOC(len+1); |
strcpy(msg1,msg); |
strcpy(msg1,msg); |
MKSTR(errmsg,msg1); |
MKSTR(errmsg,msg1); |
MKNODE(n1,errmsg,0); MKNODE(n,ui,n1); MKLIST(list,n); |
if ( !trace ) |
|
MKLIST(trace,0); |
|
n = mknode(4,ui,notsupp,errmsg,trace); MKLIST(list,n); |
MKERR(*err,list); |
MKERR(*err,list); |
} |
} |
|
|