Commit fd0b9244 authored by Martin Wierich's avatar Martin Wierich
Browse files

adding "list inferred types" option

parent 27472f84
......@@ -131,11 +131,11 @@ compileModule options commandLineArgs files
= abort ("couldn't open out file \"" +++ options.outPath +++ "\"\n")
# (io, files)
= stdio files
# (predefSymbols, hashTable) = buildPredefinedSymbols newHashTable
(moduleIdent, hashTable) = putIdentInHashTable options.moduleName IC_Module hashTable
# (predefs, _, files, error, io, out, optionalSyntaxTree)
= frontEndInterface FrontEndPhaseAll moduleIdent options.searchPaths predefSymbols hashTable files error io out
= frontEndInterface FrontEndPhaseAll moduleIdent options.searchPaths (isMember "-lt" commandLineArgs)
predefSymbols hashTable files error io out
# (closed, files)
= fclose io files
| not closed
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment