DgetC
c = DgetC(DODOL);
c = DgetC(dolflg);
c = DgetC(0); /* No $ subst! */
c = DgetC(DODOL);
c = DgetC(0);
c = sc = DgetC(0);
c = DgetC(0); /* sc is { to take } later */
dimen++, c = DgetC(0); /* $# takes dimension */
bitset++, c = DgetC(0); /* $? tests existence */
c = DgetC(0);
c = DgetC(0);
c = DgetC(0);
c = DgetC(DODOL); /* Allow $ expand within [ ] */
c = DgetC(0);
c = DgetC(0), dolmcnt = 1;
c = DgetC(0), dolmcnt = 10000;
c = DgetC(DODOL);
c = DgetC(0);