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
db17411e
Commit
db17411e
authored
Apr 08, 2008
by
Arnaud Charlet
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
Update comments.
Minor reformatting. From-SVN: r134082
parent
b18acc1b
Hide whitespace changes
Inline
Side-by-side
Showing
2 changed files
with
3 additions
and
3 deletions
+3
-3
gcc/ada/exp_tss.ads
+2
-2
gcc/ada/s-taprop-lynxos.adb
+1
-1
No files found.
gcc/ada/exp_tss.ads
View file @
db17411e
...
...
@@ -6,7 +6,7 @@
--
--
--
S
p
e
c
--
--
--
--
Copyright
(
C
)
1992
-
200
7
,
Free
Software
Foundation
,
Inc
.
--
--
Copyright
(
C
)
1992
-
200
8
,
Free
Software
Foundation
,
Inc
.
--
--
--
--
GNAT
is
free
software
;
you
can
redistribute
it
and
/
or
modify
it
under
--
--
terms
of
the
GNU
General
Public
License
as
published
by
the
Free
Soft
-
--
...
...
@@ -215,7 +215,7 @@ package Exp_Tss is
function
Has_Non_Null_Base_Init_Proc
(
Typ
:
Entity_Id
)
return
Boolean
;
--
Returns
true
if
the
given
type
has
a
defined
Base_Init_Proc
and
--
this
init
proc
is
not
a
null
init
proc
(
null
init
procs
occur
as
--
a
result
of
the
processing
for
Initialize_Scalars
.
This
function
--
a
result
of
the
processing
for
Initialize_Scalars
)
.
This
function
--
is
used
to
test
for
the
presence
of
an
init
proc
in
cases
where
--
a
null
init
proc
is
considered
equivalent
to
no
init
proc
.
...
...
gcc/ada/s-taprop-lynxos.adb
View file @
db17411e
...
...
@@ -668,7 +668,7 @@ package body System.Task_Primitives.Operations is
begin
Result :=
clock_getres
(clock_id => CLOCK_REALTIME,
R
es => Res'
Unchecked_Access
);
(clock_id => CLOCK_REALTIME,
r
es => Res'
Unchecked_Access
);
pragma
Assert
(
Result
=
0
);
return
To_Duration
(
Res
);
end
RT_Resolution
;
...
...
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