printf("current: %d\n", PL_op->op_type);
    printf("next: %d\n", PL_op->op_next->op_type);
        
    if(GIMME_V) {
        printf("array context\n");
    } else {
        printf("scalar context\n");
    }