Commit 7989e392 by Arnaud Charlet

[multiple changes]

2012-04-26  Tristan Gingold  <gingold@adacore.com>

	* gcc-interface/Make-lang.in: Update dependencies.
	Remove s-traceb and tracebak objects from gnat1 and gnatbind (not used).
	Remove s-tasdeb and s-vaflop rules (not used).

2012-04-26  Olivier Hainque  <hainque@adacore.com>

	* gcc-interface/targtyps.c (WIDEST_HARDWARE_FP_SIZE): Default to
	DOUBLE_TYPE_SIZE instead of LONG_DOUBLE_TYPE_SIZE.

2012-04-26  Hristian Kirtchev  <kirtchev@adacore.com>

	* a-calend.adb (Day_Of_Week): Keep the internal
	usage of UTC_Time_Offset consistent with Time_Of and Split.

From-SVN: r186872
parent d99ff0f4
2012-04-26 Tristan Gingold <gingold@adacore.com>
* gcc-interface/Make-lang.in: Update dependencies.
Remove s-traceb and tracebak objects from gnat1 and gnatbind (not used).
Remove s-tasdeb and s-vaflop rules (not used).
2012-04-26 Olivier Hainque <hainque@adacore.com>
* gcc-interface/targtyps.c (WIDEST_HARDWARE_FP_SIZE): Default to
DOUBLE_TYPE_SIZE instead of LONG_DOUBLE_TYPE_SIZE.
2012-04-26 Hristian Kirtchev <kirtchev@adacore.com>
* a-calend.adb (Day_Of_Week): Keep the internal
usage of UTC_Time_Offset consistent with Time_Of and Split.
2012-04-26 Hristian Kirtchev <kirtchev@adacore.com> 2012-04-26 Hristian Kirtchev <kirtchev@adacore.com>
* sem_ch5.adb (Analyze_Loop_Parameter_Specification): Do not freeze * sem_ch5.adb (Analyze_Loop_Parameter_Specification): Do not freeze
......
...@@ -1155,7 +1155,11 @@ package body Ada.Calendar is ...@@ -1155,7 +1155,11 @@ package body Ada.Calendar is
function Day_Of_Week (Date : Time) return Integer is function Day_Of_Week (Date : Time) return Integer is
Date_N : constant Time_Rep := Time_Rep (Date); Date_N : constant Time_Rep := Time_Rep (Date);
Time_Zone : constant Long_Integer := UTC_Time_Offset (Date, True);
Time_Zone : constant Long_Integer := UTC_Time_Offset (Date, False);
-- Keep the internal usage of UTC_Time_Offset consistent with Time_Of
-- and Split.
Ada_Low_N : Time_Rep; Ada_Low_N : Time_Rep;
Day_Count : Long_Integer; Day_Count : Long_Integer;
Day_Dur : Time_Dur; Day_Dur : Time_Dur;
......
...@@ -177,7 +177,7 @@ GCC_LINK=$(LINKER) $(GCC_LINKERFLAGS) -static-libgcc $(LDFLAGS) ...@@ -177,7 +177,7 @@ GCC_LINK=$(LINKER) $(GCC_LINKERFLAGS) -static-libgcc $(LDFLAGS)
# Object files for gnat1 from C sources. # Object files for gnat1 from C sources.
GNAT1_C_OBJS = ada/adadecode.o ada/adaint.o ada/argv.o ada/cio.o \ GNAT1_C_OBJS = ada/adadecode.o ada/adaint.o ada/argv.o ada/cio.o \
ada/cstreams.o ada/env.o ada/init.o ada/initialize.o ada/raise.o \ ada/cstreams.o ada/env.o ada/init.o ada/initialize.o ada/raise.o \
ada/seh_init.o ada/targext.o ada/tracebak.o ada/cuintp.o ada/decl.o \ ada/seh_init.o ada/targext.o ada/cuintp.o ada/decl.o \
ada/misc.o ada/utils.o ada/utils2.o ada/trans.o ada/targtyps.o ada/misc.o ada/utils.o ada/utils2.o ada/trans.o ada/targtyps.o
# Object files from Ada sources that are used by gnat1 # Object files from Ada sources that are used by gnat1
...@@ -324,7 +324,6 @@ GNAT_ADA_OBJS = \ ...@@ -324,7 +324,6 @@ GNAT_ADA_OBJS = \
ada/s-strhas.o \ ada/s-strhas.o \
ada/s-string.o \ ada/s-string.o \
ada/s-strops.o \ ada/s-strops.o \
ada/s-traceb.o \
ada/s-traent.o \ ada/s-traent.o \
ada/s-unstyp.o \ ada/s-unstyp.o \
ada/s-utf_32.o \ ada/s-utf_32.o \
...@@ -423,7 +422,6 @@ GNATBIND_OBJS = \ ...@@ -423,7 +422,6 @@ GNATBIND_OBJS = \
ada/raise.o \ ada/raise.o \
ada/seh_init.o \ ada/seh_init.o \
ada/targext.o \ ada/targext.o \
ada/tracebak.o \
ada/ada.o \ ada/ada.o \
ada/a-clrefi.o \ ada/a-clrefi.o \
ada/a-comlin.o \ ada/a-comlin.o \
...@@ -505,7 +503,6 @@ GNATBIND_OBJS = \ ...@@ -505,7 +503,6 @@ GNATBIND_OBJS = \
ada/s-stoele.o \ ada/s-stoele.o \
ada/s-strhas.o \ ada/s-strhas.o \
ada/s-strops.o \ ada/s-strops.o \
ada/s-traceb.o \
ada/s-traent.o \ ada/s-traent.o \
ada/s-unstyp.o \ ada/s-unstyp.o \
ada/s-utf_32.o \ ada/s-utf_32.o \
...@@ -1181,18 +1178,6 @@ ADA_TREE_H = ada/gcc-interface/ada-tree.h ...@@ -1181,18 +1178,6 @@ ADA_TREE_H = ada/gcc-interface/ada-tree.h
# Special flags - see gcc-interface/Makefile.in for the template # Special flags - see gcc-interface/Makefile.in for the template
ada/s-traceb.o : ada/s-traceb.adb ada/s-traceb.ads
$(CC) -c $(ALL_ADAFLAGS) $(FORCE_DEBUG_ADAFLAGS) $(ADA_INCLUDES) \
$< $(OUTPUT_OPTION)
ada/s-tasdeb.o : ada/s-tasdeb.adb ada/s-tasdeb.ads
$(CC) -c $(ALL_ADAFLAGS) $(FORCE_DEBUG_ADAFLAGS) -O0 $(ADA_INCLUDES) \
$< $(OUTPUT_OPTION)
ada/s-vaflop.o : ada/s-vaflop.adb ada/s-vaflop.ads
$(CC) -c -O $(ALL_ADAFLAGS) $(FORCE_DEBUG_ADAFLAGS) $(ADA_INCLUDES) \
$< $(OUTPUT_OPTION)
ada/a-except.o : ada/a-except.adb ada/a-except.ads ada/a-except.o : ada/a-except.adb ada/a-except.ads
$(CC) -c $(ALL_ADAFLAGS) $(FORCE_DEBUG_ADAFLAGS) -O1 -fno-inline \ $(CC) -c $(ALL_ADAFLAGS) $(FORCE_DEBUG_ADAFLAGS) -O1 -fno-inline \
$(ADA_INCLUDES) $< $(OUTPUT_OPTION) $(ADA_INCLUDES) $< $(OUTPUT_OPTION)
...@@ -1209,10 +1194,6 @@ ada/a-tags.o : ada/a-tags.adb ada/a-tags.ads ...@@ -1209,10 +1194,6 @@ ada/a-tags.o : ada/a-tags.adb ada/a-tags.ads
$(CC) -c $(ALL_ADAFLAGS) $(FORCE_DEBUG_ADAFLAGS) $(ADA_INCLUDES) \ $(CC) -c $(ALL_ADAFLAGS) $(FORCE_DEBUG_ADAFLAGS) $(ADA_INCLUDES) \
$< $(OUTPUT_OPTION) $< $(OUTPUT_OPTION)
ada/tracebak.o : ada/tracebak.c $(CONFIG_H) $(SYSTEM_H)
$(COMPILER) -c $(ALL_COMPILERFLAGS) $(ADA_CFLAGS) $(ALL_CPPFLAGS) \
$(INCLUDES) -fno-omit-frame-pointer $< $(OUTPUT_OPTION)
# dependencies for windows specific tool (mdll) # dependencies for windows specific tool (mdll)
ada/mdll.o : ada/mdll.adb ada/mdll.ads ada/mdll-fil.ads ada/mdll-utl.ads ada/mdll.o : ada/mdll.adb ada/mdll.ads ada/mdll-fil.ads ada/mdll-utl.ads
...@@ -2224,31 +2205,31 @@ ada/exp_ch9.o : ada/ada.ads ada/a-except.ads ada/a-unccon.ads \ ...@@ -2224,31 +2205,31 @@ ada/exp_ch9.o : ada/ada.ads ada/a-except.ads ada/a-unccon.ads \
ada/exp_ch9.adb ada/exp_dbug.ads ada/exp_disp.ads ada/exp_pakd.ads \ ada/exp_ch9.adb ada/exp_dbug.ads ada/exp_disp.ads ada/exp_pakd.ads \
ada/exp_sel.ads ada/exp_smem.ads ada/exp_tss.ads ada/exp_util.ads \ ada/exp_sel.ads ada/exp_smem.ads ada/exp_tss.ads ada/exp_util.ads \
ada/exp_util.adb ada/expander.ads ada/fname.ads ada/fname-uf.ads \ ada/exp_util.adb ada/expander.ads ada/fname.ads ada/fname-uf.ads \
ada/freeze.ads ada/get_targ.ads ada/gnat.ads ada/g-htable.ads \ ada/freeze.ads ada/get_targ.ads ada/gnat.ads ada/g-byorma.ads \
ada/gnatvsn.ads ada/hostparm.ads ada/inline.ads ada/interfac.ads \ ada/g-htable.ads ada/gnatvsn.ads ada/hostparm.ads ada/inline.ads \
ada/itypes.ads ada/lib.ads ada/lib-load.ads ada/lib-util.ads \ ada/interfac.ads ada/itypes.ads ada/lib.ads ada/lib-load.ads \
ada/lib-xref.ads ada/namet.ads ada/namet.adb ada/nlists.ads \ ada/lib-util.ads ada/lib-xref.ads ada/namet.ads ada/namet.adb \
ada/nlists.adb ada/nmake.ads ada/nmake.adb ada/opt.ads ada/opt.adb \ ada/nlists.ads ada/nlists.adb ada/nmake.ads ada/nmake.adb ada/opt.ads \
ada/output.ads ada/put_alfa.ads ada/restrict.ads ada/restrict.adb \ ada/opt.adb ada/output.ads ada/put_alfa.ads ada/restrict.ads \
ada/rident.ads ada/rtsfind.ads ada/scans.ads ada/sem.ads ada/sem.adb \ ada/restrict.adb ada/rident.ads ada/rtsfind.ads ada/scans.ads \
ada/sem_attr.ads ada/sem_aux.ads ada/sem_aux.adb ada/sem_ch10.ads \ ada/sem.ads ada/sem.adb ada/sem_attr.ads ada/sem_aux.ads \
ada/sem_ch11.ads ada/sem_ch12.ads ada/sem_ch13.ads ada/sem_ch2.ads \ ada/sem_aux.adb ada/sem_ch10.ads ada/sem_ch11.ads ada/sem_ch12.ads \
ada/sem_ch3.ads ada/sem_ch4.ads ada/sem_ch5.ads ada/sem_ch6.ads \ ada/sem_ch13.ads ada/sem_ch2.ads ada/sem_ch3.ads ada/sem_ch4.ads \
ada/sem_ch7.ads ada/sem_ch8.ads ada/sem_ch9.ads ada/sem_disp.ads \ ada/sem_ch5.ads ada/sem_ch6.ads ada/sem_ch7.ads ada/sem_ch8.ads \
ada/sem_elab.ads ada/sem_eval.ads ada/sem_prag.ads ada/sem_res.ads \ ada/sem_ch9.ads ada/sem_disp.ads ada/sem_elab.ads ada/sem_eval.ads \
ada/sem_type.ads ada/sem_util.ads ada/sem_util.adb ada/sem_warn.ads \ ada/sem_prag.ads ada/sem_res.ads ada/sem_type.ads ada/sem_util.ads \
ada/sinfo.ads ada/sinfo.adb ada/sinput.ads ada/snames.ads \ ada/sem_util.adb ada/sem_warn.ads ada/sinfo.ads ada/sinfo.adb \
ada/sprint.ads ada/stand.ads ada/stringt.ads ada/style.ads \ ada/sinput.ads ada/sinput.adb ada/snames.ads ada/sprint.ads \
ada/styleg.ads ada/styleg.adb ada/stylesw.ads ada/system.ads \ ada/stand.ads ada/stringt.ads ada/style.ads ada/styleg.ads \
ada/s-exctab.ads ada/s-htable.ads ada/s-imenne.ads ada/s-memory.ads \ ada/styleg.adb ada/stylesw.ads ada/system.ads ada/s-exctab.ads \
ada/s-os_lib.ads ada/s-parame.ads ada/s-rident.ads ada/s-secsta.ads \ ada/s-htable.ads ada/s-imenne.ads ada/s-memory.ads ada/s-os_lib.ads \
ada/s-soflin.ads ada/s-stache.ads ada/s-stalib.ads ada/s-stoele.ads \ ada/s-parame.ads ada/s-rident.ads ada/s-secsta.ads ada/s-soflin.ads \
ada/s-stoele.adb ada/s-string.ads ada/s-traent.ads ada/s-unstyp.ads \ ada/s-stache.ads ada/s-stalib.ads ada/s-stoele.ads ada/s-stoele.adb \
ada/s-wchcon.ads ada/table.ads ada/table.adb ada/targparm.ads \ ada/s-string.ads ada/s-traent.ads ada/s-unstyp.ads ada/s-wchcon.ads \
ada/tbuild.ads ada/tbuild.adb ada/tree_io.ads ada/ttypes.ads \ ada/table.ads ada/table.adb ada/targparm.ads ada/tbuild.ads \
ada/types.ads ada/uintp.ads ada/uintp.adb ada/uname.ads \ ada/tbuild.adb ada/tree_io.ads ada/ttypes.ads ada/types.ads \
ada/unchconv.ads ada/unchdeal.ads ada/urealp.ads ada/validsw.ads \ ada/uintp.ads ada/uintp.adb ada/uname.ads ada/unchconv.ads \
ada/widechar.ads ada/unchdeal.ads ada/urealp.ads ada/validsw.ads ada/widechar.ads
ada/exp_code.o : ada/ada.ads ada/a-except.ads ada/a-unccon.ads \ ada/exp_code.o : ada/ada.ads ada/a-except.ads ada/a-unccon.ads \
ada/a-uncdea.ads ada/alloc.ads ada/aspects.ads ada/atree.ads \ ada/a-uncdea.ads ada/alloc.ads ada/aspects.ads ada/atree.ads \
...@@ -3592,8 +3573,6 @@ ada/s-strops.o : ada/ada.ads ada/a-unccon.ads ada/system.ads \ ...@@ -3592,8 +3573,6 @@ ada/s-strops.o : ada/ada.ads ada/a-unccon.ads ada/system.ads \
ada/s-secsta.ads ada/s-stoele.ads ada/s-stoele.adb ada/s-strops.ads \ ada/s-secsta.ads ada/s-stoele.ads ada/s-stoele.adb ada/s-strops.ads \
ada/s-strops.adb ada/s-strops.adb
ada/s-traceb.o : ada/system.ads ada/s-traceb.ads ada/s-traceb.adb
ada/s-traent.o : ada/system.ads ada/s-traent.ads ada/s-traent.adb ada/s-traent.o : ada/system.ads ada/s-traent.ads ada/s-traent.adb
ada/s-unstyp.o : ada/system.ads ada/s-unstyp.ads ada/s-unstyp.o : ada/system.ads ada/s-unstyp.ads
......
...@@ -6,7 +6,7 @@ ...@@ -6,7 +6,7 @@
* * * *
* Body * * Body *
* * * *
* Copyright (C) 1992-2011, Free Software Foundation, Inc. * * Copyright (C) 1992-2012, Free Software Foundation, Inc. *
* * * *
* GNAT is free software; you can redistribute it and/or modify it under * * 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- * * terms of the GNU General Public License as published by the Free Soft- *
...@@ -54,8 +54,13 @@ ...@@ -54,8 +54,13 @@
#define ADA_LONG_TYPE_SIZE LONG_TYPE_SIZE #define ADA_LONG_TYPE_SIZE LONG_TYPE_SIZE
#endif #endif
/* If we don't have a target definition of WIDEST_HARDWARE_FP_SIZE, assume
DOUBLE_TYPE_SIZE. We used to default to LONG_DOUBLE_TYPE_SIZE, which now
most often maps 128 bits implemented with very inefficient software
emulations so is incorrect as a hardware size estimate. */
#ifndef WIDEST_HARDWARE_FP_SIZE #ifndef WIDEST_HARDWARE_FP_SIZE
#define WIDEST_HARDWARE_FP_SIZE LONG_DOUBLE_TYPE_SIZE #define WIDEST_HARDWARE_FP_SIZE DOUBLE_TYPE_SIZE
#endif #endif
/* The following provide a functional interface for the front end Ada code /* The following provide a functional interface for the front end Ada code
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment