pike.git/
src/
interpret_functions.h
Branch:
Tag:
Non-build tags
All tags
No tags
2001-09-23
2001-09-23 19:03:56 by Henrik Grubbström (Grubba) <grubba@grubba.org>
530bd74a0eb6193a8689af77041fade89b25c8b3 (
14
lines) (+
8
/-
6
)
[
Show
|
Annotate
]
Branch:
7.9
Fixed a few warnings.
Rev: src/interpret_functions.h:1.92
Rev: src/modules/Mysql/mysql.c:1.47
1:
/*
-
* $Id: interpret_functions.h,v 1.
91
2001/09/
05
01
:
40
:
10
hubbe
Exp $
+
* $Id: interpret_functions.h,v 1.
92
2001/09/
23
19
:
03
:
56
grubba
Exp $
* * Opcode definitions for the interpreter. */
1802:
MKAPPLY2(OPCODE1,CALL_LFUN,"call lfun",APPLY_LOW, Pike_fp->current_object,
-
(void *)(arg1+Pike_fp->context.identifier_level));
+
(void *)(
ptrdiff_t)(
arg1+Pike_fp->context.identifier_level));
MKAPPLY2(OPCODE1,APPLY,"apply",APPLY_SVALUE_STRICT, &((Pike_fp->context.prog->constants + arg1)->sval),0);
1825:
p); if(fun >= 0) {
-
if(low_mega_apply(APPLY_LOW, args-1, o, (void *)fun))
+
if(low_mega_apply(APPLY_LOW, args-1, o, (void *)
(ptrdiff_t)
fun))
{ Pike_fp->save_sp--; Pike_fp->next->pc=PROG_COUNTER;
1878:
p); if(fun >= 0) {
-
if(low_mega_apply(APPLY_LOW, args-1, o, (void *)fun))
+
if(low_mega_apply(APPLY_LOW, args-1, o, (void *)
(ptrdiff_t)
fun))
{ Pike_fp->save_sp--; Pike_fp->next->pc=PROG_COUNTER;
1933:
p); if(fun >= 0) {
-
if(low_mega_apply(APPLY_LOW, args-1, o, (void *)fun))
+
if(low_mega_apply(APPLY_LOW, args-1, o, (void *)
(ptrdiff_t)
fun))
{ PIKE_OPCODE_T *addr = Pike_fp->pc; Pike_fp->save_sp--;
2111:
if(low_mega_apply(APPLY_LOW, args, Pike_fp->current_object,
-
(void *)(
arg1+Pike
_fp->context.identifier_level)))
+
(void *)(
ptrdiff
_
t)(arg1+
+
Pike_
fp->context.identifier_level)))
{ Pike_fp->next->pc=addr; Pike_fp->flags |= PIKE_FRAME_RETURN_INTERNAL;