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
c62bdc79
Commit
c62bdc79
authored
Jun 28, 1995
by
Richard Kenner
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
(strip_off_ending): Strip off any ending; don't pretend we know what
valid endings are. From-SVN: r10068
parent
c0318c99
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
9 additions
and
27 deletions
+9
-27
gcc/toplev.c
+9
-27
No files found.
gcc/toplev.c
View file @
c62bdc79
...
@@ -1857,39 +1857,21 @@ pipe_closed (signo)
...
@@ -1857,39 +1857,21 @@ pipe_closed (signo)
}
}
/* Strip off a legitimate source ending from the input string NAME of
/* Strip off a legitimate source ending from the input string NAME of
length LEN. */
length LEN. Rather than having to know the names used by all of
our front ends, we strip off an ending of a period followed by one,
two, or three characters. */
void
void
strip_off_ending
(
name
,
len
)
strip_off_ending
(
name
,
len
)
char
*
name
;
char
*
name
;
int
len
;
int
len
;
{
{
if
(
len
>
2
&&
!
strcmp
(
".c"
,
name
+
len
-
2
))
if
(
len
>
2
&&
name
[
len
-
2
]
==
'.'
)
name
[
len
-
2
]
=
0
;
name
[
len
-
2
]
=
'\0'
;
else
if
(
len
>
2
&&
!
strcmp
(
".m"
,
name
+
len
-
2
))
else
if
(
len
>
3
&&
name
[
len
-
3
]
==
'.'
)
name
[
len
-
2
]
=
0
;
name
[
len
-
3
]
=
'\0'
;
else
if
(
len
>
2
&&
!
strcmp
(
".i"
,
name
+
len
-
2
))
else
if
(
len
>
4
&&
name
[
len
-
4
]
==
'.'
)
name
[
len
-
2
]
=
0
;
name
[
len
-
4
]
=
'\0'
;
else
if
(
len
>
3
&&
!
strcmp
(
".ii"
,
name
+
len
-
3
))
name
[
len
-
3
]
=
0
;
else
if
(
len
>
3
&&
!
strcmp
(
".co"
,
name
+
len
-
3
))
name
[
len
-
3
]
=
0
;
else
if
(
len
>
3
&&
!
strcmp
(
".cc"
,
name
+
len
-
3
))
name
[
len
-
3
]
=
0
;
else
if
(
len
>
2
&&
!
strcmp
(
".C"
,
name
+
len
-
2
))
name
[
len
-
2
]
=
0
;
else
if
(
len
>
4
&&
!
strcmp
(
".cxx"
,
name
+
len
-
4
))
name
[
len
-
4
]
=
0
;
else
if
(
len
>
4
&&
!
strcmp
(
".cpp"
,
name
+
len
-
4
))
name
[
len
-
4
]
=
0
;
else
if
(
len
>
2
&&
!
strcmp
(
".f"
,
name
+
len
-
2
))
name
[
len
-
2
]
=
0
;
/* Ada will use extensions like .ada, .adb, and .ads, so just test
for "ad". */
else
if
(
len
>
4
&&
!
strncmp
(
".ad"
,
name
+
len
-
4
,
3
))
name
[
len
-
4
]
=
0
;
else
if
(
len
>
4
&&
!
strcmp
(
".atr"
,
name
+
len
-
4
))
name
[
len
-
4
]
=
0
;
}
}
/* Output a quoted string. */
/* Output a quoted string. */
...
...
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