DTJ_PROGRAM_STRING
case DTJ_PROGRAM_STRING:
assert(p->dtjp_type == DTJ_PROGRAM_STRING ||
p = dtj_program_create(env, DTJ_PROGRAM_STRING, prog);