Branch: Tag:

1999-03-23

1999-03-23 16:25:22 by Fredrik Hübinette (Hubbe) <hubbe@hubbe.net>

oops

Rev: src/error.c:1.30
Rev: src/error.h:1.32

18:   #include "operators.h"   #include "module_support.h"    - RCSID("$Id: error.c,v 1.29 1999/03/23 16:22:06 hubbe Exp $"); + RCSID("$Id: error.c,v 1.30 1999/03/23 16:24:12 hubbe Exp $");      #undef ATTRIBUTE   #define ATTRIBUTE(X)
447:    INIT_ERROR(math);    if(number)    { -  ERROR_COPY_SVALUE(bad_arg, number); +  ERROR_COPY_SVALUE(math, number);    }else{ -  ERROR_STRUCT(bad_arg,o)->number.type=T_INT; -  ERROR_STRUCT(bad_arg,o)->number.subtype=NUMBER_UNDEFINED; -  ERROR_STRUCT(bad_arg,o)->number.u.integer=0; +  ERROR_STRUCT(math,o)->number.type=T_INT; +  ERROR_STRUCT(math,o)->number.subtype=NUMBER_UNDEFINED; +  ERROR_STRUCT(math,o)->number.u.integer=0;    }    ERROR_DONE(generic);   }