diff options
Diffstat (limited to 'gcc/ada/urealp.h')
| -rw-r--r-- | gcc/ada/urealp.h | 16 |
1 files changed, 7 insertions, 9 deletions
diff --git a/gcc/ada/urealp.h b/gcc/ada/urealp.h index 3d96cbcb199..1153f250e15 100644 --- a/gcc/ada/urealp.h +++ b/gcc/ada/urealp.h @@ -6,8 +6,7 @@ * * * C Header File * * * - * * - * Copyright (C) 1992-2001 Free Software Foundation, Inc. * + * Copyright (C) 1992-2002 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- * @@ -31,22 +30,21 @@ /* Support for universal real arithmetic. */ #define Numerator urealp__numerator -extern Uint Numerator PARAMS ((Ureal)); +extern Uint Numerator (Ureal); #define Denominator urealp__denominator -extern Uint Denominator PARAMS ((Ureal)); +extern Uint Denominator (Ureal); #define Rbase urealp__rbase -extern Nat Rbase PARAMS ((Ureal)); +extern Nat Rbase (Ureal); #define UR_Is_Negative urealp__ur_is_negative -extern Boolean UR_Is_Negative PARAMS ((Ureal)); +extern Boolean UR_Is_Negative (Ureal); #define UR_Is_Zero urealp__ur_is_zero -extern Boolean UR_Is_Zero PARAMS ((Ureal)); +extern Boolean UR_Is_Zero (Ureal); enum Rounding_Mode {Floor = 0, Ceiling = 1, Round = 2, Round_Even = 3}; #define Machine eval_fat__machine -extern Ureal Machine PARAMS ((Entity_Id, Ureal, - enum Rounding_Mode)); +extern Ureal Machine (Entity_Id, Ureal, enum Rounding_Mode); |