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
a131f7ab
Commit
a131f7ab
authored
Feb 23, 2001
by
Martin Wierich
Browse files
absolutely unimportant
parent
229880eb
Changes
1
Hide whitespace changes
Inline
Side-by-side
frontend/parse.icl
View file @
a131f7ab
...
...
@@ -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
)
...
...
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