Daily bump.
[official-gcc.git] / gcc / data-streamer.c
blobe3a1b41ad70745348417400a00c55c3bcbc1887b
1 /* Generic streaming support for basic data types.
3 Copyright (C) 2011-2015 Free Software Foundation, Inc.
4 Contributed by Diego Novillo <dnovillo@google.com>
6 This file is part of GCC.
8 GCC is free software; you can redistribute it and/or modify it under
9 the terms of the GNU General Public License as published by the Free
10 Software Foundation; either version 3, or (at your option) any later
11 version.
13 GCC is distributed in the hope that it will be useful, but WITHOUT ANY
14 WARRANTY; without even the implied warranty of MERCHANTABILITY or
15 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
16 for more details.
18 You should have received a copy of the GNU General Public License
19 along with GCC; see the file COPYING3. If not see
20 <http://www.gnu.org/licenses/>. */
22 #include "config.h"
23 #include "system.h"
24 #include "coretypes.h"
25 #include "hash-set.h"
26 #include "machmode.h"
27 #include "vec.h"
28 #include "double-int.h"
29 #include "input.h"
30 #include "alias.h"
31 #include "symtab.h"
32 #include "options.h"
33 #include "wide-int.h"
34 #include "inchash.h"
35 #include "tree.h"
36 #include "fold-const.h"
37 #include "predict.h"
38 #include "tm.h"
39 #include "hard-reg-set.h"
40 #include "input.h"
41 #include "function.h"
42 #include "basic-block.h"
43 #include "tree-ssa-alias.h"
44 #include "internal-fn.h"
45 #include "gimple-expr.h"
46 #include "is-a.h"
47 #include "gimple.h"
48 #include "hash-map.h"
49 #include "plugin-api.h"
50 #include "ipa-ref.h"
51 #include "cgraph.h"
52 #include "data-streamer.h"
54 /* Pack WORK into BP in a variant of uleb format. */
56 void
57 bp_pack_var_len_unsigned (struct bitpack_d *bp, unsigned HOST_WIDE_INT work)
61 unsigned int half_byte = (work & 0x7);
62 work >>= 3;
63 if (work != 0)
64 /* More half_bytes to follow. */
65 half_byte |= 0x8;
67 bp_pack_value (bp, half_byte, 4);
69 while (work != 0);
73 /* Pack WORK into BP in a variant of sleb format. */
75 void
76 bp_pack_var_len_int (struct bitpack_d *bp, HOST_WIDE_INT work)
78 int more, half_byte;
82 half_byte = (work & 0x7);
83 /* arithmetic shift */
84 work >>= 3;
85 more = !((work == 0 && (half_byte & 0x4) == 0)
86 || (work == -1 && (half_byte & 0x4) != 0));
87 if (more)
88 half_byte |= 0x8;
90 bp_pack_value (bp, half_byte, 4);
92 while (more);
96 /* Unpack VAL from BP in a variant of uleb format. */
98 unsigned HOST_WIDE_INT
99 bp_unpack_var_len_unsigned (struct bitpack_d *bp)
101 unsigned HOST_WIDE_INT result = 0;
102 int shift = 0;
103 unsigned HOST_WIDE_INT half_byte;
105 while (true)
107 half_byte = bp_unpack_value (bp, 4);
108 result |= (half_byte & 0x7) << shift;
109 shift += 3;
110 if ((half_byte & 0x8) == 0)
111 return result;
116 /* Unpack VAL from BP in a variant of sleb format. */
118 HOST_WIDE_INT
119 bp_unpack_var_len_int (struct bitpack_d *bp)
121 HOST_WIDE_INT result = 0;
122 int shift = 0;
123 unsigned HOST_WIDE_INT half_byte;
125 while (true)
127 half_byte = bp_unpack_value (bp, 4);
128 result |= (half_byte & 0x7) << shift;
129 shift += 3;
130 if ((half_byte & 0x8) == 0)
132 if ((shift < HOST_BITS_PER_WIDE_INT) && (half_byte & 0x4))
133 result |= - (HOST_WIDE_INT_1U << shift);
135 return result;