Branch: Tag:

1996-02-25

1996-02-25 22:53:54 by Fredrik Hübinette (Hubbe) <hubbe@hubbe.net>

typeof() implemented

Rev: src/ChangeLog:1.19
Rev: src/Makefile.in:1.10
Rev: src/builtin_efuns.c:1.13
Rev: src/language.y:1.11
Rev: src/lex.c:1.8
Rev: src/lpc_types.c:1.3
Rev: src/lpc_types.h:1.2
Rev: src/object.c:1.7
Rev: src/operators.c:1.4
Rev: src/svalue.c:1.7
Rev: src/svalue.h:1.5

55:   #define T_FLOAT 7   #define T_INT 8    + #define T_NOT 247 + #define T_AND 248   #define T_UNKNOWN 249   #define T_MANY 250   #define T_OR 251
87:   #define NUMBER_UNDEFINED 1   #define NUMBER_DESTRUCTED 2    + #define is_gt(a,b) is_lt(b,a)   #define IS_ZERO(X) ((X)->type==T_INT && (X)->u.integer==0)      #define check_destructed(S) \
163:    TYPE_T type,    struct processing *p);   int is_equal(struct svalue *a,struct svalue *b); - int is_gt(const struct svalue *a,const struct svalue *b); +    int is_lt(const struct svalue *a,const struct svalue *b);   void describe_svalue(struct svalue *s,int indent,struct processing *p);   void clear_svalues(struct svalue *s, INT32 num);
173:    struct processing *p);   void check_short_svalue(union anything *u,TYPE_T type);   void check_svalue(struct svalue *s); + void gc_check_svalues(struct svalue *s, int num); + void gc_check_short_svalue(union anything *u, TYPE_T type);   /* Prototypes end here */      #endif