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
5b9589fe
Commit
5b9589fe
authored
Jan 23, 1994
by
Richard Kenner
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
(output_{pro,epi}log): Use assemble_name to output
alpha_function_name. From-SVN: r6408
parent
67232b23
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
18 additions
and
6 deletions
+18
-6
gcc/config/alpha/alpha.c
+18
-6
No files found.
gcc/config/alpha/alpha.c
View file @
5b9589fe
/* Subroutines used for code generation on the DEC Alpha.
/* Subroutines used for code generation on the DEC Alpha.
Copyright (C) 1992, 1993 Free Software Foundation, Inc.
Copyright (C) 1992, 1993
, 1994
Free Software Foundation, Inc.
Contributed by Richard Kenner (kenner@nyu.edu)
Contributed by Richard Kenner (kenner@nyu.edu)
This file is part of GNU CC.
This file is part of GNU CC.
...
@@ -1228,7 +1228,9 @@ output_prolog (file, size)
...
@@ -1228,7 +1228,9 @@ output_prolog (file, size)
to the .ent directive, the lex_level, is ignored by the assembler,
to the .ent directive, the lex_level, is ignored by the assembler,
so we might as well omit it. */
so we might as well omit it. */
fprintf
(
file
,
"
\t
.ent %s
\n
"
,
alpha_function_name
);
fprintf
(
file
,
"
\t
.ent "
);
assemble_name
(
file
,
alpha_function_name
);
fprintf
(
file
,
"
\n
"
);
ASM_OUTPUT_LABEL
(
file
,
alpha_function_name
);
ASM_OUTPUT_LABEL
(
file
,
alpha_function_name
);
inside_function
=
TRUE
;
inside_function
=
TRUE
;
...
@@ -1258,7 +1260,8 @@ output_prolog (file, size)
...
@@ -1258,7 +1260,8 @@ output_prolog (file, size)
fprintf
(
file
,
"
\t
ldgp $29,0($27)
\n
"
);
fprintf
(
file
,
"
\t
ldgp $29,0($27)
\n
"
);
/* Put a label after the GP load so we can enter the function at it. */
/* Put a label after the GP load so we can enter the function at it. */
fprintf
(
file
,
"%s..ng:
\n
"
,
alpha_function_name
);
assemble_name
(
file
,
alpha_function_name
);
fprintf
(
file
,
"..ng:
\n
"
);
/* Adjust the stack by the frame size. If the frame size is > 4096
/* Adjust the stack by the frame size. If the frame size is > 4096
bytes, we need to be sure we probe somewhere in the first and last
bytes, we need to be sure we probe somewhere in the first and last
...
@@ -1304,11 +1307,18 @@ output_prolog (file, size)
...
@@ -1304,11 +1307,18 @@ output_prolog (file, size)
add_long_const
(
file
,
blocks
,
31
,
5
);
add_long_const
(
file
,
blocks
,
31
,
5
);
fprintf
(
file
,
"
\t
lda $4,4096($30)
\n
"
);
fprintf
(
file
,
"
\t
lda $4,4096($30)
\n
"
);
fprintf
(
file
,
"%s..sc:
\n
"
,
alpha_function_name
);
assemble_name
(
file
,
alpha_function_name
);
fprintf
(
file
,
"..sc:
\n
"
);
fprintf
(
file
,
"
\t
ldq $6,-8192($4)
\n
"
);
fprintf
(
file
,
"
\t
ldq $6,-8192($4)
\n
"
);
fprintf
(
file
,
"
\t
subq $5,1,$5
\n
"
);
fprintf
(
file
,
"
\t
subq $5,1,$5
\n
"
);
fprintf
(
file
,
"
\t
lda $4,-8192($4)
\n
"
);
fprintf
(
file
,
"
\t
lda $4,-8192($4)
\n
"
);
fprintf
(
file
,
"
\t
bne $5,%s..sc
\n
"
,
alpha_function_name
);
fprintf
(
file
,
"
\t
bne $5"
);
assemble_name
(
file
,
alpha_function_name
);
fprintf
(
file
,
"%s..sc
\n
"
);
fprintf
(
file
,
"
\t
lda $30,-%d($4)
\n
"
,
leftover
);
fprintf
(
file
,
"
\t
lda $30,-%d($4)
\n
"
,
leftover
);
if
(
leftover
>
4096
)
if
(
leftover
>
4096
)
...
@@ -1493,7 +1503,9 @@ output_epilog (file, size)
...
@@ -1493,7 +1503,9 @@ output_epilog (file, size)
}
}
/* End the function. */
/* End the function. */
fprintf
(
file
,
"
\t
.end %s
\n
"
,
alpha_function_name
);
fprintf
(
file
,
"
\t
.end "
);
assemble_name
(
file
,
alpha_function_name
);
fprintf
(
file
,
"
\n
"
);
inside_function
=
FALSE
;
inside_function
=
FALSE
;
/* Show that we know this function if it is called again. */
/* Show that we know this function if it is called again. */
...
...
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