Commit fd96b9fc by Arnaud Charlet

trans.c (gigi): Adjust previous change to avoid a typecast that discards a const qualifier.

	* gcc-interface/trans.c (gigi): Adjust previous change to avoid a
	typecast that discards a const qualifier.

From-SVN: r191907
parent 15f0f591
...@@ -293,7 +293,9 @@ gigi (Node_Id gnat_root, int max_gnat_node, int number_name ATTRIBUTE_UNUSED, ...@@ -293,7 +293,9 @@ gigi (Node_Id gnat_root, int max_gnat_node, int number_name ATTRIBUTE_UNUSED,
tree int64_type = gnat_type_for_size (64, 0); tree int64_type = gnat_type_for_size (64, 0);
struct elab_info *info; struct elab_info *info;
int i; int i;
#ifdef ORDINARY_MAP_INSTANCE
struct line_map *map; struct line_map *map;
#endif
max_gnat_nodes = max_gnat_node; max_gnat_nodes = max_gnat_node;
...@@ -326,9 +328,9 @@ gigi (Node_Id gnat_root, int max_gnat_node, int number_name ATTRIBUTE_UNUSED, ...@@ -326,9 +328,9 @@ gigi (Node_Id gnat_root, int max_gnat_node, int number_name ATTRIBUTE_UNUSED,
/* We create the line map for a source file at once, with a fixed number /* We create the line map for a source file at once, with a fixed number
of columns chosen to avoid jumping over the next power of 2. */ of columns chosen to avoid jumping over the next power of 2. */
map = (struct line_map *) linemap_add linemap_add (line_table, LC_ENTER, 0, filename, 1);
(line_table, LC_ENTER, 0, filename, 1);
#ifdef ORDINARY_MAP_INSTANCE #ifdef ORDINARY_MAP_INSTANCE
map = LINEMAPS_ORDINARY_MAP_AT (line_table, i);
if (flag_debug_instances) if (flag_debug_instances)
ORDINARY_MAP_INSTANCE(map) = file_info_ptr[i].Instance; ORDINARY_MAP_INSTANCE(map) = file_info_ptr[i].Instance;
#endif #endif
......
Markdown is supported
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