= ((dl) - (fp)))
#define SCM_FRAME_SLOT(fp,i)            ((fp) - (i) - 1)
#define SCM_FRAME_LOCAL(fp,i)           (SCM_FRAME_SLOT (fp, i)->as_scm)
#define SCM_FRAME_NUM_LOCALS(fp, sp)    ((fp) - (sp))