pike.git/ src/ array.h

2000-06-09

2000-06-09 22:46:21 by Martin Stjernholm <mast@lysator.liu.se>

• e2d9e6fd496a3cdbe290f51b888a35c59321e837 (28 lines) (+25/-3) ^{[ Show | Annotate ]}
  Branch: 7.9

GC tries to behave well when destructing objects with destroy functions.
Weak references are handled in a more streamlined way.

Rev: src/array.c:1.73
Rev: src/array.h:1.20
Rev: src/gc.c:1.85
Rev: src/gc.h:1.42
Rev: src/mapping.c:1.84
Rev: src/mapping.h:1.25
Rev: src/multiset.c:1.22
Rev: src/multiset.h:1.11
Rev: src/object.c:1.122
Rev: src/object.h:1.46
Rev: src/program.c:1.240
Rev: src/program.h:1.90
Rev: src/svalue.c:1.74
Rev: src/svalue.h:1.54

5:   \*/      /* -  * $Id: array.h,v 1.19 2000/04/23 03:01:25 mast Exp $ +  * $Id: array.h,v 1.20 2000/06/09 22:43:04 mast Exp $    */   #ifndef ARRAY_H   #define ARRAY_H
37:   #define ARRAY_WEAK_SHRINK 8      extern struct array empty_array; + extern struct array *gc_internal_array;      #if defined(DEBUG_MALLOC) && defined(PIKE_DEBUG)   #define ITEM(X) (((struct array *)(debug_malloc_pass((X))))->item)
44:   #define ITEM(X) ((X)->item)   #endif    + #define LINK_ARRAY(a) do { \ +  (a)->prev = &empty_array; \ +  (a)->next = empty_array.next; \ +  empty_array.next = (a); \ +  (a)->next->prev = (a); \ + } while (0) +  + #define UNLINK_ARRAY(a) do { \ +  struct array *next = (a)->next, *prev = (a)->prev; \ +  prev->next = next; \ +  next->prev = prev; \ + } while (0) +    /* These are arguments for the function 'merge' which merges two sorted    * set stored in arrays in the way you specify    */
148:   void check_array(struct array *a);   void check_all_arrays(void);   void gc_mark_array_as_referenced(struct array *a); - INT32 gc_touch_all_arrays(void); + unsigned gc_touch_all_arrays(void);   void gc_check_all_arrays(void);   void gc_mark_all_arrays(void); -  + void real_gc_cycle_check_array(struct array *a); + void real_gc_cycle_check_array_weak(struct array *a); + void gc_cycle_check_all_arrays(void);   void gc_free_all_unreferenced_arrays(void);   void debug_dump_type_field(TYPE_FIELD t);   void debug_dump_array(struct array *a);
160:   struct array *implode_array(struct array *a, struct array *b);   /* Prototypes end here */    + #define gc_cycle_check_array(X) \ +  enqueue_lifo(&gc_mark_queue, (queue_call) real_gc_cycle_check_array, (X)) + #define gc_cycle_check_array_weak(X) \ +  enqueue_lifo(&gc_mark_queue, (queue_call) real_gc_cycle_check_array_weak, (X))    - #endif + #endif /* ARRAY_H */