1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
|
$NetBSD: patch-bk,v 1.3 2006/07/01 09:12:52 rillig Exp $
SunPro cannot handle direct initialization of structures.
--- src/rinf_analyze.c.orig 2003-09-06 02:50:16.000000000 +0200
+++ src/rinf_analyze.c 2006-07-01 10:49:07.000000000 +0200
@@ -29,7 +29,7 @@ Boston, MA 02111-1307, USA. */
static effecttype global_effect = NULL;
static effecttype global_env = NULL;
static hash_table globals = NULL;
-static function_decl current_function_decl = NULL;
+/*global*/ function_decl current_function_decl = NULL;
static aloctype current_function_ret = NULL;
typedef struct einfo {
@@ -107,19 +107,27 @@ static bool is_memcpy_fun(const char *na
static inline einfo mkeinfo(alocreftype tau, effecttype eff)
{
- struct einfo result = {tau: tau, eff: eff};
+ struct einfo result;
+
+ result.tau = tau;
+ result.eff = eff;
return result;
}
static inline sinfo mksinfo(effecttype eff)
{
- struct sinfo result = {eff: eff};
+ struct sinfo result;
+
+ result.eff = eff;
return result;
}
static inline dinfo mkdinfo(effecttype eff, effecttype alocs)
{
- struct dinfo result = {eff: eff, alocs: alocs};
+ struct dinfo result;
+
+ result.eff = eff;
+ result.alocs = alocs;
return result;
}
@@ -865,6 +873,9 @@ static einfo analyze_expression(expressi
expression e2;
effecttype eff;
+ /* shut up gcc4 warning about use of uninitialized value */
+ result.tau = NULL;
+
eff = effecttype_empty;
scan_expression (e2, c->arg1)
{
|
