From 2d197347e7dd56b6a8c8fe337cafc9c92bd85ab5 Mon Sep 17 00:00:00 2001 From: martinw Date: Fri, 23 Feb 2001 13:03:04 +0000 Subject: absolutely unimportant git-svn-id: https://svn.cs.ru.nl/repos/clean-compiler/trunk@301 1f8540f1-abd5-4d5b-9d24-4c5ce8603e2d --- frontend/parse.icl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/frontend/parse.icl b/frontend/parse.icl index 5178930..b888fbb 100644 --- a/frontend/parse.icl +++ b/frontend/parse.icl @@ -268,7 +268,7 @@ wantModule iclmodule file_id=:{id_name} import_file_position hash_table error se ->(ok,mod,hash_table,file,pre_def_symbols,files) (No, files) -> let mod = { mod_name = file_id, mod_type = MK_None, mod_imports = [], mod_imported_objects = [], mod_defs = [] } in - (False, mod, hash_table, error <<< import_file_position <<< ": could not open " <<< file_name <<< "\n", pre_def_symbols, files) + (False, mod, hash_table, error <<< "Error " <<< import_file_position <<< ": could not open " <<< file_name <<< "\n", pre_def_symbols, files) where initModule :: String ScanState !*HashTable !*File !*PredefinedSymbols *Files -> (!Bool, !ParsedModule, !*HashTable, !*File, !*PredefinedSymbols, !*Files) -- cgit v1.2.3