1 # This file is part of NIT ( http://www.nitlanguage.org ).
3 # Copyright 2008 Jean Privat <jean@pryen.org>
5 # Licensed under the Apache License, Version 2.0 (the "License");
6 # you may not use this file except in compliance with the License.
7 # You may obtain a copy of the License at
9 # http://www.apache.org/licenses/LICENSE-2.0
11 # Unless required by applicable law or agreed to in writing, software
12 # distributed under the License is distributed on an "AS IS" BASIS,
13 # WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
14 # See the License for the specific language governing permissions and
15 # limitations under the License.
17 # Nit compiler main module
23 private import compiling
26 # The main class of the nitcompiler program
28 special AbstractCompiler
29 readable var _opt_output
: OptionString = new OptionString("Output file", "-o", "--output")
30 readable var _opt_boost
: OptionBool = new OptionBool("Optimize compilation", "-O", "--boost")
31 readable var _opt_no_cc
: OptionBool = new OptionBool("Do not invoke C compiler", "--no_cc")
32 readable var _opt_global
: OptionBool = new OptionBool("Use global compilation", "--global")
33 readable var _opt_global_no_STF_opt
: OptionBool = new OptionBool("Do not use SFT optimization", "--no-global-SFT-optimization")
34 readable var _opt_global_no_DMR_opt
: OptionBool = new OptionBool("Do not use dead method removal optimization", "--no-global-DMR-optimization")
35 readable var _opt_global_no_inline_get_set
: OptionBool = new OptionBool("Do not automatically inline getters/setters", "--no-global-get-set-inlining")
36 readable var _opt_global_no_RFIMA
: OptionBool = new OptionBool("Do not use a specialized algorithm to find reachable methods from initializers", "--no-global-RFIM-analysis")
37 readable var _opt_global_callgraph
: OptionEnum = new OptionEnum(["none", "cha", "rta"], "The algorithm to use to build the callgraph", 2, "--global-callgraph")
38 readable var _opt_clibdir
: OptionString = new OptionString("NIT C library directory", "--clibdir")
39 readable var _opt_bindir
: OptionString = new OptionString("NIT tools directory", "--bindir")
40 readable var _opt_compdir
: OptionString = new OptionString("Intermediate compilation directory", "--compdir")
41 readable var _opt_extension_prefix
: OptionString = new OptionString("Append prefix to file extension", "-p", "--extension-prefix")
42 readable var _opt_dump
: OptionBool = new OptionBool("Dump intermediate code", "--dump")
47 option_context
.add_option
(opt_output
, opt_boost
, opt_no_cc
, opt_global
, opt_clibdir
, opt_bindir
, opt_compdir
, opt_extension_prefix
, opt_dump
, opt_global_no_STF_opt
, opt_global_no_DMR_opt
, opt_global_callgraph
, opt_global_no_inline_get_set
, opt_global_no_RFIMA
)
50 redef fun process_options
53 output_file
= opt_output
.value
54 boost
= opt_boost
.value
55 no_cc
= opt_no_cc
.value
56 var ext
= opt_extension_prefix
.value
57 if ext
!= null then ext_prefix
= ext
else ext_prefix
= ""
58 global
= opt_global
.value
59 use_SFT_optimization
= not opt_global_no_STF_opt
.value
60 no_dead_method_removal
= opt_global_no_DMR_opt
.value
61 no_inline_get_set
= opt_global_no_inline_get_set
.value
62 no_callgraph_from_init
= opt_global_no_RFIMA
.value
63 global_callgraph
= opt_global_callgraph
.value_name
64 compdir
= opt_compdir
.value
65 if compdir
== null then
66 var dir
= once
("NIT_COMPDIR".to_symbol
).environ
67 if not dir
.is_empty
then
70 if compdir
== null then
71 compdir
= ".nit_compile"
76 clibdir
= opt_clibdir
.value
77 if clibdir
== null then
78 var dir
= once
("NIT_DIR".to_symbol
).environ
80 dir
= "{sys.program_name.dirname}/../clib"
81 if dir
.file_exists
then clibdir
= dir
84 if dir
.file_exists
then clibdir
= dir
86 if clibdir
== null then
87 fatal_error
(null, "Error: Cannot locate NIT C library directory. Uses --clibdir or envvar NIT_DIR.")
90 bindir
= opt_bindir
.value
92 if bindir
== null then
93 var dir
= once
("NIT_DIR".to_symbol
).environ
95 dir
= "{sys.program_name.dirname}/../bin"
96 if dir
.file_exists
then bindir
= dir
99 if dir
.file_exists
then bindir
= dir
101 if bindir
== null then
102 fatal_error
(null, "Error: Cannot locate NIT tools directory. Uses --bindir or envvar NIT_DIR.")
107 fun dump_intermediate_code
(mods
: Collection[MMModule])
110 for c
in mod
.local_classes
do
111 if not c
isa MMConcreteClass then continue
112 for p
in c
.local_local_properties
do
113 var routine
: nullable IRoutine = null
114 if p
isa MMAttribute then
116 else if p
isa MMMethod then
119 if routine
== null then continue
120 print
"**** Property {p.full_name} ****"
121 var icd
= new ICodeDumper
123 print
"**** OPTIMIZE {p.full_name} ****"
124 routine
.optimize
(mod
)
125 icd
= new ICodeDumper
132 redef fun perform_work
(mods
)
134 if opt_dump
.value
then
135 dump_intermediate_code
(mods
)
138 var p
= new Program(mod
, self)
139 p
.compute_main_method
140 p
.generate_allocation_iroutines
142 p
.do_global_pre_analysis_optimizations
144 p
.do_global_post_analysis_optimizations
145 if opt_log
.value
then
146 p
.dump_global_analysis_information
(log_directory
)
149 p
.do_table_computation
155 var c
= new NitCompiler