equal
deleted
inserted
replaced
7654 ) { |
7654 ) { |
7655 |
7655 |
7656 FILE *in_file = NULL, *lib_file = NULL; |
7656 FILE *in_file = NULL, *lib_file = NULL; |
7657 char *libfilename = NULL; |
7657 char *libfilename = NULL; |
7658 |
7658 |
|
7659 for(int i = 0; standard_function_names[i] != NULL; i++) |
|
7660 if (library_element_symtable.find_value(standard_function_names[i]) == |
|
7661 library_element_symtable.end_value()) |
|
7662 library_element_symtable.insert(standard_function_names[i], standard_function_name_token); |
7659 |
7663 |
7660 if((in_file = fopen(filename, "r")) == NULL) { |
7664 if((in_file = fopen(filename, "r")) == NULL) { |
7661 char *errmsg = strdup2("Error opening main file ", filename); |
7665 char *errmsg = strdup2("Error opening main file ", filename); |
7662 perror(errmsg); |
7666 perror(errmsg); |
7663 free(errmsg); |
7667 free(errmsg); |
7702 fclose(lib_file); |
7706 fclose(lib_file); |
7703 |
7707 |
7704 /* if by any chance the library is not complete, we |
7708 /* if by any chance the library is not complete, we |
7705 * now add the missing reserved keywords to the list!!! |
7709 * now add the missing reserved keywords to the list!!! |
7706 */ |
7710 */ |
7707 for(int i = 0; standard_function_names[i] != NULL; i++) |
|
7708 if (library_element_symtable.find_value(standard_function_names[i]) == |
|
7709 library_element_symtable.end_value()) |
|
7710 library_element_symtable.insert(standard_function_names[i], standard_function_name_token); |
|
7711 |
|
7712 for(int i = 0; standard_function_block_names[i] != NULL; i++) |
7711 for(int i = 0; standard_function_block_names[i] != NULL; i++) |
7713 if (library_element_symtable.find_value(standard_function_block_names[i]) == |
7712 if (library_element_symtable.find_value(standard_function_block_names[i]) == |
7714 library_element_symtable.end_value()) |
7713 library_element_symtable.end_value()) |
7715 library_element_symtable.insert(standard_function_block_names[i], standard_function_block_name_token); |
7714 library_element_symtable.insert(standard_function_block_names[i], standard_function_block_name_token); |
7716 |
7715 |