decode_tagged_integer
ret = decode_tagged_integer (&slt, 0, (long *) &keytype);
ret = decode_tagged_integer (&kbuf, 0, &lval);
ret = decode_tagged_integer (&subbuf, 0, &lval); checkerr;
ret = decode_tagged_integer (&subbuf, 1, &lval); checkerr;
ret = decode_tagged_integer (&subbuf, 2, &lval); checkerr;
ret = decode_tagged_integer (&subbuf, 3, &lval); checkerr;