Skip to content
Projects
Groups
Snippets
Help
This project
Loading...
Sign in / Register
Toggle navigation
R
riscv-gcc-1
Overview
Overview
Details
Activity
Cycle Analytics
Repository
Repository
Files
Commits
Branches
Tags
Contributors
Graph
Compare
Charts
Issues
0
Issues
0
List
Board
Labels
Milestones
Merge Requests
0
Merge Requests
0
CI / CD
CI / CD
Pipelines
Jobs
Schedules
Charts
Wiki
Wiki
Snippets
Snippets
Members
Members
Collapse sidebar
Close sidebar
Activity
Graph
Charts
Create a new issue
Jobs
Commits
Issue Boards
Open sidebar
lvzhengyang
riscv-gcc-1
Commits
2871d24f
Commit
2871d24f
authored
Mar 09, 1995
by
Richard Kenner
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
(record_constant_1): Handle NON_LVALUE_EXPR.
Rewrite to use switch instead of if/then/elseif/else. From-SVN: r9141
parent
9040d873
Show whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
35 additions
and
26 deletions
+35
-26
gcc/varasm.c
+35
-26
No files found.
gcc/varasm.c
View file @
2871d24f
...
...
@@ -2403,44 +2403,46 @@ record_constant_1 (exp)
obstack_1grow
(
&
permanent_obstack
,
(
unsigned
int
)
code
);
if
(
code
==
INTEGER_CST
)
switch
(
code
)
{
case
INTEGER_CST
:
obstack_1grow
(
&
permanent_obstack
,
TYPE_PRECISION
(
TREE_TYPE
(
exp
)));
strp
=
(
char
*
)
&
TREE_INT_CST_LOW
(
exp
);
len
=
2
*
sizeof
TREE_INT_CST_LOW
(
exp
);
}
else
if
(
code
==
REAL_CST
)
{
break
;
case
REAL_CST
:
obstack_1grow
(
&
permanent_obstack
,
TYPE_PRECISION
(
TREE_TYPE
(
exp
)));
strp
=
(
char
*
)
&
TREE_REAL_CST
(
exp
);
len
=
sizeof
TREE_REAL_CST
(
exp
);
}
else
if
(
code
==
STRING_CST
)
{
break
;
case
STRING_CST
:
if
(
flag_writable_strings
)
return
;
strp
=
TREE_STRING_POINTER
(
exp
);
len
=
TREE_STRING_LENGTH
(
exp
);
obstack_grow
(
&
permanent_obstack
,
(
char
*
)
&
TREE_STRING_LENGTH
(
exp
),
sizeof
TREE_STRING_LENGTH
(
exp
));
}
else
if
(
code
==
COMPLEX_CST
)
{
break
;
case
COMPLEX_CST
:
record_constant_1
(
TREE_REALPART
(
exp
));
record_constant_1
(
TREE_IMAGPART
(
exp
));
return
;
}
else
if
(
code
==
CONSTRUCTOR
&&
TREE_CODE
(
TREE_TYPE
(
exp
))
==
SET_TYPE
)
case
CONSTRUCTOR
:
if
(
TREE_CODE
(
TREE_TYPE
(
exp
))
==
SET_TYPE
)
{
int
nbytes
=
int_size_in_bytes
(
TREE_TYPE
(
exp
));
obstack_grow
(
&
permanent_obstack
,
&
nbytes
,
sizeof
(
nbytes
));
obstack_blank
(
&
permanent_obstack
,
nbytes
);
get_set_constructor_bytes
(
exp
,
(
unsigned
char
*
)
permanent_obstack
.
next_free
,
nbytes
);
get_set_constructor_bytes
(
exp
,
(
unsigned
char
*
)
permanent_obstack
.
next_free
,
nbytes
);
return
;
}
else
if
(
code
==
CONSTRUCTOR
)
else
{
register
tree
link
;
int
length
=
list_length
(
CONSTRUCTOR_ELTS
(
exp
));
...
...
@@ -2471,15 +2473,17 @@ record_constant_1 (exp)
{
tree
zero
=
0
;
obstack_grow
(
&
permanent_obstack
,
(
char
*
)
&
zero
,
sizeof
zero
);
obstack_grow
(
&
permanent_obstack
,
(
char
*
)
&
zero
,
sizeof
zero
);
}
}
return
;
}
else
if
(
code
==
ADDR_EXPR
)
return
;
case
ADDR_EXPR
:
{
struct
addr_const
value
;
decode_addr_const
(
exp
,
&
value
);
/* Record the offset. */
obstack_grow
(
&
permanent_obstack
,
...
...
@@ -2487,18 +2491,23 @@ record_constant_1 (exp)
/* Record the symbol name. */
obstack_grow
(
&
permanent_obstack
,
XSTR
(
value
.
base
,
0
),
strlen
(
XSTR
(
value
.
base
,
0
))
+
1
);
return
;
}
else
if
(
code
==
PLUS_EXPR
||
code
==
MINUS_EXPR
)
{
return
;
case
PLUS_EXPR
:
case
MINUS_EXPR
:
record_constant_1
(
TREE_OPERAND
(
exp
,
0
));
record_constant_1
(
TREE_OPERAND
(
exp
,
1
));
return
;
}
else
if
(
code
==
NOP_EXPR
||
code
==
CONVERT_EXPR
)
{
case
NOP_EXPR
:
case
CONVERT_EXPR
:
case
NON_LVALUE_EXPR
:
record_constant_1
(
TREE_OPERAND
(
exp
,
0
));
return
;
default
:
abort
();
}
/* Record constant contents. */
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment