Branch: Tag:

2001-04-02

2001-04-02 22:09:35 by Henrik Grubbström (Grubba) <grubba@grubba.org>

Backported enum & typedef from Pike 7.3. Fixed [bug 1461 (#1461)].
Added some forward compatibility macros.

Rev: src/interpret.h:1.77
Rev: src/language.yacc:1.224
Rev: src/lexer.h:1.30
Rev: src/pike_types.h:1.48

5:   \*/      /* -  * $Id: interpret.h,v 1.76 2001/01/24 08:17:27 hubbe Exp $ +  * $Id: interpret.h,v 1.77 2001/04/02 22:09:35 grubba Exp $    */   #ifndef INTERPRET_H   #define INTERPRET_H
161:   #define ref_push_array(A) do{ struct array *_=(A); debug_malloc_touch(_); _->refs++; Pike_sp->u.array=_ ;Pike_sp++->type=PIKE_T_ARRAY; }while(0)   #define ref_push_multiset(L) do{ struct multiset *_=(L); debug_malloc_touch(_); _->refs++; Pike_sp->u.multiset=_; Pike_sp++->type=PIKE_T_MULTISET; }while(0)   #define ref_push_string(S) do{ struct pike_string *_=(S); debug_malloc_touch(_); _->refs++; Pike_sp->subtype=0; Pike_sp->u.string=_; Pike_sp++->type=PIKE_T_STRING; }while(0) + #define ref_push_type_value(T) do{ ref_push_string(T); Pike_sp[-1].type = PIKE_T_TYPE; }while(0)   #define ref_push_object(O) do{ struct object *_=(O); debug_malloc_touch(_); _->refs++; Pike_sp->u.object=_; Pike_sp++->type=PIKE_T_OBJECT; }while(0)      #define push_svalue(S) do { struct svalue *_=(S); assign_svalue_no_free(Pike_sp,_); Pike_sp++; }while(0)