pike.git/
src/
las.c
Branch:
Tag:
Non-build tags
All tags
No tags
2000-02-09
2000-02-09 23:49:17 by Fredrik Hübinette (Hubbe) <hubbe@hubbe.net>
e945ee81061cb1e59d950d8d48070df1897c83b7 (
12
lines) (+
10
/-
2
)
[
Show
|
Annotate
]
Branch:
7.9
bugfixes..
Rev: src/las.c:1.162
Rev: src/mapping.c:1.65
5:
\*/ /**/ #include "global.h"
-
RCSID("$Id: las.c,v 1.
161
2000/02/09
18
:
52
:
11
hubbe Exp $");
+
RCSID("$Id: las.c,v 1.
162
2000/02/09
23
:
49
:
16
hubbe Exp $");
#include "language.h" #include "interpret.h"
1097:
*/ if(IDENTIFIER_IS_CONSTANT(i->identifier_flags)) {
+
if(i->func.offset != -1)
+
{
push_svalue(&PROG_FROM_INT(p, numid)->constants[i->func.offset].sval); }else{
-
+
if(compiler_pass!=1)
+
yyerror("Constant is not defined yet.");
+
push_int(0);
+
}
+
}else{
my_yyerror("Identifier '%s' is not a constant", i->name->str); push_int(0); }