pike.git/ src/ interpret.h

2014-12-04

2014-12-04 19:24:13 by Henrik Grubbström (Grubba) <grubba@grubba.org>

• c7551ec7d993badb18153d6203ec26bcc743ea4f (18 lines) (+18/-0) ^{[ Show | Annotate ]}
  Branch: bill/master_archive_support

Runtime: Added macro ASSIGN_CURRENT_STORAGE().

Simple and safe access to inherited storage in the current object.

634:    LOW_POP_PIKE_FRAME (_fp_); \    }while(0)    + #define ASSIGN_CURRENT_STORAGE(VAR, TYPE, INH, EXPECTED_PROGRAM) \ +  do { \ +  int inh__ = (INH); \ +  DO_IF_DEBUG( \ +  struct program *prog__ = (EXPECTED_PROGRAM); \ +  if ((inh__ < 0) || \ +  (inh__ >= Pike_fp->context->prog->num_inherits)) \ +  Pike_fatal("Inherit #%d out of range [0..%d]\n", \ +  inh__, Pike_fp->context->prog->num_inherits-1); \ +  if (prog__ && (Pike_fp->context[inh__].prog != prog__)) \ +  Pike_fatal("Inherit #%d has wrong program %p != %p.\n", \ +  Pike_fp->context[inh__].prog, prog__); \ +  ); \ +  VAR = ((TYPE *)(Pike_fp->current_object->storage + \ +  Pike_fp->context[inh__].storage_offset)); \ +  } while(0)    -  +    enum apply_type   {    APPLY_STACK, /* The function is the first argument */