annotate gcc/go/gofrontend/go.cc @ 131:84e7813d76e9

gcc-8.2
author mir3636
date Thu, 25 Oct 2018 07:37:49 +0900
parents 04ced10e8804
children 1830386684a0
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
111
kono
parents:
diff changeset
1 // go.cc -- Go frontend main file for gcc.
kono
parents:
diff changeset
2
kono
parents:
diff changeset
3 // Copyright 2009 The Go Authors. All rights reserved.
kono
parents:
diff changeset
4 // Use of this source code is governed by a BSD-style
kono
parents:
diff changeset
5 // license that can be found in the LICENSE file.
kono
parents:
diff changeset
6
kono
parents:
diff changeset
7 #include "go-system.h"
kono
parents:
diff changeset
8
kono
parents:
diff changeset
9 #include "go-c.h"
kono
parents:
diff changeset
10 #include "go-diagnostics.h"
kono
parents:
diff changeset
11
kono
parents:
diff changeset
12 #include "lex.h"
kono
parents:
diff changeset
13 #include "parse.h"
kono
parents:
diff changeset
14 #include "backend.h"
kono
parents:
diff changeset
15 #include "gogo.h"
kono
parents:
diff changeset
16
kono
parents:
diff changeset
17 // The data structures we build to represent the file.
kono
parents:
diff changeset
18 static Gogo* gogo;
kono
parents:
diff changeset
19
kono
parents:
diff changeset
20 // Create the main IR data structure.
kono
parents:
diff changeset
21
kono
parents:
diff changeset
22 GO_EXTERN_C
kono
parents:
diff changeset
23 void
kono
parents:
diff changeset
24 go_create_gogo(const struct go_create_gogo_args* args)
kono
parents:
diff changeset
25 {
kono
parents:
diff changeset
26 go_assert(::gogo == NULL);
kono
parents:
diff changeset
27 ::gogo = new Gogo(args->backend, args->linemap, args->int_type_size,
kono
parents:
diff changeset
28 args->pointer_size);
kono
parents:
diff changeset
29
kono
parents:
diff changeset
30 if (args->pkgpath != NULL)
kono
parents:
diff changeset
31 ::gogo->set_pkgpath(args->pkgpath);
kono
parents:
diff changeset
32 else if (args->prefix != NULL)
kono
parents:
diff changeset
33 ::gogo->set_prefix(args->prefix);
kono
parents:
diff changeset
34
kono
parents:
diff changeset
35 if (args->relative_import_path != NULL)
kono
parents:
diff changeset
36 ::gogo->set_relative_import_path(args->relative_import_path);
kono
parents:
diff changeset
37 ::gogo->set_check_divide_by_zero(args->check_divide_by_zero);
kono
parents:
diff changeset
38 ::gogo->set_check_divide_overflow(args->check_divide_overflow);
kono
parents:
diff changeset
39 if (args->compiling_runtime)
kono
parents:
diff changeset
40 ::gogo->set_compiling_runtime(args->compiling_runtime);
kono
parents:
diff changeset
41 if (args->c_header != NULL)
kono
parents:
diff changeset
42 ::gogo->set_c_header(args->c_header);
kono
parents:
diff changeset
43 ::gogo->set_debug_escape_level(args->debug_escape_level);
131
84e7813d76e9 gcc-8.2
mir3636
parents: 111
diff changeset
44 if (args->debug_escape_hash != NULL)
84e7813d76e9 gcc-8.2
mir3636
parents: 111
diff changeset
45 ::gogo->set_debug_escape_hash(args->debug_escape_hash);
84e7813d76e9 gcc-8.2
mir3636
parents: 111
diff changeset
46 ::gogo->set_nil_check_size_threshold(args->nil_check_size_threshold);
111
kono
parents:
diff changeset
47 }
kono
parents:
diff changeset
48
kono
parents:
diff changeset
49 // Parse the input files.
kono
parents:
diff changeset
50
kono
parents:
diff changeset
51 GO_EXTERN_C
kono
parents:
diff changeset
52 void
kono
parents:
diff changeset
53 go_parse_input_files(const char** filenames, unsigned int filename_count,
kono
parents:
diff changeset
54 bool only_check_syntax, bool)
kono
parents:
diff changeset
55 {
kono
parents:
diff changeset
56 go_assert(filename_count > 0);
kono
parents:
diff changeset
57
kono
parents:
diff changeset
58 Lex::Linknames all_linknames;
kono
parents:
diff changeset
59 for (unsigned int i = 0; i < filename_count; ++i)
kono
parents:
diff changeset
60 {
kono
parents:
diff changeset
61 if (i > 0)
kono
parents:
diff changeset
62 ::gogo->clear_file_scope();
kono
parents:
diff changeset
63
kono
parents:
diff changeset
64 const char* filename = filenames[i];
kono
parents:
diff changeset
65 FILE* file;
kono
parents:
diff changeset
66 if (strcmp(filename, "-") == 0)
kono
parents:
diff changeset
67 file = stdin;
kono
parents:
diff changeset
68 else
kono
parents:
diff changeset
69 {
kono
parents:
diff changeset
70 file = fopen(filename, "r");
kono
parents:
diff changeset
71 if (file == NULL)
kono
parents:
diff changeset
72 go_fatal_error(Linemap::unknown_location(),
kono
parents:
diff changeset
73 "cannot open %s: %m", filename);
kono
parents:
diff changeset
74 }
kono
parents:
diff changeset
75
kono
parents:
diff changeset
76 Lex lexer(filename, file, ::gogo->linemap());
kono
parents:
diff changeset
77
kono
parents:
diff changeset
78 Parse parse(&lexer, ::gogo);
kono
parents:
diff changeset
79 parse.program();
kono
parents:
diff changeset
80
kono
parents:
diff changeset
81 if (strcmp(filename, "-") != 0)
kono
parents:
diff changeset
82 fclose(file);
kono
parents:
diff changeset
83
kono
parents:
diff changeset
84 Lex::Linknames* linknames = lexer.get_and_clear_linknames();
kono
parents:
diff changeset
85 if (linknames != NULL)
kono
parents:
diff changeset
86 {
kono
parents:
diff changeset
87 if (!::gogo->current_file_imported_unsafe())
kono
parents:
diff changeset
88 {
kono
parents:
diff changeset
89 for (Lex::Linknames::const_iterator p = linknames->begin();
kono
parents:
diff changeset
90 p != linknames->end();
kono
parents:
diff changeset
91 ++p)
kono
parents:
diff changeset
92 go_error_at(p->second.loc,
kono
parents:
diff changeset
93 ("//go:linkname only allowed in Go files that "
kono
parents:
diff changeset
94 "import \"unsafe\""));
kono
parents:
diff changeset
95 }
kono
parents:
diff changeset
96 all_linknames.insert(linknames->begin(), linknames->end());
kono
parents:
diff changeset
97 }
kono
parents:
diff changeset
98 }
kono
parents:
diff changeset
99
kono
parents:
diff changeset
100 ::gogo->linemap()->stop();
kono
parents:
diff changeset
101
kono
parents:
diff changeset
102 ::gogo->clear_file_scope();
kono
parents:
diff changeset
103
kono
parents:
diff changeset
104 // If the global predeclared names are referenced but not defined,
kono
parents:
diff changeset
105 // define them now.
kono
parents:
diff changeset
106 ::gogo->define_global_names();
kono
parents:
diff changeset
107
kono
parents:
diff changeset
108 // Apply any go:linkname directives.
kono
parents:
diff changeset
109 for (Lex::Linknames::const_iterator p = all_linknames.begin();
kono
parents:
diff changeset
110 p != all_linknames.end();
kono
parents:
diff changeset
111 ++p)
kono
parents:
diff changeset
112 ::gogo->add_linkname(p->first, p->second.is_exported, p->second.ext_name,
kono
parents:
diff changeset
113 p->second.loc);
kono
parents:
diff changeset
114
kono
parents:
diff changeset
115 // Finalize method lists and build stub methods for named types.
kono
parents:
diff changeset
116 ::gogo->finalize_methods();
kono
parents:
diff changeset
117
kono
parents:
diff changeset
118 // Check that functions have a terminating statement.
kono
parents:
diff changeset
119 ::gogo->check_return_statements();
kono
parents:
diff changeset
120
kono
parents:
diff changeset
121 // Now that we have seen all the names, lower the parse tree into a
kono
parents:
diff changeset
122 // form which is easier to use.
kono
parents:
diff changeset
123 ::gogo->lower_parse_tree();
kono
parents:
diff changeset
124
kono
parents:
diff changeset
125 // Create function descriptors as needed.
kono
parents:
diff changeset
126 ::gogo->create_function_descriptors();
kono
parents:
diff changeset
127
kono
parents:
diff changeset
128 // Now that we have seen all the names, verify that types are
kono
parents:
diff changeset
129 // correct.
kono
parents:
diff changeset
130 ::gogo->verify_types();
kono
parents:
diff changeset
131
kono
parents:
diff changeset
132 // Work out types of unspecified constants and variables.
kono
parents:
diff changeset
133 ::gogo->determine_types();
kono
parents:
diff changeset
134
kono
parents:
diff changeset
135 // Check types and issue errors as appropriate.
kono
parents:
diff changeset
136 ::gogo->check_types();
kono
parents:
diff changeset
137
kono
parents:
diff changeset
138 if (only_check_syntax)
kono
parents:
diff changeset
139 return;
kono
parents:
diff changeset
140
kono
parents:
diff changeset
141 ::gogo->analyze_escape();
kono
parents:
diff changeset
142
kono
parents:
diff changeset
143 // Export global identifiers as appropriate.
kono
parents:
diff changeset
144 ::gogo->do_exports();
kono
parents:
diff changeset
145
131
84e7813d76e9 gcc-8.2
mir3636
parents: 111
diff changeset
146 // Use temporary variables to force order of evaluation.
84e7813d76e9 gcc-8.2
mir3636
parents: 111
diff changeset
147 ::gogo->order_evaluations();
84e7813d76e9 gcc-8.2
mir3636
parents: 111
diff changeset
148
111
kono
parents:
diff changeset
149 // Turn short-cut operators (&&, ||) into explicit if statements.
kono
parents:
diff changeset
150 ::gogo->remove_shortcuts();
kono
parents:
diff changeset
151
kono
parents:
diff changeset
152 // Convert named types to backend representation.
kono
parents:
diff changeset
153 ::gogo->convert_named_types();
kono
parents:
diff changeset
154
kono
parents:
diff changeset
155 // Build thunks for functions which call recover.
kono
parents:
diff changeset
156 ::gogo->build_recover_thunks();
kono
parents:
diff changeset
157
kono
parents:
diff changeset
158 // Convert complicated go and defer statements into simpler ones.
kono
parents:
diff changeset
159 ::gogo->simplify_thunk_statements();
kono
parents:
diff changeset
160
kono
parents:
diff changeset
161 // Write out queued up functions for hash and comparison of types.
kono
parents:
diff changeset
162 ::gogo->write_specific_type_functions();
kono
parents:
diff changeset
163
kono
parents:
diff changeset
164 // Add write barriers.
kono
parents:
diff changeset
165 ::gogo->add_write_barriers();
kono
parents:
diff changeset
166
kono
parents:
diff changeset
167 // Flatten the parse tree.
kono
parents:
diff changeset
168 ::gogo->flatten();
kono
parents:
diff changeset
169
131
84e7813d76e9 gcc-8.2
mir3636
parents: 111
diff changeset
170 // Reclaim memory of escape analysis Nodes.
84e7813d76e9 gcc-8.2
mir3636
parents: 111
diff changeset
171 ::gogo->reclaim_escape_nodes();
84e7813d76e9 gcc-8.2
mir3636
parents: 111
diff changeset
172
111
kono
parents:
diff changeset
173 // Dump ast, use filename[0] as the base name
kono
parents:
diff changeset
174 ::gogo->dump_ast(filenames[0]);
kono
parents:
diff changeset
175 }
kono
parents:
diff changeset
176
kono
parents:
diff changeset
177 // Write out globals.
kono
parents:
diff changeset
178
kono
parents:
diff changeset
179 GO_EXTERN_C
kono
parents:
diff changeset
180 void
kono
parents:
diff changeset
181 go_write_globals()
kono
parents:
diff changeset
182 {
kono
parents:
diff changeset
183 return ::gogo->write_globals();
kono
parents:
diff changeset
184 }
kono
parents:
diff changeset
185
kono
parents:
diff changeset
186 // Return the global IR structure. This is used by some of the
kono
parents:
diff changeset
187 // langhooks to pass to other code.
kono
parents:
diff changeset
188
kono
parents:
diff changeset
189 Gogo*
kono
parents:
diff changeset
190 go_get_gogo()
kono
parents:
diff changeset
191 {
kono
parents:
diff changeset
192 return ::gogo;
kono
parents:
diff changeset
193 }