hd_type
sc->hd_type = ha->ha_type;
sc->hd_type = ha->ha_type;
sc->hd_type = ha->ha_type;
parse(hd_type);
int hd_type; /* used to store type of stmt for if (...),
hd_type = 0;
parse(hd_type); /* let parser worry about if, or whatever */
if ((!sp_sw || hd_type != forstmt) && ps.p_l_follow > 0) {
parse(hd_type); /* dont lose the if, or whatever */
parse(hd_type);
hd_type = swstmt; /* keep this for when we have seen the
hd_type = (*token == 'i' ? ifstmt :