tcount strcnt() { tcount ret = 0; if(*Type) ret = 1; if(*BaseForm) ret += 1; if(next) ret += next->strcnt(); return ret; }