pike.git/
src/
error.c
Branch:
Tag:
Non-build tags
All tags
No tags
1999-03-23
1999-03-23 16:25:22 by Fredrik Hübinette (Hubbe) <hubbe@hubbe.net>
c023d59d2d88f6208d9517c13df18700dababa19 (
11
lines) (+
6
/-
5
)
[
Show
|
Annotate
]
Branch:
7.9
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); }