checktype
checktype(struct s_spcl *b, int t)
#define checktype(o,t) (ttypenv(o) == (t))
#undef checktype
#define checktype(o,t) (ctb(tt_(o) | VARBITS) == ctb(tag2tt(t) | VARBITS))