4102   char *stddt;              /* Standardized name for a datatype */  in print_stack_union()  local
4126   stddt = (char*)malloc( maxdtlength*2 + 1 );  in print_stack_union()
4127   if( stddt==0 ){  in print_stack_union()
4153     while( *cp ) stddt[j++] = *cp++;  in print_stack_union()
4154     while( j>0 && ISSPACE(stddt[j-1]) ) j--;  in print_stack_union()
4155     stddt[j] = 0;  in print_stack_union()
4156     if( lemp->tokentype && strcmp(stddt, lemp->tokentype)==0 ){  in print_stack_union()
4161     for(j=0; stddt[j]; j++){  in print_stack_union()
4162       hash = hash*53 + stddt[j];  in print_stack_union()
4166       if( strcmp(types[hash],stddt)==0 ){  in print_stack_union()
4175       types[hash] = (char*)malloc( lemonStrlen(stddt)+1 );  in print_stack_union()
4180       lemon_strcpy(types[hash],stddt);  in print_stack_union()
4202   free(stddt);  in print_stack_union()