# produce a header file for a parsed struct file function header_elstring(elnum, LOCAL, elem) { array_len = elements[elnum, "array_len"]; elem=elements[elnum, "elem"]; if (elements[elnum, "ptr"]=="1") elem="*"elem; if (array_len!="") { if (is_constant(array_len) == 1) { elem=elem"["array_len"]"; } else { elem="*"elem; } } return elem; } function header_element(f, elnum, LOCAL, type) { type=elements[elnum, "type"]; if (substr(type,1,1) == ".") return; xprintf(f,"\t%s %s;\n", type, header_elstring(elnum)); } function header_union(f, elnum, LOCAL, i) { xprintf(f,"\tunion {\n"); for (i=0;i