Skip to content
GitLab
Projects
Groups
Snippets
/
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in
Toggle navigation
Menu
Open sidebar
clean-compiler-and-rts
compiler
Commits
bc5050a9
Commit
bc5050a9
authored
Sep 03, 2001
by
John van Groningen
Browse files
print same error as Clean 1.3 when a module cannot be opened
parent
70aac4ee
Changes
1
Hide whitespace changes
Inline
Side-by-side
frontend/parse.icl
View file @
bc5050a9
...
...
@@ -299,7 +299,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
<<<
"Error "
<<<
import_file_position
<<<
":
could not open
"
<<<
file_name
<<<
"
\n
"
,
pre_def_symbols
,
files
)
(
False
,
mod
,
hash_table
,
error
<<<
"Error "
<<<
import_file_position
<<<
": "
<<<
file_name
<<<
"
could not be imported
\n
"
,
pre_def_symbols
,
files
)
where
file_name
=
if
iclmodule
(
id_name
+++
".icl"
)
(
id_name
+++
".dcl"
)
initModule
::
String
ScanState
!*
HashTable
!*
File
!*
PredefinedSymbols
*
Files
...
...
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new file
.
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment