diff options
| author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2005-06-16 09:00:13 +0000 |
|---|---|---|
| committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2005-06-16 09:00:13 +0000 |
| commit | c9a428449e505030e0cbacc2b8697ef2166d06cb (patch) | |
| tree | a805cdf58bf82e42b382e600607214a93b0ebbf1 /gcc/ada/s-valllu.ads | |
| parent | 30f0f264ff156bfdced6a25ca0e3d23a8bed2eea (diff) | |
| download | gcc-c9a428449e505030e0cbacc2b8697ef2166d06cb.tar.gz | |
2005-06-10 Arnaud Charlet <charlet@adacore.com>
* Makefile.in: Add initialize.o when needed.
Adapt to new VMS package body Symbols and subunits
No specialized version of a-sytaco is needed for VxWorks.
* a-wichun.ads, a-wichun.adb, a-zchuni.ads, a-zchuni.adb: New files.
* a-zchara.ads, a-widcha.ads: New files.
* system-hpux-ia64.ads: New file.
* i-vxwork-x86.ads, i-vxwork.ads (intContext): Add this function which
is imported from the VxWorks kernel.
2005-06-14 Robert Dewar <dewar@adacore.com>
* g-soliop-mingw.ads, g-soccon-vms.adb, a-swmwco.ads, exp_smem.adb,
fmap.adb, a-szmzco.ads, s-traent-vms.adb, s-traent-vms.ads,
a-direio.ads, a-exctra.ads, a-exexda.adb, a-exextr.adb, a-stream.ads,
s-restri.ads, s-restri.adb, s-traent.adb, s-traent.ads, a-slcain.adb,
a-stzhas.ads, a-tiinau.adb, comperr.adb, exp_ch11.adb, g-boubuf.adb,
g-calend.adb, g-debpoo.ads, g-moreex.ads, gprep.adb, g-regpat.ads,
i-cexten.ads, i-os2thr.ads, makeutl.ads, memroot.adb, mlib-prj.adb,
namet.adb, namet.ads, prj-makr.adb, prj-proc.adb, sem_dist.adb,
sem_elim.ads, s-valint.adb, s-vallli.adb, s-vallli.adb, s-vallli.ads,
s-valllu.adb, s-valllu.ads, s-valrea.adb, s-valrea.ads, scn.adb,
s-tasinf.adb, targparm.adb, uname.adb, uname.ads, xnmake.adb,
xsinfo.adb, a-direct.ads: Remove extra blank lines. Minor reformatting.
2005-06-14 Thomas Quinot <quinot@adacore.com>
* xeinfo.adb: Fix typo in comment
2005-06-14 Javier Miranda <miranda@adacore.com>
* repinfo.ads: Fix typo in comment
2005-06-14 Gary Dismukes <dismukes@adacore.com>
* s-finimp.adb (Parent_Tag): Delete this imported function (function
Parent_Tag is now in the visible part of Ada.Tags).
(Get_Deep_Controller): Call Ada.Tags.Parent_Tag directly instead of
using imported function.
2005-06-14 Bernard Banner <banner@adacore.com>
* vxaddr2line.adb: Add support for Windows hosted x86 vxworks. Should
also apply for handling support for VxSim 653.
2005-06-14 Eric Botcazou <ebotcazou@adacore.com>
* xsnames.adb: Add automatic generation of snames.h.
2005-06-14 Thomas Quinot <quinot@adacore.com>
* gen-soccon.c: Add IP_MULTICAST_IF constant
Minor reformatting and adjustments to prevent warnings.
2005-06-14 Pascal Obry <obry@adacore.com>
* seh_init.c: Do not include <sys/stat.h>. This is not needed.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@101072 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/s-valllu.ads')
| -rw-r--r-- | gcc/ada/s-valllu.ads | 8 |
1 files changed, 3 insertions, 5 deletions
diff --git a/gcc/ada/s-valllu.ads b/gcc/ada/s-valllu.ads index 8311f524e08..c3a6c2bb378 100644 --- a/gcc/ada/s-valllu.ads +++ b/gcc/ada/s-valllu.ads @@ -6,7 +6,7 @@ -- -- -- S p e c -- -- -- --- Copyright (C) 1992,1993,1994,1995,1996 Free Software Foundation, Inc. -- +-- Copyright (C) 1992-2005 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- -- @@ -42,8 +42,7 @@ pragma Pure (Val_LLU); function Scan_Long_Long_Unsigned (Str : String; Ptr : access Integer; - Max : Integer) - return System.Unsigned_Types.Long_Long_Unsigned; + Max : Integer) return System.Unsigned_Types.Long_Long_Unsigned; -- This function scans the string starting at Str (Ptr.all) for a valid -- integer according to the syntax described in (RM 3.5(43)). The substring -- scanned extends no further than Str (Max). There are three cases for the @@ -71,8 +70,7 @@ pragma Pure (Val_LLU); -- is greater than Max as required in this case. function Value_Long_Long_Unsigned - (Str : String) - return System.Unsigned_Types.Long_Long_Unsigned; + (Str : String) return System.Unsigned_Types.Long_Long_Unsigned; -- Used in computing X'Value (Str) where X is a modular integer type whose -- modulus exceeds the range of System.Unsigned_Types.Unsigned. Str is the -- string argument of the attribute. Constraint_Error is raised if the |