From bcea76b65d860c0eeb74cdef3342b9b921bd11c0 Mon Sep 17 00:00:00 2001 From: Geert Bosch Date: Thu, 24 Apr 2003 19:54:20 +0200 Subject: [PATCH] 1aexcept.adb, [...]: Merge header, formatting and other trivial changes from ACT. * 1aexcept.adb, 1aexcept.ads, 1ic.ads, 1ssecsta.adb, 1ssecsta.ads, 31soccon.ads, 31soliop.ads, 3asoccon.ads, 3bsoccon.ads, 3gsoccon.ads, 3hsoccon.ads, 3ssoccon.ads, 3ssoliop.ads, 3wsoccon.ads, 3wsocthi.adb, 3wsocthi.ads, 3wsoliop.ads, 41intnam.ads, 42intnam.ads, 4aintnam.ads, 4cintnam.ads, 4dintnam.ads, 4gintnam.ads, 4hexcpol.adb, 4hintnam.ads, 4lintnam.ads, 4mintnam.ads, 4nintnam.ads, 4ointnam.ads, 4onumaux.ads, 4pintnam.ads, 4rintnam.ads, 4sintnam.ads, 4uintnam.ads, 4vcaldel.adb, 4vcalend.adb, 4vcalend.ads, 4vintnam.ads, 4wcalend.adb, 4wexcpol.adb, 4wintnam.ads, 4zintnam.ads, 4znumaux.ads, 4zsytaco.adb, 4zsytaco.ads, 51osinte.adb, 51osinte.ads, 52osinte.adb, 52osinte.ads, 52system.ads, 53osinte.ads, 54osinte.ads, 5amastop.adb, 5aosinte.adb, 5aosinte.ads, 5asystem.ads, 5ataprop.adb, 5atasinf.ads, 5ataspri.ads, 5atpopsp.adb, 5avxwork.ads, 5bosinte.adb, 5bosinte.ads, 5bsystem.ads, 5cosinte.ads, 5dosinte.ads, 5esystem.ads, 5etpopse.adb, 5fintman.adb, 5fosinte.ads, 5fsystem.ads, 5ftaprop.adb, 5ftasinf.ads, 5ginterr.adb, 5gintman.adb, 5gmastop.adb, 5gosinte.ads, 5gproinf.adb, 5gproinf.ads, 5gsystem.ads, 5gtaprop.adb, 5gtasinf.adb, 5gtasinf.ads, 5gtpgetc.adb, 5hosinte.adb, 5hosinte.ads, 5hparame.ads, 5hsystem.ads, 5htaprop.adb, 5htaspri.ads, 5htraceb.adb, 5iosinte.adb, 5iosinte.ads, 5itaprop.adb, 5itaspri.ads, 5ksystem.ads, 5kvxwork.ads, 5lintman.adb, 5lml-tgt.adb, 5losinte.ads, 5lsystem.ads, 5mosinte.ads, 5mvxwork.ads, 5ninmaop.adb, 5nintman.adb, 5nosinte.ads, 5ntaprop.adb, 5ntaspri.ads, 5ointerr.adb, 5omastop.adb, 5oosinte.adb, 5oosinte.ads, 5oosprim.adb, 5oparame.adb, 5osystem.ads, 5otaprop.adb, 5otaspri.ads, 5posinte.ads, 5posprim.adb, 5pvxwork.ads, 5qosinte.adb, 5qosinte.ads, 5qstache.adb, 5qtaprop.adb, 5qtaspri.ads, 5rosinte.adb, 5rosinte.ads, 5rparame.adb, 5sintman.adb, 5sosinte.adb, 5sosinte.ads, 5sparame.adb, 5ssystem.ads, 5staprop.adb, 5stasinf.adb, 5stasinf.ads, 5staspri.ads, 5stpopse.adb, 5svxwork.ads, 5tosinte.ads, 5uintman.adb, 5uosinte.ads, 5vasthan.adb, 5vinmaop.adb, 5vinterr.adb, 5vintman.adb, 5vintman.ads, 5vmastop.adb, 5vosinte.adb, 5vosinte.ads, 5vosprim.adb, 5vosprim.ads, 5vparame.ads, 5vsystem.ads, 5vtaprop.adb, 5vtaspri.ads, 5vtpopde.adb, 5vtpopde.ads, 5vvaflop.adb, 5wgloloc.adb, 5wintman.adb, 5wmemory.adb, 5wosinte.ads, 5wosprim.adb, 5wsystem.ads, 5wtaprop.adb, 5wtaspri.ads, 5ysystem.ads, 5zinterr.adb, 5zintman.adb, 5zosinte.adb, 5zosinte.ads, 5zosprim.adb, 5zsystem.ads, 5ztaprop.adb, 6vcpp.adb, 6vcstrea.adb, 6vinterf.ads, 7sinmaop.adb, 7sintman.adb, 7sosinte.adb, 7sosprim.adb, 7staprop.adb, 7staspri.ads, 7stpopsp.adb, 7straceb.adb, 86numaux.adb, 86numaux.ads, 9drpc.adb, a-astaco.adb, a-astaco.ads, a-caldel.adb, a-caldel.ads, a-calend.adb, a-calend.ads, a-chahan.adb, a-chahan.ads, a-charac.ads, a-chlat1.ads, a-chlat9.ads, a-colien.adb, a-colien.ads, a-colire.adb, a-colire.ads, a-comlin.adb, a-comlin.ads, a-cwila1.ads, a-cwila9.ads, a-decima.adb, a-decima.ads, a-diocst.adb, a-diocst.ads, a-direio.adb, a-direio.ads, a-dynpri.adb, a-dynpri.ads, a-einuoc.adb, a-einuoc.ads, a-except.adb, a-except.ads, a-excpol.adb, a-exctra.adb, a-exctra.ads, a-filico.adb, a-filico.ads, a-finali.adb, a-finali.ads, a-flteio.ads, a-fwteio.ads, a-inteio.ads, a-interr.adb, a-interr.ads, a-intnam.ads, a-intsig.adb, a-intsig.ads, a-ioexce.ads, a-iwteio.ads, a-lfteio.ads, a-lfwtio.ads, a-liteio.ads, a-liwtio.ads, a-llftio.ads, a-llfwti.ads, a-llitio.ads, a-lliwti.ads, a-ncelfu.ads, a-ngcefu.adb, a-ngcefu.ads, a-ngcoty.adb, a-ngcoty.ads, a-ngelfu.adb, a-ngelfu.ads, a-nlcefu.ads, a-nlcoty.ads, a-nlelfu.ads, a-nllcef.ads, a-nllcty.ads, a-nllefu.ads, a-nscefu.ads, a-nscoty.ads, a-nselfu.ads, a-nucoty.ads, a-nudira.adb, a-nudira.ads, a-nuelfu.ads, a-nuflra.adb, a-nuflra.ads, a-numaux.ads, a-numeri.ads, a-reatim.adb, a-reatim.ads, a-retide.adb, a-retide.ads, a-sequio.adb, a-sequio.ads, a-sfteio.ads, a-sfwtio.ads, a-siocst.adb, a-siocst.ads, a-siteio.ads, a-siwtio.ads, a-ssicst.adb, a-ssicst.ads, a-ssitio.ads, a-ssiwti.ads, a-stmaco.ads, a-storio.adb, a-storio.ads, a-strbou.adb, a-strbou.ads, a-stream.ads, a-strfix.adb, a-strfix.ads, a-string.ads, a-strmap.adb, a-strmap.ads, a-strsea.adb, a-strsea.ads, a-strunb.adb, a-strunb.ads, a-ststio.adb, a-ststio.ads, a-stunau.adb, a-stunau.ads, a-stwibo.adb, a-stwibo.ads, a-stwifi.adb, a-stwifi.ads, a-stwima.adb, a-stwima.ads, a-stwise.adb, a-stwise.ads, a-stwiun.adb, a-stwiun.ads, a-suteio.adb, a-suteio.ads, a-swmwco.ads, a-swuwti.adb, a-swuwti.ads, a-sytaco.adb, a-sytaco.ads, a-tags.adb, a-tags.ads, a-tasatt.adb, a-tasatt.ads, a-taside.adb, a-taside.ads, a-teioed.adb, a-teioed.ads, a-textio.adb, a-textio.ads, a-ticoau.adb, a-ticoau.ads, a-ticoio.adb, a-ticoio.ads, a-tideau.adb, a-tideau.ads, a-tideio.adb, a-tideio.ads, a-tienau.adb, a-tienau.ads, a-tienio.adb, a-tienio.ads, a-tifiio.adb, a-tifiio.ads, a-tiflau.adb, a-tiflau.ads, a-tiflio.adb, a-tiflio.ads, a-tigeau.adb, a-tigeau.ads, a-tiinau.adb, a-tiinau.ads, a-tiinio.adb, a-tiinio.ads, a-timoau.adb, a-timoau.ads, a-timoio.adb, a-timoio.ads, a-tiocst.adb, a-tiocst.ads, a-titest.adb, a-titest.ads, a-unccon.ads, a-uncdea.ads, a-witeio.adb, a-witeio.ads, a-wtcoau.adb, a-wtcoau.ads, a-wtcoio.adb, a-wtcoio.ads, a-wtcstr.adb, a-wtcstr.ads, a-wtdeau.adb, a-wtdeau.ads, a-wtdeio.adb, a-wtdeio.ads, a-wtedit.adb, a-wtedit.ads, a-wtenau.adb, a-wtenau.ads, a-wtenio.adb, a-wtenio.ads, a-wtfiio.adb, a-wtfiio.ads, a-wtflau.adb, a-wtflau.ads, a-wtflio.adb, a-wtflio.ads, a-wtgeau.adb, a-wtgeau.ads, a-wtinau.adb, a-wtinau.ads, a-wtinio.adb, a-wtinio.ads, a-wtmoau.adb, a-wtmoau.ads, a-wtmoio.adb, a-wtmoio.ads, a-wttest.adb, a-wttest.ads, ada-tree.h, ada.ads, ada.h, adadecode.c, adadecode.h, ali-util.adb, ali-util.ads, ali.adb, ali.ads, alloc.ads, argv.c, atree.adb, atree.ads, atree.h, aux-io.c, back_end.adb, back_end.ads, bcheck.adb, bcheck.ads, binde.adb, binde.ads, binderr.adb, binderr.ads, bindgen.adb, bindgen.ads, bindusg.adb, bindusg.ads, butil.adb, butil.ads, cal.c, calendar.ads, casing.adb, casing.ads, ceinfo.adb, checks.adb, checks.ads, cio.c, comperr.adb, comperr.ads, config-lang.in, csets.adb, csets.ads, csinfo.adb, cstand.adb, cstand.ads, cuintp.c, debug.adb, debug.ads, debug_a.adb, debug_a.ads, dec-io.adb, dec-io.ads, dec.ads, deftarg.c, directio.ads, einfo.adb, einfo.ads, elists.adb, elists.ads, elists.h, errno.c, errout.adb, errout.ads, eval_fat.adb, eval_fat.ads, exit.c, exp_aggr.adb, exp_aggr.ads, exp_attr.adb, exp_attr.ads, exp_ch10.ads, exp_ch11.adb, exp_ch11.ads, exp_ch12.adb, exp_ch12.ads, exp_ch13.adb, exp_ch13.ads, exp_ch2.adb, exp_ch2.ads, exp_ch3.adb, exp_ch3.ads, exp_ch4.adb, exp_ch4.ads, exp_ch5.adb, exp_ch5.ads, exp_ch6.adb, exp_ch6.ads, exp_ch7.adb, exp_ch7.ads, exp_ch8.adb, exp_ch8.ads, exp_ch9.adb, exp_ch9.ads, exp_code.adb, exp_code.ads, exp_dbug.adb, exp_dbug.ads, exp_disp.adb, exp_disp.ads, exp_dist.adb, exp_dist.ads, exp_fixd.adb, exp_fixd.ads, exp_imgv.adb, exp_imgv.ads, exp_intr.adb, exp_intr.ads, exp_pakd.adb, exp_pakd.ads, exp_prag.adb, exp_prag.ads, exp_smem.adb, exp_smem.ads, exp_strm.adb, exp_strm.ads, exp_tss.adb, exp_tss.ads, exp_util.adb, exp_util.ads, exp_vfpt.adb, exp_vfpt.ads, expander.adb, expander.ads, fmap.adb, fmap.ads, fname-sf.adb, fname-sf.ads, fname-uf.adb, fname-uf.ads, fname.adb, fname.ads, freeze.adb, freeze.ads, frontend.adb, frontend.ads, g-awk.adb, g-awk.ads, g-busora.adb, g-busora.ads, g-busorg.adb, g-busorg.ads, g-calend.adb, g-calend.ads, g-casuti.adb, g-casuti.ads, g-catiio.adb, g-catiio.ads, g-cgi.adb, g-cgi.ads, g-cgicoo.adb, g-cgicoo.ads, g-cgideb.adb, g-cgideb.ads, g-comlin.adb, g-comlin.ads, g-crc32.adb, g-crc32.ads, g-curexc.ads, g-debpoo.adb, g-debpoo.ads, g-debuti.adb, g-debuti.ads, g-diopit.adb, g-diopit.ads, g-dirope.adb, g-dirope.ads, g-dyntab.adb, g-dyntab.ads, g-enblsp.adb, g-except.ads, g-exctra.adb, g-exctra.ads, g-expect.adb, g-expect.ads, g-flocon.ads, g-hesora.adb, g-hesora.ads, g-hesorg.adb, g-hesorg.ads, g-htable.adb, g-htable.ads, g-io.adb, g-io.ads, g-io_aux.adb, g-io_aux.ads, g-locfil.ads, g-md5.adb, g-md5.ads, g-moreex.adb, g-moreex.ads, g-os_lib.adb, g-os_lib.ads, g-regexp.adb, g-regexp.ads, g-regist.ads, g-regpat.adb, g-regpat.ads, g-soccon.ads, g-socket.adb, g-socket.ads, g-socthi.adb, g-socthi.ads, g-soliop.ads, g-souinf.ads, g-speche.adb, g-speche.ads, g-spipat.adb, g-spipat.ads, g-spitbo.adb, g-spitbo.ads, g-sptabo.ads, g-sptain.ads, g-sptavs.ads, g-table.adb, g-table.ads, g-tasloc.adb, g-tasloc.ads, g-thread.adb, g-thread.ads, g-traceb.adb, g-traceb.ads, g-trasym.adb, g-trasym.ads, get_targ.adb, get_targ.ads, gnat-style.texi, gnat.ads, gnat1drv.adb, gnat1drv.ads, gnatbind.adb, gnatbind.ads, gnatbl.c, gnatchop.adb, gnatcmd.adb, gnatcmd.ads, gnatdll.adb, gnatfind.adb, gnatkr.adb, gnatkr.ads, gnatlbr.adb, gnatlink.adb, gnatlink.ads, gnatls.adb, gnatls.ads, gnatmake.adb, gnatmake.ads, gnatmem.adb, gnatname.adb, gnatname.ads, gnatprep.adb, gnatprep.ads, gnatpsta.adb, gnatvsn.adb, gnatvsn.ads, gnatxref.adb, hlo.adb, hlo.ads, hostparm.ads, i-c.adb, i-c.ads, i-cexten.ads, i-cobol.adb, i-cobol.ads, i-cpoint.adb, i-cpoint.ads, i-cpp.adb, i-cpp.ads, i-cstrea.adb, i-cstrea.ads, i-cstrin.adb, i-cstrin.ads, i-fortra.adb, i-fortra.ads, i-os2err.ads, i-os2lib.adb, i-os2lib.ads, i-os2syn.ads, i-os2thr.ads, i-pacdec.adb, i-pacdec.ads, i-vxwork.ads, impunit.adb, impunit.ads, inline.adb, inline.ads, interfac.ads, ioexcept.ads, itypes.adb, itypes.ads, krunch.adb, krunch.ads, layout.adb, layout.ads, lib-list.adb, lib-load.adb, lib-load.ads, lib-sort.adb, lib-util.adb, lib-util.ads, lib-writ.adb, lib-writ.ads, lib-xref.adb, lib-xref.ads, lib.adb, lib.ads, live.adb, live.ads, machcode.ads, make.adb, make.ads, makeusg.adb, makeusg.ads, math_lib.adb, mdll-fil.adb, mdll-fil.ads, mdll-utl.adb, mdll-utl.ads, mdll.adb, mdll.ads, memroot.adb, memroot.ads, memtrack.adb, mlib-fil.adb, mlib-fil.ads, mlib-prj.adb, mlib-prj.ads, mlib-tgt.adb, mlib-tgt.ads, mlib-utl.adb, mlib-utl.ads, mlib.adb, mlib.ads, namet.adb, namet.ads, nlists.adb, nlists.ads, opt.adb, opt.ads, osint-b.adb, osint-b.ads, osint-c.adb, osint-c.ads, osint-l.adb, osint-l.ads, osint-m.adb, osint-m.ads, osint.adb, osint.ads, output.adb, output.ads, par-ch10.adb, par-ch11.adb, par-ch12.adb, par-ch13.adb, par-ch2.adb, par-ch3.adb, par-ch4.adb, par-ch5.adb, par-ch6.adb, par-ch7.adb, par-ch8.adb, par-ch9.adb, par-endh.adb, par-labl.adb, par-load.adb, par-prag.adb, par-sync.adb, par-tchk.adb, par-util.adb, par.adb, par.ads, prj-attr.adb, prj-attr.ads, prj-com.adb, prj-com.ads, prj-dect.adb, prj-dect.ads, prj-env.adb, prj-env.ads, prj-ext.adb, prj-ext.ads, prj-makr.adb, prj-makr.ads, prj-nmsc.adb, prj-nmsc.ads, prj-pars.adb, prj-pars.ads, prj-part.adb, prj-part.ads, prj-pp.adb, prj-pp.ads, prj-proc.adb, prj-proc.ads, prj-strt.adb, prj-strt.ads, prj-tree.adb, prj-tree.ads, prj-util.adb, prj-util.ads, prj.adb, prj.ads, repinfo.adb, repinfo.ads, restrict.adb, restrict.ads, rident.ads, rtsfind.adb, rtsfind.ads, s-addima.adb, s-addima.ads, s-arit64.adb, s-arit64.ads, s-assert.adb, s-assert.ads, s-asthan.adb, s-asthan.ads, s-atacco.adb, s-atacco.ads, s-auxdec.adb, s-auxdec.ads, s-bitops.adb, s-bitops.ads, s-chepoo.ads, s-crc32.adb, s-crc32.ads, s-direio.adb, s-direio.ads, s-errrep.adb, s-errrep.ads, s-except.ads, s-exctab.adb, s-exctab.ads, s-exnflt.ads, s-exngen.adb, s-exngen.ads, s-exnint.ads, s-exnlfl.ads, s-exnlin.ads, s-exnllf.ads, s-exnlli.ads, s-exnsfl.ads, s-exnsin.ads, s-exnssi.ads, s-expflt.ads, s-expgen.adb, s-expgen.ads, s-expint.ads, s-explfl.ads, s-explin.ads, s-expllf.ads, s-explli.ads, s-expllu.adb, s-expllu.ads, s-expmod.adb, s-expmod.ads, s-expsfl.ads, s-expsin.ads, s-expssi.ads, s-expuns.adb, s-expuns.ads, s-fatflt.ads, s-fatgen.adb, s-fatgen.ads, s-fatlfl.ads, s-fatllf.ads, s-fatsfl.ads, s-ficobl.ads, s-fileio.adb, s-fileio.ads, s-finimp.adb, s-finimp.ads, s-finroo.adb, s-finroo.ads, s-fore.adb, s-fore.ads, s-gloloc.adb, s-gloloc.ads, s-imgbiu.adb, s-imgbiu.ads, s-imgboo.adb, s-imgboo.ads, s-imgcha.adb, s-imgcha.ads, s-imgdec.adb, s-imgdec.ads, s-imgenu.adb, s-imgenu.ads, s-imgint.adb, s-imgint.ads, s-imgllb.adb, s-imgllb.ads, s-imglld.adb, s-imglld.ads, s-imglli.adb, s-imglli.ads, s-imgllu.adb, s-imgllu.ads, s-imgllw.adb, s-imgllw.ads, s-imgrea.adb, s-imgrea.ads, s-imguns.adb, s-imguns.ads, s-imgwch.adb, s-imgwch.ads, s-imgwiu.adb, s-imgwiu.ads, s-inmaop.ads, s-interr.adb, s-interr.ads, s-intman.ads, s-io.adb, s-io.ads, s-maccod.ads, s-mantis.adb, s-mantis.ads, s-mastop.adb, s-mastop.ads, s-memory.adb, s-memory.ads, s-osprim.ads, s-pack03.adb, s-pack03.ads, s-pack05.adb, s-pack05.ads, s-pack06.adb, s-pack06.ads, s-pack07.adb, s-pack07.ads, s-pack09.adb, s-pack09.ads, s-pack10.adb, s-pack10.ads, s-pack11.adb, s-pack11.ads, s-pack12.adb, s-pack12.ads, s-pack13.adb, s-pack13.ads, s-pack14.adb, s-pack14.ads, s-pack15.adb, s-pack15.ads, s-pack17.adb, s-pack17.ads, s-pack18.adb, s-pack18.ads, s-pack19.adb, s-pack19.ads, s-pack20.adb, s-pack20.ads, s-pack21.adb, s-pack21.ads, s-pack22.adb, s-pack22.ads, s-pack23.adb, s-pack23.ads, s-pack24.adb, s-pack24.ads, s-pack25.adb, s-pack25.ads, s-pack26.adb, s-pack26.ads, s-pack27.adb, s-pack27.ads, s-pack28.adb, s-pack28.ads, s-pack29.adb, s-pack29.ads, s-pack30.adb, s-pack30.ads, s-pack31.adb, s-pack31.ads, s-pack33.adb, s-pack33.ads, s-pack34.adb, s-pack34.ads, s-pack35.adb, s-pack35.ads, s-pack36.adb, s-pack36.ads, s-pack37.adb, s-pack37.ads, s-pack38.adb, s-pack38.ads, s-pack39.adb, s-pack39.ads, s-pack40.adb, s-pack40.ads, s-pack41.adb, s-pack41.ads, s-pack42.adb, s-pack42.ads, s-pack43.adb, s-pack43.ads, s-pack44.adb, s-pack44.ads, s-pack45.adb, s-pack45.ads, s-pack46.adb, s-pack46.ads, s-pack47.adb, s-pack47.ads, s-pack48.adb, s-pack48.ads, s-pack49.adb, s-pack49.ads, s-pack50.adb, s-pack50.ads, s-pack51.adb, s-pack51.ads, s-pack52.adb, s-pack52.ads, s-pack53.adb, s-pack53.ads, s-pack54.adb, s-pack54.ads, s-pack55.adb, s-pack55.ads, s-pack56.adb, s-pack56.ads, s-pack57.adb, s-pack57.ads, s-pack58.adb, s-pack58.ads, s-pack59.adb, s-pack59.ads, s-pack60.adb, s-pack60.ads, s-pack61.adb, s-pack61.ads, s-pack62.adb, s-pack62.ads, s-pack63.adb, s-pack63.ads, s-parame.adb, s-parame.ads, s-parint.adb, s-parint.ads, s-pooglo.adb, s-pooglo.ads, s-pooloc.adb, s-pooloc.ads, s-poosiz.adb, s-poosiz.ads, s-powtab.ads, s-proinf.adb, s-proinf.ads, s-rpc.adb, s-rpc.ads, s-scaval.ads, s-secsta.adb, s-secsta.ads, s-sequio.adb, s-sequio.ads, s-shasto.adb, s-shasto.ads, s-soflin.adb, s-soflin.ads, s-sopco3.adb, s-sopco3.ads, s-sopco4.adb, s-sopco4.ads, s-sopco5.adb, s-sopco5.ads, s-stache.adb, s-stache.ads, s-stalib.adb, s-stalib.ads, s-stoele.adb, s-stoele.ads, s-stopoo.ads, s-stratt.adb, s-stratt.ads, s-strops.adb, s-strops.ads, s-taasde.adb, s-taasde.ads, s-tadeca.adb, s-tadeca.ads, s-tadert.adb, s-tadert.ads, s-taenca.adb, s-taenca.ads, s-taprob.adb, s-taprob.ads, s-taprop.ads, s-tarest.adb, s-tarest.ads, s-tasdeb.adb, s-tasdeb.ads, s-tasinf.adb, s-tasinf.ads, s-tasini.adb, s-tasini.ads, s-taskin.adb, s-taskin.ads, s-tasque.adb, s-tasque.ads, s-tasren.adb, s-tasren.ads, s-tasres.ads, s-tassta.adb, s-tassta.ads, s-tasuti.adb, s-tasuti.ads, s-tataat.adb, s-tataat.ads, s-tpinop.adb, s-tpinop.ads, s-tpoben.adb, s-tpoben.ads, s-tpobop.adb, s-tpobop.ads, s-tposen.adb, s-tposen.ads, s-traceb.adb, s-traceb.ads, s-traces.adb, s-traces.ads, s-tratas.adb, s-tratas.ads, s-unstyp.ads, s-vaflop.adb, s-vaflop.ads, s-valboo.adb, s-valboo.ads, s-valcha.adb, s-valcha.ads, s-valdec.adb, s-valdec.ads, s-valenu.adb, s-valenu.ads, s-valint.adb, s-valint.ads, s-vallld.adb, s-vallld.ads, s-vallli.adb, s-vallli.ads, s-valllu.adb, s-valllu.ads, s-valrea.adb, s-valrea.ads, s-valuns.adb, s-valuns.ads, s-valuti.adb, s-valuti.ads, s-valwch.adb, s-valwch.ads, s-vercon.adb, s-vercon.ads, s-vmexta.adb, s-vmexta.ads, s-wchcnv.adb, s-wchcnv.ads, s-wchcon.ads, s-wchjis.adb, s-wchjis.ads, s-wchstw.adb, s-wchstw.ads, s-wchwts.adb, s-wchwts.ads, s-widboo.adb, s-widboo.ads, s-widcha.adb, s-widcha.ads, s-widenu.adb, s-widenu.ads, s-widlli.adb, s-widlli.ads, s-widllu.adb, s-widllu.ads, s-widwch.adb, s-widwch.ads, s-wwdcha.adb, s-wwdcha.ads, s-wwdenu.adb, s-wwdenu.ads, s-wwdwch.adb, s-wwdwch.ads, scans.adb, scans.ads, scn-nlit.adb, scn-slit.adb, scn.adb, scn.ads, sdefault.ads, sem.adb, sem.ads, sem_aggr.adb, sem_aggr.ads, sem_attr.adb, sem_attr.ads, sem_case.adb, sem_case.ads, sem_cat.adb, sem_cat.ads, sem_ch10.adb, sem_ch10.ads, sem_ch11.adb, sem_ch11.ads, sem_ch12.adb, sem_ch12.ads, sem_ch13.adb, sem_ch13.ads, sem_ch2.adb, sem_ch2.ads, sem_ch3.adb, sem_ch3.ads, sem_ch4.adb, sem_ch4.ads, sem_ch5.adb, sem_ch5.ads, sem_ch6.adb, sem_ch6.ads, sem_ch7.adb, sem_ch7.ads, sem_ch8.adb, sem_ch8.ads, sem_ch9.adb, sem_ch9.ads, sem_disp.adb, sem_disp.ads, sem_dist.adb, sem_dist.ads, sem_elab.adb, sem_elab.ads, sem_elim.adb, sem_elim.ads, sem_eval.adb, sem_eval.ads, sem_intr.adb, sem_intr.ads, sem_maps.adb, sem_maps.ads, sem_mech.adb, sem_mech.ads, sem_prag.adb, sem_prag.ads, sem_res.adb, sem_res.ads, sem_smem.adb, sem_smem.ads, sem_type.adb, sem_type.ads, sem_util.adb, sem_util.ads, sem_vfpt.adb, sem_vfpt.ads, sem_warn.adb, sem_warn.ads, sequenio.ads, sfn_scan.adb, sfn_scan.ads, sinfo-cn.adb, sinfo-cn.ads, sinfo.adb, sinfo.ads, sinput-d.adb, sinput-d.ads, sinput-l.adb, sinput-l.ads, sinput-p.adb, sinput-p.ads, sinput.adb, sinput.ads, snames.adb, snames.ads, sprint.adb, sprint.ads, stand.adb, stand.ads, stringt.adb, stringt.ads, style.adb, style.ads, stylesw.adb, stylesw.ads, switch-b.adb, switch-b.ads, switch-c.adb, switch-c.ads, switch-m.adb, switch-m.ads, switch.adb, switch.ads, system.ads, table.adb, table.ads, targparm.adb, targparm.ads, tbuild.adb, tbuild.ads, text_io.ads, trans.c, tree_gen.adb, tree_gen.ads, tree_in.adb, tree_in.ads, tree_io.adb, tree_io.ads, treepr.adb, treepr.ads, ttypef.ads, ttypes.ads, types.adb, types.ads, uintp.adb, uintp.ads, uname.adb, uname.ads, unchconv.ads, unchdeal.ads, urealp.adb, urealp.ads, usage.adb, usage.ads, validsw.adb, validsw.ads, widechar.adb, widechar.ads, xeinfo.adb, xnmake.adb, xr_tabls.adb, xr_tabls.ads, xref_lib.adb, xref_lib.ads, xsinfo.adb, xsnames.adb, xtreeprs.adb : Merge header, formatting and other trivial changes from ACT. From-SVN: r66044 --- gcc/ada/1aexcept.adb | 1 - gcc/ada/1aexcept.ads | 3 +- gcc/ada/1ic.ads | 1 - gcc/ada/1ssecsta.adb | 1 - gcc/ada/1ssecsta.ads | 5 +- gcc/ada/31soccon.ads | 1 - gcc/ada/31soliop.ads | 3 +- gcc/ada/3asoccon.ads | 1 - gcc/ada/3bsoccon.ads | 1 - gcc/ada/3gsoccon.ads | 1 - gcc/ada/3hsoccon.ads | 1 - gcc/ada/3ssoccon.ads | 1 - gcc/ada/3ssoliop.ads | 1 - gcc/ada/3wsoccon.ads | 1 - gcc/ada/3wsocthi.adb | 1 - gcc/ada/3wsocthi.ads | 1 - gcc/ada/3wsoliop.ads | 1 - gcc/ada/41intnam.ads | 1 - gcc/ada/42intnam.ads | 1 - gcc/ada/4aintnam.ads | 1 - gcc/ada/4cintnam.ads | 1 - gcc/ada/4dintnam.ads | 1 - gcc/ada/4gintnam.ads | 1 - gcc/ada/4hexcpol.adb | 1 - gcc/ada/4hintnam.ads | 1 - gcc/ada/4lintnam.ads | 1 - gcc/ada/4mintnam.ads | 1 - gcc/ada/4nintnam.ads | 3 +- gcc/ada/4ointnam.ads | 1 - gcc/ada/4onumaux.ads | 1 - gcc/ada/4pintnam.ads | 1 - gcc/ada/4rintnam.ads | 1 - gcc/ada/4sintnam.ads | 1 - gcc/ada/4uintnam.ads | 1 - gcc/ada/4vcaldel.adb | 1 - gcc/ada/4vcalend.adb | 1 - gcc/ada/4vcalend.ads | 29 +++- gcc/ada/4vintnam.ads | 3 +- gcc/ada/4wcalend.adb | 5 +- gcc/ada/4wexcpol.adb | 1 - gcc/ada/4wintnam.ads | 1 - gcc/ada/4zintnam.ads | 1 - gcc/ada/4znumaux.ads | 3 +- gcc/ada/4zsytaco.adb | 30 ++-- gcc/ada/4zsytaco.ads | 1 - gcc/ada/51osinte.adb | 25 +-- gcc/ada/51osinte.ads | 1 - gcc/ada/52osinte.adb | 15 +- gcc/ada/52osinte.ads | 1 - gcc/ada/52system.ads | 1 - gcc/ada/53osinte.ads | 8 +- gcc/ada/54osinte.ads | 5 +- gcc/ada/5amastop.adb | 20 ++- gcc/ada/5aosinte.adb | 40 +++-- gcc/ada/5aosinte.ads | 5 +- gcc/ada/5asystem.ads | 6 +- gcc/ada/5ataprop.adb | 1 - gcc/ada/5atasinf.ads | 1 - gcc/ada/5ataspri.ads | 1 - gcc/ada/5atpopsp.adb | 1 - gcc/ada/5avxwork.ads | 1 - gcc/ada/5bosinte.adb | 1 - gcc/ada/5bosinte.ads | 1 - gcc/ada/5bsystem.ads | 6 +- gcc/ada/5cosinte.ads | 1 - gcc/ada/5dosinte.ads | 1 - gcc/ada/5esystem.ads | 8 +- gcc/ada/5etpopse.adb | 1 - gcc/ada/5fintman.adb | 1 - gcc/ada/5fosinte.ads | 1 - gcc/ada/5fsystem.ads | 6 +- gcc/ada/5ftaprop.adb | 1 - gcc/ada/5ftasinf.ads | 1 - gcc/ada/5ginterr.adb | 1 - gcc/ada/5gintman.adb | 1 - gcc/ada/5gmastop.adb | 1 - gcc/ada/5gosinte.ads | 1 - gcc/ada/5gproinf.adb | 1 - gcc/ada/5gproinf.ads | 1 - gcc/ada/5gsystem.ads | 1 - gcc/ada/5gtaprop.adb | 1 - gcc/ada/5gtasinf.adb | 1 - gcc/ada/5gtasinf.ads | 1 - gcc/ada/5gtpgetc.adb | 1 - gcc/ada/5hosinte.adb | 1 - gcc/ada/5hosinte.ads | 1 - gcc/ada/5hparame.ads | 8 +- gcc/ada/5hsystem.ads | 15 +- gcc/ada/5htaprop.adb | 1 - gcc/ada/5htaspri.ads | 1 - gcc/ada/5htraceb.adb | 3 +- gcc/ada/5iosinte.adb | 15 +- gcc/ada/5iosinte.ads | 1 - gcc/ada/5itaprop.adb | 76 ++++++--- gcc/ada/5itaspri.ads | 1 - gcc/ada/5ksystem.ads | 6 +- gcc/ada/5kvxwork.ads | 1 - gcc/ada/5lintman.adb | 1 - gcc/ada/5lml-tgt.adb | 1 - gcc/ada/5losinte.ads | 1 - gcc/ada/5lsystem.ads | 7 +- gcc/ada/5mosinte.ads | 1 - gcc/ada/5mvxwork.ads | 1 - gcc/ada/5ninmaop.adb | 1 - gcc/ada/5nintman.adb | 5 +- gcc/ada/5nosinte.ads | 1 - gcc/ada/5ntaprop.adb | 20 ++- gcc/ada/5ntaspri.ads | 1 - gcc/ada/5ointerr.adb | 25 +-- gcc/ada/5omastop.adb | 3 +- gcc/ada/5oosinte.adb | 3 +- gcc/ada/5oosinte.ads | 1 - gcc/ada/5oosprim.adb | 1 - gcc/ada/5oparame.adb | 1 - gcc/ada/5osystem.ads | 6 +- gcc/ada/5otaprop.adb | 1 - gcc/ada/5otaspri.ads | 1 - gcc/ada/5posinte.ads | 1 - gcc/ada/5posprim.adb | 1 - gcc/ada/5pvxwork.ads | 1 - gcc/ada/5qosinte.adb | 1 - gcc/ada/5qosinte.ads | 1 - gcc/ada/5qstache.adb | 1 - gcc/ada/5qtaprop.adb | 1 - gcc/ada/5qtaspri.ads | 1 - gcc/ada/5rosinte.adb | 22 +-- gcc/ada/5rosinte.ads | 3 +- gcc/ada/5rparame.adb | 1 - gcc/ada/5sintman.adb | 1 - gcc/ada/5sosinte.adb | 13 +- gcc/ada/5sosinte.ads | 10 +- gcc/ada/5sparame.adb | 1 - gcc/ada/5ssystem.ads | 10 +- gcc/ada/5staprop.adb | 1 - gcc/ada/5stasinf.adb | 9 +- gcc/ada/5stasinf.ads | 1 - gcc/ada/5staspri.ads | 1 - gcc/ada/5stpopse.adb | 1 - gcc/ada/5svxwork.ads | 1 - gcc/ada/5tosinte.ads | 1 - gcc/ada/5uintman.adb | 1 - gcc/ada/5uosinte.ads | 1 - gcc/ada/5vasthan.adb | 1 - gcc/ada/5vinmaop.adb | 1 - gcc/ada/5vinterr.adb | 1 - gcc/ada/5vintman.adb | 10 +- gcc/ada/5vintman.ads | 1 - gcc/ada/5vmastop.adb | 1 - gcc/ada/5vosinte.adb | 26 +++- gcc/ada/5vosinte.ads | 6 +- gcc/ada/5vosprim.adb | 9 +- gcc/ada/5vosprim.ads | 11 +- gcc/ada/5vparame.ads | 6 +- gcc/ada/5vsystem.ads | 8 +- gcc/ada/5vtaprop.adb | 1 - gcc/ada/5vtaspri.ads | 1 - gcc/ada/5vtpopde.adb | 1 - gcc/ada/5vtpopde.ads | 6 +- gcc/ada/5vvaflop.adb | 1 - gcc/ada/5wgloloc.adb | 1 - gcc/ada/5wintman.adb | 1 - gcc/ada/5wmemory.adb | 5 +- gcc/ada/5wosinte.ads | 12 +- gcc/ada/5wosprim.adb | 1 - gcc/ada/5wsystem.ads | 1 - gcc/ada/5wtaprop.adb | 1 - gcc/ada/5wtaspri.ads | 1 - gcc/ada/5ysystem.ads | 1 - gcc/ada/5zinterr.adb | 1 - gcc/ada/5zintman.adb | 1 - gcc/ada/5zosinte.adb | 1 - gcc/ada/5zosinte.ads | 1 - gcc/ada/5zosprim.adb | 1 - gcc/ada/5zsystem.ads | 1 - gcc/ada/5ztaprop.adb | 1 - gcc/ada/6vcpp.adb | 1 - gcc/ada/6vcstrea.adb | 1 - gcc/ada/6vinterf.ads | 1 - gcc/ada/7sinmaop.adb | 1 - gcc/ada/7sintman.adb | 1 - gcc/ada/7sosinte.adb | 1 - gcc/ada/7sosprim.adb | 1 - gcc/ada/7staprop.adb | 1 - gcc/ada/7staspri.ads | 1 - gcc/ada/7stpopsp.adb | 1 - gcc/ada/7straceb.adb | 1 - gcc/ada/86numaux.adb | 1 - gcc/ada/86numaux.ads | 1 - gcc/ada/9drpc.adb | 1 - gcc/ada/ChangeLog | 337 ++++++++++++++++++++++++++++++++++++++++ gcc/ada/a-astaco.adb | 1 - gcc/ada/a-astaco.ads | 1 - gcc/ada/a-caldel.adb | 1 - gcc/ada/a-caldel.ads | 1 - gcc/ada/a-calend.adb | 1 - gcc/ada/a-calend.ads | 1 - gcc/ada/a-chahan.adb | 1 - gcc/ada/a-chahan.ads | 1 - gcc/ada/a-charac.ads | 1 - gcc/ada/a-chlat1.ads | 1 - gcc/ada/a-chlat9.ads | 1 - gcc/ada/a-colien.adb | 1 - gcc/ada/a-colien.ads | 1 - gcc/ada/a-colire.adb | 1 - gcc/ada/a-colire.ads | 1 - gcc/ada/a-comlin.adb | 1 - gcc/ada/a-comlin.ads | 1 - gcc/ada/a-cwila1.ads | 1 - gcc/ada/a-cwila9.ads | 1 - gcc/ada/a-decima.adb | 1 - gcc/ada/a-decima.ads | 1 - gcc/ada/a-diocst.adb | 1 - gcc/ada/a-diocst.ads | 1 - gcc/ada/a-direio.adb | 1 - gcc/ada/a-direio.ads | 1 - gcc/ada/a-dynpri.adb | 1 - gcc/ada/a-dynpri.ads | 1 - gcc/ada/a-einuoc.adb | 1 - gcc/ada/a-einuoc.ads | 1 - gcc/ada/a-except.adb | 1 - gcc/ada/a-except.ads | 1 - gcc/ada/a-excpol.adb | 1 - gcc/ada/a-exctra.adb | 1 - gcc/ada/a-exctra.ads | 1 - gcc/ada/a-filico.adb | 1 - gcc/ada/a-filico.ads | 1 - gcc/ada/a-finali.adb | 1 - gcc/ada/a-finali.ads | 1 - gcc/ada/a-flteio.ads | 1 - gcc/ada/a-fwteio.ads | 1 - gcc/ada/a-inteio.ads | 1 - gcc/ada/a-interr.adb | 1 - gcc/ada/a-interr.ads | 1 - gcc/ada/a-intnam.ads | 1 - gcc/ada/a-intsig.adb | 1 - gcc/ada/a-intsig.ads | 1 - gcc/ada/a-ioexce.ads | 1 - gcc/ada/a-iwteio.ads | 1 - gcc/ada/a-lfteio.ads | 1 - gcc/ada/a-lfwtio.ads | 1 - gcc/ada/a-liteio.ads | 1 - gcc/ada/a-liwtio.ads | 1 - gcc/ada/a-llftio.ads | 1 - gcc/ada/a-llfwti.ads | 1 - gcc/ada/a-llitio.ads | 1 - gcc/ada/a-lliwti.ads | 1 - gcc/ada/a-ncelfu.ads | 1 - gcc/ada/a-ngcefu.adb | 1 - gcc/ada/a-ngcefu.ads | 1 - gcc/ada/a-ngcoty.adb | 1 - gcc/ada/a-ngcoty.ads | 1 - gcc/ada/a-ngelfu.adb | 1 - gcc/ada/a-ngelfu.ads | 1 - gcc/ada/a-nlcefu.ads | 1 - gcc/ada/a-nlcoty.ads | 1 - gcc/ada/a-nlelfu.ads | 1 - gcc/ada/a-nllcef.ads | 1 - gcc/ada/a-nllcty.ads | 1 - gcc/ada/a-nllefu.ads | 1 - gcc/ada/a-nscefu.ads | 1 - gcc/ada/a-nscoty.ads | 1 - gcc/ada/a-nselfu.ads | 1 - gcc/ada/a-nucoty.ads | 1 - gcc/ada/a-nudira.adb | 1 - gcc/ada/a-nudira.ads | 1 - gcc/ada/a-nuelfu.ads | 1 - gcc/ada/a-nuflra.adb | 1 - gcc/ada/a-nuflra.ads | 1 - gcc/ada/a-numaux.ads | 1 - gcc/ada/a-numeri.ads | 1 - gcc/ada/a-reatim.adb | 1 - gcc/ada/a-reatim.ads | 1 - gcc/ada/a-retide.adb | 1 - gcc/ada/a-retide.ads | 1 - gcc/ada/a-sequio.adb | 1 - gcc/ada/a-sequio.ads | 1 - gcc/ada/a-sfteio.ads | 1 - gcc/ada/a-sfwtio.ads | 1 - gcc/ada/a-siocst.adb | 1 - gcc/ada/a-siocst.ads | 1 - gcc/ada/a-siteio.ads | 1 - gcc/ada/a-siwtio.ads | 1 - gcc/ada/a-ssicst.adb | 1 - gcc/ada/a-ssicst.ads | 1 - gcc/ada/a-ssitio.ads | 1 - gcc/ada/a-ssiwti.ads | 1 - gcc/ada/a-stmaco.ads | 1 - gcc/ada/a-storio.adb | 1 - gcc/ada/a-storio.ads | 1 - gcc/ada/a-strbou.adb | 1 - gcc/ada/a-strbou.ads | 1 - gcc/ada/a-stream.ads | 1 - gcc/ada/a-strfix.adb | 1 - gcc/ada/a-strfix.ads | 1 - gcc/ada/a-string.ads | 1 - gcc/ada/a-strmap.adb | 1 - gcc/ada/a-strmap.ads | 1 - gcc/ada/a-strsea.adb | 1 - gcc/ada/a-strsea.ads | 2 - gcc/ada/a-strunb.adb | 1 - gcc/ada/a-strunb.ads | 1 - gcc/ada/a-ststio.adb | 1 - gcc/ada/a-ststio.ads | 1 - gcc/ada/a-stunau.adb | 1 - gcc/ada/a-stunau.ads | 1 - gcc/ada/a-stwibo.adb | 1 - gcc/ada/a-stwibo.ads | 1 - gcc/ada/a-stwifi.adb | 1 - gcc/ada/a-stwifi.ads | 1 - gcc/ada/a-stwima.adb | 1 - gcc/ada/a-stwima.ads | 1 - gcc/ada/a-stwise.adb | 1 - gcc/ada/a-stwise.ads | 1 - gcc/ada/a-stwiun.adb | 1 - gcc/ada/a-stwiun.ads | 1 - gcc/ada/a-suteio.adb | 1 - gcc/ada/a-suteio.ads | 1 - gcc/ada/a-swmwco.ads | 1 - gcc/ada/a-swuwti.adb | 1 - gcc/ada/a-swuwti.ads | 1 - gcc/ada/a-sytaco.adb | 1 - gcc/ada/a-sytaco.ads | 1 - gcc/ada/a-tags.adb | 1 - gcc/ada/a-tags.ads | 1 - gcc/ada/a-tasatt.adb | 1 - gcc/ada/a-tasatt.ads | 1 - gcc/ada/a-taside.adb | 1 - gcc/ada/a-taside.ads | 1 - gcc/ada/a-teioed.adb | 1 - gcc/ada/a-teioed.ads | 1 - gcc/ada/a-textio.adb | 1 - gcc/ada/a-textio.ads | 1 - gcc/ada/a-ticoau.adb | 1 - gcc/ada/a-ticoau.ads | 1 - gcc/ada/a-ticoio.adb | 1 - gcc/ada/a-ticoio.ads | 1 - gcc/ada/a-tideau.adb | 1 - gcc/ada/a-tideau.ads | 1 - gcc/ada/a-tideio.adb | 1 - gcc/ada/a-tideio.ads | 1 - gcc/ada/a-tienau.adb | 1 - gcc/ada/a-tienau.ads | 1 - gcc/ada/a-tienio.adb | 1 - gcc/ada/a-tienio.ads | 1 - gcc/ada/a-tifiio.adb | 1 - gcc/ada/a-tifiio.ads | 1 - gcc/ada/a-tiflau.adb | 1 - gcc/ada/a-tiflau.ads | 1 - gcc/ada/a-tiflio.adb | 1 - gcc/ada/a-tiflio.ads | 1 - gcc/ada/a-tigeau.adb | 1 - gcc/ada/a-tigeau.ads | 1 - gcc/ada/a-tiinau.adb | 1 - gcc/ada/a-tiinau.ads | 1 - gcc/ada/a-tiinio.adb | 1 - gcc/ada/a-tiinio.ads | 1 - gcc/ada/a-timoau.adb | 1 - gcc/ada/a-timoau.ads | 1 - gcc/ada/a-timoio.adb | 1 - gcc/ada/a-timoio.ads | 1 - gcc/ada/a-tiocst.adb | 1 - gcc/ada/a-tiocst.ads | 1 - gcc/ada/a-titest.adb | 1 - gcc/ada/a-titest.ads | 1 - gcc/ada/a-unccon.ads | 1 - gcc/ada/a-uncdea.ads | 1 - gcc/ada/a-witeio.adb | 1 - gcc/ada/a-witeio.ads | 1 - gcc/ada/a-wtcoau.adb | 1 - gcc/ada/a-wtcoau.ads | 1 - gcc/ada/a-wtcoio.adb | 1 - gcc/ada/a-wtcoio.ads | 1 - gcc/ada/a-wtcstr.adb | 1 - gcc/ada/a-wtcstr.ads | 1 - gcc/ada/a-wtdeau.adb | 1 - gcc/ada/a-wtdeau.ads | 1 - gcc/ada/a-wtdeio.adb | 1 - gcc/ada/a-wtdeio.ads | 1 - gcc/ada/a-wtedit.adb | 1 - gcc/ada/a-wtedit.ads | 1 - gcc/ada/a-wtenau.adb | 1 - gcc/ada/a-wtenau.ads | 1 - gcc/ada/a-wtenio.adb | 1 - gcc/ada/a-wtenio.ads | 1 - gcc/ada/a-wtfiio.adb | 1 - gcc/ada/a-wtfiio.ads | 1 - gcc/ada/a-wtflau.adb | 1 - gcc/ada/a-wtflau.ads | 1 - gcc/ada/a-wtflio.adb | 1 - gcc/ada/a-wtflio.ads | 1 - gcc/ada/a-wtgeau.adb | 1 - gcc/ada/a-wtgeau.ads | 1 - gcc/ada/a-wtinau.adb | 1 - gcc/ada/a-wtinau.ads | 1 - gcc/ada/a-wtinio.adb | 1 - gcc/ada/a-wtinio.ads | 1 - gcc/ada/a-wtmoau.adb | 1 - gcc/ada/a-wtmoau.ads | 1 - gcc/ada/a-wtmoio.adb | 1 - gcc/ada/a-wtmoio.ads | 1 - gcc/ada/a-wttest.adb | 1 - gcc/ada/a-wttest.ads | 1 - gcc/ada/ada-tree.h | 5 +- gcc/ada/ada.ads | 1 - gcc/ada/ada.h | 7 +- gcc/ada/adadecode.c | 1 - gcc/ada/adadecode.h | 1 - gcc/ada/ali-util.adb | 3 +- gcc/ada/ali-util.ads | 1 - gcc/ada/ali.adb | 1 - gcc/ada/ali.ads | 1 - gcc/ada/alloc.ads | 3 +- gcc/ada/argv.c | 12 +- gcc/ada/atree.adb | 1 - gcc/ada/atree.ads | 1 - gcc/ada/atree.h | 1 - gcc/ada/aux-io.c | 1 - gcc/ada/back_end.adb | 9 +- gcc/ada/back_end.ads | 1 - gcc/ada/bcheck.adb | 1 - gcc/ada/bcheck.ads | 1 - gcc/ada/binde.adb | 1 - gcc/ada/binde.ads | 1 - gcc/ada/binderr.adb | 22 ++- gcc/ada/binderr.ads | 13 +- gcc/ada/bindgen.adb | 1 - gcc/ada/bindgen.ads | 1 - gcc/ada/bindusg.adb | 5 +- gcc/ada/bindusg.ads | 1 - gcc/ada/butil.adb | 1 - gcc/ada/butil.ads | 1 - gcc/ada/cal.c | 10 +- gcc/ada/calendar.ads | 1 - gcc/ada/casing.adb | 1 - gcc/ada/casing.ads | 1 - gcc/ada/ceinfo.adb | 1 - gcc/ada/checks.adb | 1 - gcc/ada/checks.ads | 1 - gcc/ada/cio.c | 38 +---- gcc/ada/comperr.adb | 10 +- gcc/ada/comperr.ads | 1 - gcc/ada/config-lang.in | 2 +- gcc/ada/csets.adb | 1 - gcc/ada/csets.ads | 1 - gcc/ada/csinfo.adb | 1 - gcc/ada/cstand.adb | 1 - gcc/ada/cstand.ads | 1 - gcc/ada/cuintp.c | 3 +- gcc/ada/debug.adb | 1 - gcc/ada/debug.ads | 1 - gcc/ada/debug_a.adb | 1 - gcc/ada/debug_a.ads | 1 - gcc/ada/dec-io.adb | 1 - gcc/ada/dec-io.ads | 1 - gcc/ada/dec.ads | 1 - gcc/ada/deftarg.c | 3 +- gcc/ada/directio.ads | 1 - gcc/ada/einfo.adb | 1 - gcc/ada/einfo.ads | 1 - gcc/ada/elists.adb | 1 - gcc/ada/elists.ads | 1 - gcc/ada/elists.h | 1 - gcc/ada/errno.c | 1 - gcc/ada/errout.adb | 1 - gcc/ada/errout.ads | 1 - gcc/ada/eval_fat.adb | 11 +- gcc/ada/eval_fat.ads | 1 - gcc/ada/exit.c | 1 - gcc/ada/exp_aggr.adb | 1 - gcc/ada/exp_aggr.ads | 4 +- gcc/ada/exp_attr.adb | 1 - gcc/ada/exp_attr.ads | 1 - gcc/ada/exp_ch10.ads | 1 - gcc/ada/exp_ch11.adb | 1 - gcc/ada/exp_ch11.ads | 1 - gcc/ada/exp_ch12.adb | 1 - gcc/ada/exp_ch12.ads | 1 - gcc/ada/exp_ch13.adb | 1 - gcc/ada/exp_ch13.ads | 1 - gcc/ada/exp_ch2.adb | 1 - gcc/ada/exp_ch2.ads | 1 - gcc/ada/exp_ch3.adb | 1 - gcc/ada/exp_ch3.ads | 1 - gcc/ada/exp_ch4.adb | 1 - gcc/ada/exp_ch4.ads | 1 - gcc/ada/exp_ch5.adb | 1 - gcc/ada/exp_ch5.ads | 1 - gcc/ada/exp_ch6.adb | 1 - gcc/ada/exp_ch6.ads | 1 - gcc/ada/exp_ch7.adb | 1 - gcc/ada/exp_ch7.ads | 1 - gcc/ada/exp_ch8.adb | 1 - gcc/ada/exp_ch8.ads | 1 - gcc/ada/exp_ch9.adb | 1 - gcc/ada/exp_ch9.ads | 1 - gcc/ada/exp_code.adb | 3 +- gcc/ada/exp_code.ads | 1 - gcc/ada/exp_dbug.adb | 1 - gcc/ada/exp_dbug.ads | 1 - gcc/ada/exp_disp.adb | 1 - gcc/ada/exp_disp.ads | 1 - gcc/ada/exp_dist.adb | 1 - gcc/ada/exp_dist.ads | 1 - gcc/ada/exp_fixd.adb | 1 - gcc/ada/exp_fixd.ads | 1 - gcc/ada/exp_imgv.adb | 1 - gcc/ada/exp_imgv.ads | 1 - gcc/ada/exp_intr.adb | 1 - gcc/ada/exp_intr.ads | 1 - gcc/ada/exp_pakd.adb | 1 - gcc/ada/exp_pakd.ads | 1 - gcc/ada/exp_prag.adb | 1 - gcc/ada/exp_prag.ads | 1 - gcc/ada/exp_smem.adb | 1 - gcc/ada/exp_smem.ads | 1 - gcc/ada/exp_strm.adb | 1 - gcc/ada/exp_strm.ads | 1 - gcc/ada/exp_tss.adb | 1 - gcc/ada/exp_tss.ads | 5 +- gcc/ada/exp_util.adb | 1 - gcc/ada/exp_util.ads | 1 - gcc/ada/exp_vfpt.adb | 5 +- gcc/ada/exp_vfpt.ads | 1 - gcc/ada/expander.adb | 1 - gcc/ada/expander.ads | 6 +- gcc/ada/fmap.adb | 1 - gcc/ada/fmap.ads | 1 - gcc/ada/fname-sf.adb | 1 - gcc/ada/fname-sf.ads | 1 - gcc/ada/fname-uf.adb | 3 +- gcc/ada/fname-uf.ads | 1 - gcc/ada/fname.adb | 5 +- gcc/ada/fname.ads | 1 - gcc/ada/freeze.adb | 1 - gcc/ada/freeze.ads | 1 - gcc/ada/frontend.adb | 1 - gcc/ada/frontend.ads | 1 - gcc/ada/g-awk.adb | 1 - gcc/ada/g-awk.ads | 1 - gcc/ada/g-busora.adb | 1 - gcc/ada/g-busora.ads | 1 - gcc/ada/g-busorg.adb | 1 - gcc/ada/g-busorg.ads | 1 - gcc/ada/g-calend.adb | 3 +- gcc/ada/g-calend.ads | 1 - gcc/ada/g-casuti.adb | 1 - gcc/ada/g-casuti.ads | 1 - gcc/ada/g-catiio.adb | 1 - gcc/ada/g-catiio.ads | 3 +- gcc/ada/g-cgi.adb | 1 - gcc/ada/g-cgi.ads | 3 +- gcc/ada/g-cgicoo.adb | 1 - gcc/ada/g-cgicoo.ads | 1 - gcc/ada/g-cgideb.adb | 1 - gcc/ada/g-cgideb.ads | 1 - gcc/ada/g-comlin.adb | 12 +- gcc/ada/g-comlin.ads | 1 - gcc/ada/g-crc32.adb | 5 +- gcc/ada/g-crc32.ads | 1 - gcc/ada/g-curexc.ads | 3 +- gcc/ada/g-debpoo.adb | 1 - gcc/ada/g-debpoo.ads | 1 - gcc/ada/g-debuti.adb | 6 +- gcc/ada/g-debuti.ads | 1 - gcc/ada/g-diopit.adb | 1 - gcc/ada/g-diopit.ads | 1 - gcc/ada/g-dirope.adb | 1 - gcc/ada/g-dirope.ads | 1 - gcc/ada/g-dyntab.adb | 1 - gcc/ada/g-dyntab.ads | 3 +- gcc/ada/g-enblsp.adb | 1 - gcc/ada/g-except.ads | 1 - gcc/ada/g-exctra.adb | 5 +- gcc/ada/g-exctra.ads | 5 +- gcc/ada/g-expect.adb | 1 - gcc/ada/g-expect.ads | 1 - gcc/ada/g-flocon.ads | 3 +- gcc/ada/g-hesora.adb | 1 - gcc/ada/g-hesora.ads | 1 - gcc/ada/g-hesorg.adb | 1 - gcc/ada/g-hesorg.ads | 1 - gcc/ada/g-htable.adb | 1 - gcc/ada/g-htable.ads | 1 - gcc/ada/g-io.adb | 5 +- gcc/ada/g-io.ads | 5 +- gcc/ada/g-io_aux.adb | 1 - gcc/ada/g-io_aux.ads | 1 - gcc/ada/g-locfil.ads | 1 - gcc/ada/g-md5.adb | 1 - gcc/ada/g-md5.ads | 1 - gcc/ada/g-moreex.adb | 3 +- gcc/ada/g-moreex.ads | 3 +- gcc/ada/g-os_lib.adb | 1 - gcc/ada/g-os_lib.ads | 1 - gcc/ada/g-regexp.adb | 24 ++- gcc/ada/g-regexp.ads | 7 +- gcc/ada/g-regist.ads | 1 - gcc/ada/g-regpat.adb | 1 - gcc/ada/g-regpat.ads | 1 - gcc/ada/g-soccon.ads | 1 - gcc/ada/g-socket.adb | 1 - gcc/ada/g-socket.ads | 1 - gcc/ada/g-socthi.adb | 1 - gcc/ada/g-socthi.ads | 1 - gcc/ada/g-soliop.ads | 1 - gcc/ada/g-souinf.ads | 1 - gcc/ada/g-speche.adb | 1 - gcc/ada/g-speche.ads | 1 - gcc/ada/g-spipat.adb | 1 - gcc/ada/g-spipat.ads | 1 - gcc/ada/g-spitbo.adb | 7 +- gcc/ada/g-spitbo.ads | 1 - gcc/ada/g-sptabo.ads | 1 - gcc/ada/g-sptain.ads | 1 - gcc/ada/g-sptavs.ads | 1 - gcc/ada/g-table.adb | 40 +---- gcc/ada/g-table.ads | 1 - gcc/ada/g-tasloc.adb | 1 - gcc/ada/g-tasloc.ads | 19 ++- gcc/ada/g-thread.adb | 1 - gcc/ada/g-thread.ads | 1 - gcc/ada/g-traceb.adb | 1 - gcc/ada/g-traceb.ads | 1 - gcc/ada/g-trasym.adb | 1 - gcc/ada/g-trasym.ads | 7 +- gcc/ada/get_targ.adb | 12 +- gcc/ada/get_targ.ads | 12 +- gcc/ada/gnat-style.texi | 54 +++---- gcc/ada/gnat.ads | 3 +- gcc/ada/gnat1drv.adb | 1 - gcc/ada/gnat1drv.ads | 1 - gcc/ada/gnatbind.adb | 1 - gcc/ada/gnatbind.ads | 1 - gcc/ada/gnatbl.c | 1 - gcc/ada/gnatchop.adb | 1 - gcc/ada/gnatcmd.adb | 1 - gcc/ada/gnatcmd.ads | 1 - gcc/ada/gnatdll.adb | 1 - gcc/ada/gnatfind.adb | 1 - gcc/ada/gnatkr.adb | 1 - gcc/ada/gnatkr.ads | 1 - gcc/ada/gnatlbr.adb | 1 - gcc/ada/gnatlink.adb | 1 - gcc/ada/gnatlink.ads | 1 - gcc/ada/gnatls.adb | 1 - gcc/ada/gnatls.ads | 1 - gcc/ada/gnatmake.adb | 1 - gcc/ada/gnatmake.ads | 1 - gcc/ada/gnatmem.adb | 1 - gcc/ada/gnatname.adb | 1 - gcc/ada/gnatname.ads | 1 - gcc/ada/gnatprep.adb | 1 - gcc/ada/gnatprep.ads | 1 - gcc/ada/gnatpsta.adb | 1 - gcc/ada/gnatvsn.adb | 1 - gcc/ada/gnatvsn.ads | 1 - gcc/ada/gnatxref.adb | 1 - gcc/ada/hlo.adb | 1 - gcc/ada/hlo.ads | 1 - gcc/ada/hostparm.ads | 1 - gcc/ada/i-c.adb | 1 - gcc/ada/i-c.ads | 1 - gcc/ada/i-cexten.ads | 1 - gcc/ada/i-cobol.adb | 1 - gcc/ada/i-cobol.ads | 1 - gcc/ada/i-cpoint.adb | 1 - gcc/ada/i-cpoint.ads | 1 - gcc/ada/i-cpp.adb | 1 - gcc/ada/i-cpp.ads | 1 - gcc/ada/i-cstrea.adb | 1 - gcc/ada/i-cstrea.ads | 1 - gcc/ada/i-cstrin.adb | 1 - gcc/ada/i-cstrin.ads | 1 - gcc/ada/i-fortra.adb | 1 - gcc/ada/i-fortra.ads | 1 - gcc/ada/i-os2err.ads | 1 - gcc/ada/i-os2lib.adb | 1 - gcc/ada/i-os2lib.ads | 1 - gcc/ada/i-os2syn.ads | 1 - gcc/ada/i-os2thr.ads | 1 - gcc/ada/i-pacdec.adb | 1 - gcc/ada/i-pacdec.ads | 1 - gcc/ada/i-vxwork.ads | 1 - gcc/ada/impunit.adb | 1 - gcc/ada/impunit.ads | 1 - gcc/ada/inline.adb | 1 - gcc/ada/inline.ads | 1 - gcc/ada/interfac.ads | 1 - gcc/ada/ioexcept.ads | 1 - gcc/ada/itypes.adb | 1 - gcc/ada/itypes.ads | 1 - gcc/ada/krunch.adb | 1 - gcc/ada/krunch.ads | 1 - gcc/ada/layout.adb | 1 - gcc/ada/layout.ads | 1 - gcc/ada/lib-list.adb | 1 - gcc/ada/lib-load.adb | 1 - gcc/ada/lib-load.ads | 1 - gcc/ada/lib-sort.adb | 1 - gcc/ada/lib-util.adb | 1 - gcc/ada/lib-util.ads | 1 - gcc/ada/lib-writ.adb | 1 - gcc/ada/lib-writ.ads | 1 - gcc/ada/lib-xref.adb | 1 - gcc/ada/lib-xref.ads | 1 - gcc/ada/lib.adb | 1 - gcc/ada/lib.ads | 1 - gcc/ada/live.adb | 1 - gcc/ada/live.ads | 1 - gcc/ada/machcode.ads | 1 - gcc/ada/make.adb | 1 - gcc/ada/make.ads | 1 - gcc/ada/makeusg.adb | 1 - gcc/ada/makeusg.ads | 1 - gcc/ada/math_lib.adb | 1 - gcc/ada/mdll-fil.adb | 1 - gcc/ada/mdll-fil.ads | 1 - gcc/ada/mdll-utl.adb | 1 - gcc/ada/mdll-utl.ads | 1 - gcc/ada/mdll.adb | 1 - gcc/ada/mdll.ads | 1 - gcc/ada/memroot.adb | 1 - gcc/ada/memroot.ads | 1 - gcc/ada/memtrack.adb | 1 - gcc/ada/mlib-fil.adb | 1 - gcc/ada/mlib-fil.ads | 1 - gcc/ada/mlib-prj.adb | 1 - gcc/ada/mlib-prj.ads | 1 - gcc/ada/mlib-tgt.adb | 1 - gcc/ada/mlib-tgt.ads | 1 - gcc/ada/mlib-utl.adb | 1 - gcc/ada/mlib-utl.ads | 1 - gcc/ada/mlib.adb | 1 - gcc/ada/mlib.ads | 1 - gcc/ada/namet.adb | 1 - gcc/ada/namet.ads | 1 - gcc/ada/nlists.adb | 1 - gcc/ada/nlists.ads | 1 - gcc/ada/opt.adb | 1 - gcc/ada/opt.ads | 1 - gcc/ada/osint-b.adb | 1 - gcc/ada/osint-b.ads | 1 - gcc/ada/osint-c.adb | 1 - gcc/ada/osint-c.ads | 1 - gcc/ada/osint-l.adb | 1 - gcc/ada/osint-l.ads | 1 - gcc/ada/osint-m.adb | 1 - gcc/ada/osint-m.ads | 1 - gcc/ada/osint.adb | 1 - gcc/ada/osint.ads | 1 - gcc/ada/output.adb | 1 - gcc/ada/output.ads | 1 - gcc/ada/par-ch10.adb | 1 - gcc/ada/par-ch11.adb | 1 - gcc/ada/par-ch12.adb | 1 - gcc/ada/par-ch13.adb | 1 - gcc/ada/par-ch2.adb | 1 - gcc/ada/par-ch3.adb | 1 - gcc/ada/par-ch4.adb | 1 - gcc/ada/par-ch5.adb | 1 - gcc/ada/par-ch6.adb | 1 - gcc/ada/par-ch7.adb | 1 - gcc/ada/par-ch8.adb | 1 - gcc/ada/par-ch9.adb | 1 - gcc/ada/par-endh.adb | 1 - gcc/ada/par-labl.adb | 1 - gcc/ada/par-load.adb | 1 - gcc/ada/par-prag.adb | 1 - gcc/ada/par-sync.adb | 1 - gcc/ada/par-tchk.adb | 1 - gcc/ada/par-util.adb | 1 - gcc/ada/par.adb | 1 - gcc/ada/par.ads | 1 - gcc/ada/prj-attr.adb | 1 - gcc/ada/prj-attr.ads | 1 - gcc/ada/prj-com.adb | 1 - gcc/ada/prj-com.ads | 1 - gcc/ada/prj-dect.adb | 1 - gcc/ada/prj-dect.ads | 1 - gcc/ada/prj-env.adb | 1 - gcc/ada/prj-env.ads | 1 - gcc/ada/prj-ext.adb | 1 - gcc/ada/prj-ext.ads | 1 - gcc/ada/prj-makr.adb | 1 - gcc/ada/prj-makr.ads | 1 - gcc/ada/prj-nmsc.adb | 1 - gcc/ada/prj-nmsc.ads | 1 - gcc/ada/prj-pars.adb | 1 - gcc/ada/prj-pars.ads | 1 - gcc/ada/prj-part.adb | 1 - gcc/ada/prj-part.ads | 1 - gcc/ada/prj-pp.adb | 1 - gcc/ada/prj-pp.ads | 1 - gcc/ada/prj-proc.adb | 1 - gcc/ada/prj-proc.ads | 1 - gcc/ada/prj-strt.adb | 1 - gcc/ada/prj-strt.ads | 1 - gcc/ada/prj-tree.adb | 1 - gcc/ada/prj-tree.ads | 1 - gcc/ada/prj-util.adb | 1 - gcc/ada/prj-util.ads | 1 - gcc/ada/prj.adb | 1 - gcc/ada/prj.ads | 1 - gcc/ada/repinfo.adb | 1 - gcc/ada/repinfo.ads | 1 - gcc/ada/restrict.adb | 1 - gcc/ada/restrict.ads | 1 - gcc/ada/rident.ads | 1 - gcc/ada/rtsfind.adb | 1 - gcc/ada/rtsfind.ads | 1 - gcc/ada/s-addima.adb | 1 - gcc/ada/s-addima.ads | 1 - gcc/ada/s-arit64.adb | 1 - gcc/ada/s-arit64.ads | 1 - gcc/ada/s-assert.adb | 1 - gcc/ada/s-assert.ads | 1 - gcc/ada/s-asthan.adb | 1 - gcc/ada/s-asthan.ads | 1 - gcc/ada/s-atacco.adb | 1 - gcc/ada/s-atacco.ads | 1 - gcc/ada/s-auxdec.adb | 1 - gcc/ada/s-auxdec.ads | 1 - gcc/ada/s-bitops.adb | 1 - gcc/ada/s-bitops.ads | 1 - gcc/ada/s-chepoo.ads | 1 - gcc/ada/s-crc32.adb | 1 - gcc/ada/s-crc32.ads | 1 - gcc/ada/s-direio.adb | 1 - gcc/ada/s-direio.ads | 1 - gcc/ada/s-errrep.adb | 1 - gcc/ada/s-errrep.ads | 1 - gcc/ada/s-except.ads | 1 - gcc/ada/s-exctab.adb | 1 - gcc/ada/s-exctab.ads | 1 - gcc/ada/s-exnflt.ads | 1 - gcc/ada/s-exngen.adb | 1 - gcc/ada/s-exngen.ads | 1 - gcc/ada/s-exnint.ads | 1 - gcc/ada/s-exnlfl.ads | 1 - gcc/ada/s-exnlin.ads | 1 - gcc/ada/s-exnllf.ads | 1 - gcc/ada/s-exnlli.ads | 1 - gcc/ada/s-exnsfl.ads | 1 - gcc/ada/s-exnsin.ads | 1 - gcc/ada/s-exnssi.ads | 1 - gcc/ada/s-expflt.ads | 1 - gcc/ada/s-expgen.adb | 1 - gcc/ada/s-expgen.ads | 1 - gcc/ada/s-expint.ads | 1 - gcc/ada/s-explfl.ads | 1 - gcc/ada/s-explin.ads | 1 - gcc/ada/s-expllf.ads | 1 - gcc/ada/s-explli.ads | 1 - gcc/ada/s-expllu.adb | 1 - gcc/ada/s-expllu.ads | 1 - gcc/ada/s-expmod.adb | 1 - gcc/ada/s-expmod.ads | 1 - gcc/ada/s-expsfl.ads | 1 - gcc/ada/s-expsin.ads | 1 - gcc/ada/s-expssi.ads | 1 - gcc/ada/s-expuns.adb | 1 - gcc/ada/s-expuns.ads | 1 - gcc/ada/s-fatflt.ads | 1 - gcc/ada/s-fatgen.adb | 1 - gcc/ada/s-fatgen.ads | 1 - gcc/ada/s-fatlfl.ads | 1 - gcc/ada/s-fatllf.ads | 1 - gcc/ada/s-fatsfl.ads | 1 - gcc/ada/s-ficobl.ads | 1 - gcc/ada/s-fileio.adb | 1 - gcc/ada/s-fileio.ads | 1 - gcc/ada/s-finimp.adb | 1 - gcc/ada/s-finimp.ads | 1 - gcc/ada/s-finroo.adb | 1 - gcc/ada/s-finroo.ads | 1 - gcc/ada/s-fore.adb | 1 - gcc/ada/s-fore.ads | 1 - gcc/ada/s-gloloc.adb | 1 - gcc/ada/s-gloloc.ads | 1 - gcc/ada/s-imgbiu.adb | 1 - gcc/ada/s-imgbiu.ads | 1 - gcc/ada/s-imgboo.adb | 1 - gcc/ada/s-imgboo.ads | 1 - gcc/ada/s-imgcha.adb | 1 - gcc/ada/s-imgcha.ads | 1 - gcc/ada/s-imgdec.adb | 1 - gcc/ada/s-imgdec.ads | 1 - gcc/ada/s-imgenu.adb | 1 - gcc/ada/s-imgenu.ads | 1 - gcc/ada/s-imgint.adb | 1 - gcc/ada/s-imgint.ads | 1 - gcc/ada/s-imgllb.adb | 1 - gcc/ada/s-imgllb.ads | 1 - gcc/ada/s-imglld.adb | 1 - gcc/ada/s-imglld.ads | 1 - gcc/ada/s-imglli.adb | 1 - gcc/ada/s-imglli.ads | 1 - gcc/ada/s-imgllu.adb | 1 - gcc/ada/s-imgllu.ads | 1 - gcc/ada/s-imgllw.adb | 1 - gcc/ada/s-imgllw.ads | 1 - gcc/ada/s-imgrea.adb | 1 - gcc/ada/s-imgrea.ads | 1 - gcc/ada/s-imguns.adb | 1 - gcc/ada/s-imguns.ads | 1 - gcc/ada/s-imgwch.adb | 1 - gcc/ada/s-imgwch.ads | 1 - gcc/ada/s-imgwiu.adb | 1 - gcc/ada/s-imgwiu.ads | 1 - gcc/ada/s-inmaop.ads | 1 - gcc/ada/s-interr.adb | 1 - gcc/ada/s-interr.ads | 1 - gcc/ada/s-intman.ads | 1 - gcc/ada/s-io.adb | 1 - gcc/ada/s-io.ads | 1 - gcc/ada/s-maccod.ads | 1 - gcc/ada/s-mantis.adb | 1 - gcc/ada/s-mantis.ads | 1 - gcc/ada/s-mastop.adb | 1 - gcc/ada/s-mastop.ads | 1 - gcc/ada/s-memory.adb | 1 - gcc/ada/s-memory.ads | 1 - gcc/ada/s-osprim.ads | 1 - gcc/ada/s-pack03.adb | 1 - gcc/ada/s-pack03.ads | 1 - gcc/ada/s-pack05.adb | 1 - gcc/ada/s-pack05.ads | 1 - gcc/ada/s-pack06.adb | 1 - gcc/ada/s-pack06.ads | 1 - gcc/ada/s-pack07.adb | 1 - gcc/ada/s-pack07.ads | 1 - gcc/ada/s-pack09.adb | 1 - gcc/ada/s-pack09.ads | 1 - gcc/ada/s-pack10.adb | 1 - gcc/ada/s-pack10.ads | 1 - gcc/ada/s-pack11.adb | 1 - gcc/ada/s-pack11.ads | 1 - gcc/ada/s-pack12.adb | 1 - gcc/ada/s-pack12.ads | 1 - gcc/ada/s-pack13.adb | 1 - gcc/ada/s-pack13.ads | 1 - gcc/ada/s-pack14.adb | 1 - gcc/ada/s-pack14.ads | 1 - gcc/ada/s-pack15.adb | 1 - gcc/ada/s-pack15.ads | 1 - gcc/ada/s-pack17.adb | 1 - gcc/ada/s-pack17.ads | 1 - gcc/ada/s-pack18.adb | 1 - gcc/ada/s-pack18.ads | 1 - gcc/ada/s-pack19.adb | 1 - gcc/ada/s-pack19.ads | 1 - gcc/ada/s-pack20.adb | 1 - gcc/ada/s-pack20.ads | 1 - gcc/ada/s-pack21.adb | 1 - gcc/ada/s-pack21.ads | 1 - gcc/ada/s-pack22.adb | 1 - gcc/ada/s-pack22.ads | 1 - gcc/ada/s-pack23.adb | 1 - gcc/ada/s-pack23.ads | 1 - gcc/ada/s-pack24.adb | 1 - gcc/ada/s-pack24.ads | 1 - gcc/ada/s-pack25.adb | 1 - gcc/ada/s-pack25.ads | 1 - gcc/ada/s-pack26.adb | 1 - gcc/ada/s-pack26.ads | 1 - gcc/ada/s-pack27.adb | 1 - gcc/ada/s-pack27.ads | 1 - gcc/ada/s-pack28.adb | 1 - gcc/ada/s-pack28.ads | 1 - gcc/ada/s-pack29.adb | 1 - gcc/ada/s-pack29.ads | 1 - gcc/ada/s-pack30.adb | 1 - gcc/ada/s-pack30.ads | 1 - gcc/ada/s-pack31.adb | 1 - gcc/ada/s-pack31.ads | 1 - gcc/ada/s-pack33.adb | 1 - gcc/ada/s-pack33.ads | 1 - gcc/ada/s-pack34.adb | 1 - gcc/ada/s-pack34.ads | 1 - gcc/ada/s-pack35.adb | 1 - gcc/ada/s-pack35.ads | 1 - gcc/ada/s-pack36.adb | 1 - gcc/ada/s-pack36.ads | 1 - gcc/ada/s-pack37.adb | 1 - gcc/ada/s-pack37.ads | 1 - gcc/ada/s-pack38.adb | 1 - gcc/ada/s-pack38.ads | 1 - gcc/ada/s-pack39.adb | 1 - gcc/ada/s-pack39.ads | 1 - gcc/ada/s-pack40.adb | 1 - gcc/ada/s-pack40.ads | 1 - gcc/ada/s-pack41.adb | 1 - gcc/ada/s-pack41.ads | 1 - gcc/ada/s-pack42.adb | 1 - gcc/ada/s-pack42.ads | 1 - gcc/ada/s-pack43.adb | 1 - gcc/ada/s-pack43.ads | 1 - gcc/ada/s-pack44.adb | 1 - gcc/ada/s-pack44.ads | 1 - gcc/ada/s-pack45.adb | 1 - gcc/ada/s-pack45.ads | 1 - gcc/ada/s-pack46.adb | 1 - gcc/ada/s-pack46.ads | 1 - gcc/ada/s-pack47.adb | 1 - gcc/ada/s-pack47.ads | 1 - gcc/ada/s-pack48.adb | 1 - gcc/ada/s-pack48.ads | 1 - gcc/ada/s-pack49.adb | 1 - gcc/ada/s-pack49.ads | 1 - gcc/ada/s-pack50.adb | 1 - gcc/ada/s-pack50.ads | 1 - gcc/ada/s-pack51.adb | 1 - gcc/ada/s-pack51.ads | 1 - gcc/ada/s-pack52.adb | 1 - gcc/ada/s-pack52.ads | 1 - gcc/ada/s-pack53.adb | 1 - gcc/ada/s-pack53.ads | 1 - gcc/ada/s-pack54.adb | 1 - gcc/ada/s-pack54.ads | 1 - gcc/ada/s-pack55.adb | 1 - gcc/ada/s-pack55.ads | 1 - gcc/ada/s-pack56.adb | 1 - gcc/ada/s-pack56.ads | 1 - gcc/ada/s-pack57.adb | 1 - gcc/ada/s-pack57.ads | 1 - gcc/ada/s-pack58.adb | 1 - gcc/ada/s-pack58.ads | 1 - gcc/ada/s-pack59.adb | 1 - gcc/ada/s-pack59.ads | 1 - gcc/ada/s-pack60.adb | 1 - gcc/ada/s-pack60.ads | 1 - gcc/ada/s-pack61.adb | 1 - gcc/ada/s-pack61.ads | 1 - gcc/ada/s-pack62.adb | 1 - gcc/ada/s-pack62.ads | 1 - gcc/ada/s-pack63.adb | 1 - gcc/ada/s-pack63.ads | 1 - gcc/ada/s-parame.adb | 1 - gcc/ada/s-parame.ads | 1 - gcc/ada/s-parint.adb | 1 - gcc/ada/s-parint.ads | 1 - gcc/ada/s-pooglo.adb | 1 - gcc/ada/s-pooglo.ads | 1 - gcc/ada/s-pooloc.adb | 1 - gcc/ada/s-pooloc.ads | 1 - gcc/ada/s-poosiz.adb | 1 - gcc/ada/s-poosiz.ads | 1 - gcc/ada/s-powtab.ads | 1 - gcc/ada/s-proinf.adb | 1 - gcc/ada/s-proinf.ads | 1 - gcc/ada/s-rpc.adb | 1 - gcc/ada/s-rpc.ads | 1 - gcc/ada/s-scaval.ads | 1 - gcc/ada/s-secsta.adb | 1 - gcc/ada/s-secsta.ads | 1 - gcc/ada/s-sequio.adb | 1 - gcc/ada/s-sequio.ads | 1 - gcc/ada/s-shasto.adb | 1 - gcc/ada/s-shasto.ads | 1 - gcc/ada/s-soflin.adb | 1 - gcc/ada/s-soflin.ads | 1 - gcc/ada/s-sopco3.adb | 1 - gcc/ada/s-sopco3.ads | 1 - gcc/ada/s-sopco4.adb | 1 - gcc/ada/s-sopco4.ads | 1 - gcc/ada/s-sopco5.adb | 1 - gcc/ada/s-sopco5.ads | 1 - gcc/ada/s-stache.adb | 1 - gcc/ada/s-stache.ads | 1 - gcc/ada/s-stalib.adb | 1 - gcc/ada/s-stalib.ads | 1 - gcc/ada/s-stoele.adb | 1 - gcc/ada/s-stoele.ads | 1 - gcc/ada/s-stopoo.ads | 1 - gcc/ada/s-stratt.adb | 1 - gcc/ada/s-stratt.ads | 1 - gcc/ada/s-strops.adb | 1 - gcc/ada/s-strops.ads | 1 - gcc/ada/s-taasde.adb | 1 - gcc/ada/s-taasde.ads | 1 - gcc/ada/s-tadeca.adb | 1 - gcc/ada/s-tadeca.ads | 1 - gcc/ada/s-tadert.adb | 1 - gcc/ada/s-tadert.ads | 1 - gcc/ada/s-taenca.adb | 1 - gcc/ada/s-taenca.ads | 1 - gcc/ada/s-taprob.adb | 1 - gcc/ada/s-taprob.ads | 1 - gcc/ada/s-taprop.ads | 1 - gcc/ada/s-tarest.adb | 1 - gcc/ada/s-tarest.ads | 1 - gcc/ada/s-tasdeb.adb | 1 - gcc/ada/s-tasdeb.ads | 1 - gcc/ada/s-tasinf.adb | 1 - gcc/ada/s-tasinf.ads | 1 - gcc/ada/s-tasini.adb | 1 - gcc/ada/s-tasini.ads | 1 - gcc/ada/s-taskin.adb | 1 - gcc/ada/s-taskin.ads | 1 - gcc/ada/s-tasque.adb | 1 - gcc/ada/s-tasque.ads | 1 - gcc/ada/s-tasren.adb | 1 - gcc/ada/s-tasren.ads | 1 - gcc/ada/s-tasres.ads | 1 - gcc/ada/s-tassta.adb | 1 - gcc/ada/s-tassta.ads | 1 - gcc/ada/s-tasuti.adb | 1 - gcc/ada/s-tasuti.ads | 1 - gcc/ada/s-tataat.adb | 1 - gcc/ada/s-tataat.ads | 1 - gcc/ada/s-tpinop.adb | 1 - gcc/ada/s-tpinop.ads | 1 - gcc/ada/s-tpoben.adb | 1 - gcc/ada/s-tpoben.ads | 1 - gcc/ada/s-tpobop.adb | 1 - gcc/ada/s-tpobop.ads | 1 - gcc/ada/s-tposen.adb | 1 - gcc/ada/s-tposen.ads | 1 - gcc/ada/s-traceb.adb | 1 - gcc/ada/s-traceb.ads | 1 - gcc/ada/s-traces.adb | 1 - gcc/ada/s-traces.ads | 1 - gcc/ada/s-tratas.adb | 1 - gcc/ada/s-tratas.ads | 1 - gcc/ada/s-unstyp.ads | 1 - gcc/ada/s-vaflop.adb | 1 - gcc/ada/s-vaflop.ads | 1 - gcc/ada/s-valboo.adb | 1 - gcc/ada/s-valboo.ads | 1 - gcc/ada/s-valcha.adb | 1 - gcc/ada/s-valcha.ads | 1 - gcc/ada/s-valdec.adb | 1 - gcc/ada/s-valdec.ads | 1 - gcc/ada/s-valenu.adb | 1 - gcc/ada/s-valenu.ads | 1 - gcc/ada/s-valint.adb | 1 - gcc/ada/s-valint.ads | 1 - gcc/ada/s-vallld.adb | 1 - gcc/ada/s-vallld.ads | 1 - gcc/ada/s-vallli.adb | 1 - gcc/ada/s-vallli.ads | 1 - gcc/ada/s-valllu.adb | 1 - gcc/ada/s-valllu.ads | 1 - gcc/ada/s-valrea.adb | 1 - gcc/ada/s-valrea.ads | 1 - gcc/ada/s-valuns.adb | 1 - gcc/ada/s-valuns.ads | 1 - gcc/ada/s-valuti.adb | 1 - gcc/ada/s-valuti.ads | 1 - gcc/ada/s-valwch.adb | 1 - gcc/ada/s-valwch.ads | 1 - gcc/ada/s-vercon.adb | 1 - gcc/ada/s-vercon.ads | 1 - gcc/ada/s-vmexta.adb | 1 - gcc/ada/s-vmexta.ads | 1 - gcc/ada/s-wchcnv.adb | 1 - gcc/ada/s-wchcnv.ads | 1 - gcc/ada/s-wchcon.ads | 1 - gcc/ada/s-wchjis.adb | 1 - gcc/ada/s-wchjis.ads | 1 - gcc/ada/s-wchstw.adb | 1 - gcc/ada/s-wchstw.ads | 1 - gcc/ada/s-wchwts.adb | 1 - gcc/ada/s-wchwts.ads | 1 - gcc/ada/s-widboo.adb | 1 - gcc/ada/s-widboo.ads | 1 - gcc/ada/s-widcha.adb | 1 - gcc/ada/s-widcha.ads | 1 - gcc/ada/s-widenu.adb | 1 - gcc/ada/s-widenu.ads | 1 - gcc/ada/s-widlli.adb | 1 - gcc/ada/s-widlli.ads | 1 - gcc/ada/s-widllu.adb | 1 - gcc/ada/s-widllu.ads | 1 - gcc/ada/s-widwch.adb | 1 - gcc/ada/s-widwch.ads | 1 - gcc/ada/s-wwdcha.adb | 1 - gcc/ada/s-wwdcha.ads | 1 - gcc/ada/s-wwdenu.adb | 1 - gcc/ada/s-wwdenu.ads | 1 - gcc/ada/s-wwdwch.adb | 1 - gcc/ada/s-wwdwch.ads | 1 - gcc/ada/scans.adb | 1 - gcc/ada/scans.ads | 1 - gcc/ada/scn-nlit.adb | 1 - gcc/ada/scn-slit.adb | 1 - gcc/ada/scn.adb | 1 - gcc/ada/scn.ads | 1 - gcc/ada/sdefault.ads | 1 - gcc/ada/sem.adb | 1 - gcc/ada/sem.ads | 1 - gcc/ada/sem_aggr.adb | 1 - gcc/ada/sem_aggr.ads | 1 - gcc/ada/sem_attr.adb | 1 - gcc/ada/sem_attr.ads | 1 - gcc/ada/sem_case.adb | 1 - gcc/ada/sem_case.ads | 1 - gcc/ada/sem_cat.adb | 1 - gcc/ada/sem_cat.ads | 1 - gcc/ada/sem_ch10.adb | 1 - gcc/ada/sem_ch10.ads | 1 - gcc/ada/sem_ch11.adb | 1 - gcc/ada/sem_ch11.ads | 1 - gcc/ada/sem_ch12.adb | 1 - gcc/ada/sem_ch12.ads | 1 - gcc/ada/sem_ch13.adb | 1 - gcc/ada/sem_ch13.ads | 1 - gcc/ada/sem_ch2.adb | 1 - gcc/ada/sem_ch2.ads | 1 - gcc/ada/sem_ch3.adb | 1 - gcc/ada/sem_ch3.ads | 1 - gcc/ada/sem_ch4.adb | 1 - gcc/ada/sem_ch4.ads | 1 - gcc/ada/sem_ch5.adb | 1 - gcc/ada/sem_ch5.ads | 1 - gcc/ada/sem_ch6.adb | 1 - gcc/ada/sem_ch6.ads | 1 - gcc/ada/sem_ch7.adb | 1 - gcc/ada/sem_ch7.ads | 1 - gcc/ada/sem_ch8.adb | 1 - gcc/ada/sem_ch8.ads | 1 - gcc/ada/sem_ch9.adb | 1 - gcc/ada/sem_ch9.ads | 1 - gcc/ada/sem_disp.adb | 1 - gcc/ada/sem_disp.ads | 1 - gcc/ada/sem_dist.adb | 1 - gcc/ada/sem_dist.ads | 1 - gcc/ada/sem_elab.adb | 1 - gcc/ada/sem_elab.ads | 1 - gcc/ada/sem_elim.adb | 1 - gcc/ada/sem_elim.ads | 1 - gcc/ada/sem_eval.adb | 1 - gcc/ada/sem_eval.ads | 1 - gcc/ada/sem_intr.adb | 1 - gcc/ada/sem_intr.ads | 1 - gcc/ada/sem_maps.adb | 1 - gcc/ada/sem_maps.ads | 1 - gcc/ada/sem_mech.adb | 1 - gcc/ada/sem_mech.ads | 1 - gcc/ada/sem_prag.adb | 1 - gcc/ada/sem_prag.ads | 1 - gcc/ada/sem_res.adb | 1 - gcc/ada/sem_res.ads | 1 - gcc/ada/sem_smem.adb | 1 - gcc/ada/sem_smem.ads | 1 - gcc/ada/sem_type.adb | 1 - gcc/ada/sem_type.ads | 1 - gcc/ada/sem_util.adb | 1 - gcc/ada/sem_util.ads | 1 - gcc/ada/sem_vfpt.adb | 1 - gcc/ada/sem_vfpt.ads | 1 - gcc/ada/sem_warn.adb | 1 - gcc/ada/sem_warn.ads | 1 - gcc/ada/sequenio.ads | 1 - gcc/ada/sfn_scan.adb | 1 - gcc/ada/sfn_scan.ads | 1 - gcc/ada/sinfo-cn.adb | 1 - gcc/ada/sinfo-cn.ads | 1 - gcc/ada/sinfo.adb | 1 - gcc/ada/sinfo.ads | 1 - gcc/ada/sinput-d.adb | 1 - gcc/ada/sinput-d.ads | 1 - gcc/ada/sinput-l.adb | 1 - gcc/ada/sinput-l.ads | 1 - gcc/ada/sinput-p.adb | 1 - gcc/ada/sinput-p.ads | 1 - gcc/ada/sinput.adb | 1 - gcc/ada/sinput.ads | 1 - gcc/ada/snames.adb | 1 - gcc/ada/snames.ads | 1 - gcc/ada/sprint.adb | 1 - gcc/ada/sprint.ads | 1 - gcc/ada/stand.adb | 1 - gcc/ada/stand.ads | 1 - gcc/ada/stringt.adb | 1 - gcc/ada/stringt.ads | 1 - gcc/ada/style.adb | 1 - gcc/ada/style.ads | 1 - gcc/ada/stylesw.adb | 1 - gcc/ada/stylesw.ads | 1 - gcc/ada/switch-b.adb | 1 - gcc/ada/switch-b.ads | 1 - gcc/ada/switch-c.adb | 1 - gcc/ada/switch-c.ads | 1 - gcc/ada/switch-m.adb | 1 - gcc/ada/switch-m.ads | 1 - gcc/ada/switch.adb | 1 - gcc/ada/switch.ads | 1 - gcc/ada/system.ads | 1 - gcc/ada/table.adb | 1 - gcc/ada/table.ads | 1 - gcc/ada/targparm.adb | 1 - gcc/ada/targparm.ads | 1 - gcc/ada/tbuild.adb | 1 - gcc/ada/tbuild.ads | 1 - gcc/ada/text_io.ads | 1 - gcc/ada/trans.c | 6 +- gcc/ada/tree_gen.adb | 1 - gcc/ada/tree_gen.ads | 1 - gcc/ada/tree_in.adb | 1 - gcc/ada/tree_in.ads | 1 - gcc/ada/tree_io.adb | 1 - gcc/ada/tree_io.ads | 1 - gcc/ada/treepr.adb | 1 - gcc/ada/treepr.ads | 1 - gcc/ada/ttypef.ads | 1 - gcc/ada/ttypes.ads | 1 - gcc/ada/types.adb | 1 - gcc/ada/types.ads | 1 - gcc/ada/uintp.adb | 1 - gcc/ada/uintp.ads | 1 - gcc/ada/uname.adb | 1 - gcc/ada/uname.ads | 1 - gcc/ada/unchconv.ads | 1 - gcc/ada/unchdeal.ads | 1 - gcc/ada/urealp.adb | 1 - gcc/ada/urealp.ads | 1 - gcc/ada/usage.adb | 1 - gcc/ada/usage.ads | 1 - gcc/ada/validsw.adb | 1 - gcc/ada/validsw.ads | 1 - gcc/ada/widechar.adb | 1 - gcc/ada/widechar.ads | 1 - gcc/ada/xeinfo.adb | 1 - gcc/ada/xnmake.adb | 1 - gcc/ada/xr_tabls.adb | 1 - gcc/ada/xr_tabls.ads | 1 - gcc/ada/xref_lib.adb | 1 - gcc/ada/xref_lib.ads | 1 - gcc/ada/xsinfo.adb | 3 +- gcc/ada/xsnames.adb | 1 - gcc/ada/xtreeprs.adb | 1 - 1332 files changed, 914 insertions(+), 1690 deletions(-) diff --git a/gcc/ada/1aexcept.adb b/gcc/ada/1aexcept.adb index e2ff851d8ee4..42b623633fd8 100644 --- a/gcc/ada/1aexcept.adb +++ b/gcc/ada/1aexcept.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/1aexcept.ads b/gcc/ada/1aexcept.ads index daa60b36ed9d..160a086f4922 100644 --- a/gcc/ada/1aexcept.ads +++ b/gcc/ada/1aexcept.ads @@ -7,8 +7,7 @@ -- -- -- S p e c -- -- -- --- -- --- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- +-- Copyright (C) 1992-2003 Free Software Foundation, Inc. -- -- -- -- This specification is derived from the Ada Reference Manual for use with -- -- GNAT. The copyright notice above, and the license provisions that follow -- diff --git a/gcc/ada/1ic.ads b/gcc/ada/1ic.ads index ab8c12fa33ff..e6caea3a6b11 100644 --- a/gcc/ada/1ic.ads +++ b/gcc/ada/1ic.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- This specification is adapted from the Ada Reference Manual for use with -- -- GNAT Hi Integrity Edition. In accordance with the copyright of that -- -- document, you can freely copy and modify this specification, provided -- diff --git a/gcc/ada/1ssecsta.adb b/gcc/ada/1ssecsta.adb index 55d2ece05d00..3f3bf78be90c 100644 --- a/gcc/ada/1ssecsta.adb +++ b/gcc/ada/1ssecsta.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/1ssecsta.ads b/gcc/ada/1ssecsta.ads index 4175981349ab..2d1bbe4247c0 100644 --- a/gcc/ada/1ssecsta.ads +++ b/gcc/ada/1ssecsta.ads @@ -6,8 +6,7 @@ -- -- -- S p e c -- -- -- --- -- --- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- +-- Copyright (C) 1992-2003 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- -- @@ -32,6 +31,8 @@ -- -- ------------------------------------------------------------------------------ +-- Version for use in HI-E mode + with System.Storage_Elements; package System.Secondary_Stack is diff --git a/gcc/ada/31soccon.ads b/gcc/ada/31soccon.ads index 780a28f560bd..05021803b30b 100644 --- a/gcc/ada/31soccon.ads +++ b/gcc/ada/31soccon.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 2001 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/31soliop.ads b/gcc/ada/31soliop.ads index f4eb3b4482ac..aa928b71511e 100644 --- a/gcc/ada/31soliop.ads +++ b/gcc/ada/31soliop.ads @@ -6,8 +6,7 @@ -- -- -- S p e c -- -- -- --- -- --- Copyright (C) 2001 Ada Core Technologies, Inc. -- +-- Copyright (C) 2002 Ada Core Technologies, 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- -- diff --git a/gcc/ada/3asoccon.ads b/gcc/ada/3asoccon.ads index 2c1dee91591d..0703268d164f 100644 --- a/gcc/ada/3asoccon.ads +++ b/gcc/ada/3asoccon.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 2001 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/3bsoccon.ads b/gcc/ada/3bsoccon.ads index fe8589a8263c..4044c0134a53 100644 --- a/gcc/ada/3bsoccon.ads +++ b/gcc/ada/3bsoccon.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 2001 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/3gsoccon.ads b/gcc/ada/3gsoccon.ads index 7e79f3e6eceb..6bfacf70f1ef 100644 --- a/gcc/ada/3gsoccon.ads +++ b/gcc/ada/3gsoccon.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 2001 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/3hsoccon.ads b/gcc/ada/3hsoccon.ads index a9f25c2e2ee7..e88cd53edac1 100644 --- a/gcc/ada/3hsoccon.ads +++ b/gcc/ada/3hsoccon.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 2001 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/3ssoccon.ads b/gcc/ada/3ssoccon.ads index 0676cba29187..2af7a2a73b82 100644 --- a/gcc/ada/3ssoccon.ads +++ b/gcc/ada/3ssoccon.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 2001 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/3ssoliop.ads b/gcc/ada/3ssoliop.ads index 9b8ef69028d8..80de5201c750 100644 --- a/gcc/ada/3ssoliop.ads +++ b/gcc/ada/3ssoliop.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 2001 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/3wsoccon.ads b/gcc/ada/3wsoccon.ads index 97600acfeafc..252801da5ce9 100644 --- a/gcc/ada/3wsoccon.ads +++ b/gcc/ada/3wsoccon.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 2001 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/3wsocthi.adb b/gcc/ada/3wsocthi.adb index f66936d33105..9782121d90bd 100644 --- a/gcc/ada/3wsocthi.adb +++ b/gcc/ada/3wsocthi.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 2001 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/3wsocthi.ads b/gcc/ada/3wsocthi.ads index 7e424a8ff3fb..63c8a5ea7157 100644 --- a/gcc/ada/3wsocthi.ads +++ b/gcc/ada/3wsocthi.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 2001 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/3wsoliop.ads b/gcc/ada/3wsoliop.ads index fda43419d63f..8c82f43223d6 100644 --- a/gcc/ada/3wsoliop.ads +++ b/gcc/ada/3wsoliop.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 2001 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/41intnam.ads b/gcc/ada/41intnam.ads index d207401a1e19..474649c472cf 100644 --- a/gcc/ada/41intnam.ads +++ b/gcc/ada/41intnam.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1991-2002 Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/42intnam.ads b/gcc/ada/42intnam.ads index 149b7414dcf6..111b01eee9c3 100644 --- a/gcc/ada/42intnam.ads +++ b/gcc/ada/42intnam.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1991-2002 Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/4aintnam.ads b/gcc/ada/4aintnam.ads index bb5e4845a347..ac7d0865e552 100644 --- a/gcc/ada/4aintnam.ads +++ b/gcc/ada/4aintnam.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1991-2002 Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/4cintnam.ads b/gcc/ada/4cintnam.ads index 5ca008580e21..0f9678e29aee 100644 --- a/gcc/ada/4cintnam.ads +++ b/gcc/ada/4cintnam.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1991-2002 Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/4dintnam.ads b/gcc/ada/4dintnam.ads index eaf368a7a0f6..37e77777c8e7 100644 --- a/gcc/ada/4dintnam.ads +++ b/gcc/ada/4dintnam.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1991-2002 Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/4gintnam.ads b/gcc/ada/4gintnam.ads index dc27d1f94b16..c22d1393291e 100644 --- a/gcc/ada/4gintnam.ads +++ b/gcc/ada/4gintnam.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1997-2002, Florida State University -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/4hexcpol.adb b/gcc/ada/4hexcpol.adb index 0d4cbbd68a3e..0162918ae3ee 100644 --- a/gcc/ada/4hexcpol.adb +++ b/gcc/ada/4hexcpol.adb @@ -7,7 +7,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2000, Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/4hintnam.ads b/gcc/ada/4hintnam.ads index 135789286ce6..b275cab1a26b 100644 --- a/gcc/ada/4hintnam.ads +++ b/gcc/ada/4hintnam.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1991-2002, Florida State University -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/4lintnam.ads b/gcc/ada/4lintnam.ads index 5f93ed32e4f4..048e18378fc4 100644 --- a/gcc/ada/4lintnam.ads +++ b/gcc/ada/4lintnam.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1991-2002 Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/4mintnam.ads b/gcc/ada/4mintnam.ads index 7db8eefa4494..f893e5551896 100644 --- a/gcc/ada/4mintnam.ads +++ b/gcc/ada/4mintnam.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1996-2002 Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/4nintnam.ads b/gcc/ada/4nintnam.ads index bfc9345eb3df..dc9bea2fe252 100644 --- a/gcc/ada/4nintnam.ads +++ b/gcc/ada/4nintnam.ads @@ -7,8 +7,7 @@ -- S p e c -- -- (No Tasking Version) -- -- -- --- -- --- Copyright (C) 1991,92,93,94,95,1996 Free Software Foundation, Inc. -- +-- Copyright (C) 1991-2002 Free Software Foundation, Inc. -- -- -- -- GNARL 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- -- diff --git a/gcc/ada/4ointnam.ads b/gcc/ada/4ointnam.ads index 383c89fe165e..efa1d3c68319 100644 --- a/gcc/ada/4ointnam.ads +++ b/gcc/ada/4ointnam.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1991-1997 Florida State University -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/4onumaux.ads b/gcc/ada/4onumaux.ads index 4dfc2a8580a0..fd208c1df149 100644 --- a/gcc/ada/4onumaux.ads +++ b/gcc/ada/4onumaux.ads @@ -7,7 +7,6 @@ -- S p e c -- -- (C Library Version for x86) -- -- -- --- -- -- Copyright (C) 1992-1998 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/4pintnam.ads b/gcc/ada/4pintnam.ads index af60c1fc8f97..3c1ee22175f3 100644 --- a/gcc/ada/4pintnam.ads +++ b/gcc/ada/4pintnam.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1991-2002 Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/4rintnam.ads b/gcc/ada/4rintnam.ads index 9e6e85612105..0624dfb15d11 100644 --- a/gcc/ada/4rintnam.ads +++ b/gcc/ada/4rintnam.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1991-2002 Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/4sintnam.ads b/gcc/ada/4sintnam.ads index d6a33d04637d..8217d3089f40 100644 --- a/gcc/ada/4sintnam.ads +++ b/gcc/ada/4sintnam.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1991-2002 Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/4uintnam.ads b/gcc/ada/4uintnam.ads index b44bb898c941..a5ddb4a5c812 100644 --- a/gcc/ada/4uintnam.ads +++ b/gcc/ada/4uintnam.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1991-2002 Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/4vcaldel.adb b/gcc/ada/4vcaldel.adb index e257c0267f8b..8ffdb3ae6451 100644 --- a/gcc/ada/4vcaldel.adb +++ b/gcc/ada/4vcaldel.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1991-2000 Florida State University -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/4vcalend.adb b/gcc/ada/4vcalend.adb index 1666b721d3c1..99b8dcafac1c 100644 --- a/gcc/ada/4vcalend.adb +++ b/gcc/ada/4vcalend.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2000 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/4vcalend.ads b/gcc/ada/4vcalend.ads index e2f6ca96b847..6704346cf702 100644 --- a/gcc/ada/4vcalend.ads +++ b/gcc/ada/4vcalend.ads @@ -6,11 +6,32 @@ -- -- -- S p e c -- -- -- +-- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- -- -- --- This specification is adapted from the Ada Reference Manual for use with -- --- GNAT. In accordance with the copyright of that document, you can freely -- --- copy and modify this specification, provided that if you redistribute a -- --- modified version, any changes that you have made are clearly indicated. -- +-- This specification is derived from the Ada Reference Manual for use with -- +-- GNAT. The copyright notice above, and the license provisions that follow -- +-- apply solely to the contents of the part following the private keyword. -- +-- -- +-- 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- -- +-- ware Foundation; either version 2, or (at your option) any later ver- -- +-- sion. GNAT is distributed in the hope that it will be useful, but WITH- -- +-- OUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY -- +-- or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License -- +-- for more details. You should have received a copy of the GNU General -- +-- Public License distributed with GNAT; see file COPYING. If not, write -- +-- to the Free Software Foundation, 59 Temple Place - Suite 330, Boston, -- +-- MA 02111-1307, USA. -- +-- -- +-- As a special exception, if other files instantiate generics from this -- +-- unit, or you link this unit with other files to produce an executable, -- +-- this unit does not by itself cause the resulting executable to be -- +-- covered by the GNU General Public License. This exception does not -- +-- however invalidate any other reasons why the executable file might be -- +-- covered by the GNU Public License. -- +-- -- +-- GNAT was originally developed by the GNAT team at New York University. -- +-- Extensive contributions were provided by Ada Core Technologies Inc. -- -- -- ------------------------------------------------------------------------------ diff --git a/gcc/ada/4vintnam.ads b/gcc/ada/4vintnam.ads index 78981b8f8926..5e4f58593e06 100644 --- a/gcc/ada/4vintnam.ads +++ b/gcc/ada/4vintnam.ads @@ -6,8 +6,7 @@ -- -- -- S p e c -- -- -- --- -- --- Copyright (C) 1991-2000 Free Software Foundation, Inc. -- +-- Copyright (C) 1991-2002 Free Software Foundation, Inc. -- -- -- -- GNARL 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- -- diff --git a/gcc/ada/4wcalend.adb b/gcc/ada/4wcalend.adb index 796953821319..25f8cc4720bd 100644 --- a/gcc/ada/4wcalend.adb +++ b/gcc/ada/4wcalend.adb @@ -6,8 +6,7 @@ -- -- -- B o d y -- -- -- --- -- --- Copyright (C) 1997-2001 Free Software Foundation, Inc. -- +-- Copyright (C) 1997-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- -- @@ -364,7 +363,7 @@ package body Ada.Calendar is -- time based on 1 january 1970) and add there the sub-seconds part. declare - Sub_Sec : Duration := Seconds - Duration (Int_Secs); + Sub_Sec : constant Duration := Seconds - Duration (Int_Secs); begin Date := Time ((Now - epoch_1970) * system_time_ns / Sec_Unit) + Sub_Sec; diff --git a/gcc/ada/4wexcpol.adb b/gcc/ada/4wexcpol.adb index 7b9eee6a9fa5..0ee2dea057f7 100644 --- a/gcc/ada/4wexcpol.adb +++ b/gcc/ada/4wexcpol.adb @@ -7,7 +7,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2000, Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/4wintnam.ads b/gcc/ada/4wintnam.ads index 8b68cb65eec6..834ff6b29597 100644 --- a/gcc/ada/4wintnam.ads +++ b/gcc/ada/4wintnam.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1997-1998 Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/4zintnam.ads b/gcc/ada/4zintnam.ads index 71abd65fe4b3..8c67efff57ed 100644 --- a/gcc/ada/4zintnam.ads +++ b/gcc/ada/4zintnam.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1998-2001 Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/4znumaux.ads b/gcc/ada/4znumaux.ads index 9ffee5401ecd..9638fb02fec2 100644 --- a/gcc/ada/4znumaux.ads +++ b/gcc/ada/4znumaux.ads @@ -7,8 +7,7 @@ -- S p e c -- -- (C Library Version, VxWorks) -- -- -- --- -- --- Copyright (C) 1992-1998 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- -- diff --git a/gcc/ada/4zsytaco.adb b/gcc/ada/4zsytaco.adb index e052a8e23c81..f8ed43447e97 100644 --- a/gcc/ada/4zsytaco.adb +++ b/gcc/ada/4zsytaco.adb @@ -6,8 +6,7 @@ -- -- -- B o d y -- -- -- --- -- --- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- +-- Copyright (C) 1992-2003 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- -- @@ -33,6 +32,7 @@ ------------------------------------------------------------------------------ with Interfaces.C; + package body Ada.Synchronous_Task_Control is use System.OS_Interface; use type Interfaces.C.int; @@ -67,10 +67,12 @@ package body Ada.Synchronous_Task_Control is procedure Set_False (S : in out Suspension_Object) is St : STATUS; + begin -- Need to get the semaphore into the "empty" state. -- On return, this task will have made the semaphore -- empty (St = OK) or have left it empty. + St := semTake (S.Sema, NO_WAIT); end Set_False; @@ -80,6 +82,7 @@ package body Ada.Synchronous_Task_Control is procedure Set_True (S : in out Suspension_Object) is St : STATUS; + begin St := semGive (S.Sema); end Set_True; @@ -91,17 +94,15 @@ package body Ada.Synchronous_Task_Control is procedure Suspend_Until_True (S : in out Suspension_Object) is St : STATUS; - -- Declare local exception so the mutex can still be reset - -- to full if Program_Error is raised - - Task_Already_Pending : exception; begin -- Determine whether another task is pending on the suspension -- object. Should never be called from an ISR. Therefore semTake can -- be called on the mutex + St := semTake (S.Mutex, NO_WAIT); if St = OK then + -- Wait for suspension object St := semTake (S.Sema, WAIT_FOREVER); @@ -110,16 +111,14 @@ package body Ada.Synchronous_Task_Control is else -- Another task is pending on the suspension object - raise Task_Already_Pending; - end if; - exception - when Task_Already_Pending => raise Program_Error; - when others => - St := semGive (S.Mutex); - raise; + end if; end Suspend_Until_True; + ---------------- + -- Initialize -- + ---------------- + procedure Initialize (S : in out Suspension_Object) is begin S.Sema := semBCreate (SEM_Q_FIFO, SEM_EMPTY); @@ -131,8 +130,13 @@ package body Ada.Synchronous_Task_Control is S.Mutex := semBCreate (SEM_Q_FIFO, SEM_FULL); end Initialize; + -------------- + -- Finalize -- + -------------- + procedure Finalize (S : in out Suspension_Object) is St : STATUS; + begin St := semDelete (S.Sema); St := semDelete (S.Mutex); diff --git a/gcc/ada/4zsytaco.ads b/gcc/ada/4zsytaco.ads index ac7ca5a2b888..c3c54bee43c6 100644 --- a/gcc/ada/4zsytaco.ads +++ b/gcc/ada/4zsytaco.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- This specification is derived from the Ada Reference Manual for use with -- diff --git a/gcc/ada/51osinte.adb b/gcc/ada/51osinte.adb index c276eadad0b2..8b159a899b88 100644 --- a/gcc/ada/51osinte.adb +++ b/gcc/ada/51osinte.adb @@ -6,8 +6,7 @@ -- -- -- B o d y -- -- -- --- -- --- Copyright (C) 1999-2001 Free Software Foundation, Inc. -- +-- Copyright (C) 1999-2002 Free Software Foundation, Inc. -- -- -- -- GNARL 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- -- @@ -78,8 +77,8 @@ package body System.OS_Interface is F := F + 1.0; end if; - return timespec' (tv_sec => S, - tv_nsec => long (Long_Long_Integer (F * 10#1#E9))); + return timespec'(tv_sec => S, + tv_nsec => long (Long_Long_Integer (F * 10#1#E9))); end To_Timespec; ---------------- @@ -102,8 +101,10 @@ package body System.OS_Interface is F := F + 1.0; end if; - return struct_timeval' (tv_sec => S, - tv_usec => long (Long_Long_Integer (F * 10#1#E6))); + return + struct_timeval' + (tv_sec => S, + tv_usec => long (Long_Long_Integer (F * 10#1#E6))); end To_Timeval; ------------------- @@ -112,14 +113,18 @@ package body System.OS_Interface is function clock_gettime (clock_id : clockid_t; - tp : access timespec) return int + tp : access timespec) + return int is + pragma Warnings (Off, clock_id); + Result : int; tv : aliased struct_timeval; function gettimeofday - (tv : access struct_timeval; - tz : System.Address := System.Null_Address) return int; + (tv : access struct_timeval; + tz : System.Address := System.Null_Address) + return int; pragma Import (C, gettimeofday, "gettimeofday"); begin @@ -163,6 +168,8 @@ package body System.OS_Interface is end pthread_kill; function Get_Stack_Base (thread : pthread_t) return Address is + pragma Warnings (Off, thread); + begin return Null_Address; end Get_Stack_Base; diff --git a/gcc/ada/51osinte.ads b/gcc/ada/51osinte.ads index 7e2b16603fda..63ab7beeefc0 100644 --- a/gcc/ada/51osinte.ads +++ b/gcc/ada/51osinte.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1999-2001 Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/52osinte.adb b/gcc/ada/52osinte.adb index 02c438590cbb..0e03bd0607fd 100644 --- a/gcc/ada/52osinte.adb +++ b/gcc/ada/52osinte.adb @@ -6,8 +6,7 @@ -- -- -- B o d y -- -- -- --- -- --- Copyright (C) 1999-2000 Free Software Foundation, Inc. -- +-- Copyright (C) 1999-2002 Free Software Foundation, Inc. -- -- -- -- GNARL 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- -- @@ -51,12 +50,12 @@ package body System.OS_Interface is function clock_gettime (clock_id : clockid_t; tp : access timespec) - return int + return int is function clock_gettime_base (clock_id : clockid_t; tp : access timespec) - return int; + return int; pragma Import (C, clock_gettime_base, "clock_gettime"); begin @@ -101,7 +100,7 @@ package body System.OS_Interface is F := F + 1.0; end if; - return timespec' (tv_sec => S, + return timespec'(tv_sec => S, tv_nsec => long (Long_Long_Integer (F * 10#1#E9))); end To_Timespec; @@ -125,7 +124,7 @@ package body System.OS_Interface is F := F + 1.0; end if; - return struct_timeval' (tv_sec => S, + return struct_timeval'(tv_sec => S, tv_usec => time_t (Long_Long_Integer (F * 10#1#E6))); end To_Timeval; @@ -141,7 +140,7 @@ package body System.OS_Interface is function sigwait_base (set : access sigset_t; value : System.Address) - return Signal; + return Signal; pragma Import (C, sigwait_base, "sigwait"); begin @@ -561,6 +560,8 @@ package body System.OS_Interface is end pthread_getspecific; function Get_Stack_Base (thread : pthread_t) return Address is + pragma Warnings (Off, thread); + begin return Null_Address; end Get_Stack_Base; diff --git a/gcc/ada/52osinte.ads b/gcc/ada/52osinte.ads index c22e2056f0f5..2f4431fdb0f1 100644 --- a/gcc/ada/52osinte.ads +++ b/gcc/ada/52osinte.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1999-2001 Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/52system.ads b/gcc/ada/52system.ads index 9f368b62fa7e..63485e177ee5 100644 --- a/gcc/ada/52system.ads +++ b/gcc/ada/52system.ads @@ -7,7 +7,6 @@ -- S p e c -- -- (LynxOS PPC/x86 Version) -- -- --- -- -- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- -- -- -- This specification is derived from the Ada Reference Manual for use with -- diff --git a/gcc/ada/53osinte.ads b/gcc/ada/53osinte.ads index eddc88136e44..3643653b5a2c 100644 --- a/gcc/ada/53osinte.ads +++ b/gcc/ada/53osinte.ads @@ -6,8 +6,7 @@ -- -- -- S p e c -- -- -- --- -- --- Copyright (C) 1999-2001 Free Software Foundation, Inc. -- +-- Copyright (C) 1999-2002 Free Software Foundation, Inc. -- -- -- -- GNARL 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- -- @@ -185,6 +184,11 @@ package System.OS_Interface is tp : access timespec) return int; pragma Import (C, clock_gettime, "clock_gettime"); + function clock_getres + (clock_id : clockid_t; + res : access timespec) return int; + pragma Import (C, clock_getres, "clock_getres"); + function To_Duration (TS : timespec) return Duration; pragma Inline (To_Duration); diff --git a/gcc/ada/54osinte.ads b/gcc/ada/54osinte.ads index 99caa3651887..d13eed4cc11e 100644 --- a/gcc/ada/54osinte.ads +++ b/gcc/ada/54osinte.ads @@ -6,8 +6,7 @@ -- -- -- S p e c -- -- -- --- -- --- Copyright (C) 2000-2001 Ada Core Technologies, Inc. -- +-- Copyright (C) 2000-2002 Ada Core Technologies, Inc. -- -- -- -- GNARL 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- -- @@ -293,7 +292,7 @@ package System.OS_Interface is function sigwait (set : access sigset_t; sig : access Signal) return int; - pragma Import (C, sigwait, "sigwait"); + pragma Import (C, sigwait, "__posix_sigwait"); function pthread_kill (thread : pthread_t; diff --git a/gcc/ada/5amastop.adb b/gcc/ada/5amastop.adb index 4ed91dcb8c60..723e4a3a0060 100644 --- a/gcc/ada/5amastop.adb +++ b/gcc/ada/5amastop.adb @@ -7,8 +7,7 @@ -- B o d y -- -- (Version for Alpha/Dec Unix) -- -- -- --- -- --- Copyright (C) 1999-2001 Ada Core Technologies, Inc. -- +-- Copyright (C) 1999-2002 Ada Core Technologies, 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- -- @@ -29,7 +28,7 @@ -- covered by the GNU Public License. -- -- -- -- GNAT was originally developed by the GNAT team at New York University. -- --- It is now maintained by Ada Core Technologies Inc (http://www.gnat.com). -- +-- Extensive contributions were provided by Ada Core Technologies Inc. -- -- -- ------------------------------------------------------------------------------ @@ -106,8 +105,13 @@ package body System.Machine_State_Operations is -- asm instruction takes 4 bytes. So we must remove this value from -- c_get_code_loc to have the call point. + Loc : Code_Loc := c_get_code_loc (M); begin - return c_get_code_loc (M) - Asm_Call_Size; + if Loc = 0 then + return 0; + else + return Loc - Asm_Call_Size; + end if; end Get_Code_Loc; -------------------------- @@ -134,6 +138,8 @@ package body System.Machine_State_Operations is (M : Machine_State; Info : Subprogram_Info_Type) is + pragma Warnings (Off, Info); + procedure exc_virtual_unwind (Fcn : System.Address; M : Machine_State); @@ -162,7 +168,11 @@ package body System.Machine_State_Operations is procedure Set_Signal_Machine_State (M : Machine_State; - Context : System.Address) is + Context : System.Address) + is + pragma Warnings (Off, M); + pragma Warnings (Off, Context); + begin null; end Set_Signal_Machine_State; diff --git a/gcc/ada/5aosinte.adb b/gcc/ada/5aosinte.adb index d64f4642e557..bcf7d4534404 100644 --- a/gcc/ada/5aosinte.adb +++ b/gcc/ada/5aosinte.adb @@ -6,8 +6,7 @@ -- -- -- B o d y -- -- -- --- -- --- Copyright (C) 1991-2001 Florida State University -- +-- Copyright (C) 1998-2002, Free Software Foundation, Inc. -- -- -- -- GNARL 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- -- @@ -27,13 +26,12 @@ -- however invalidate any other reasons why the executable file might be -- -- covered by the GNU Public License. -- -- -- --- GNARL was developed by the GNARL team at Florida State University. It is -- --- now maintained by Ada Core Technologies Inc. in cooperation with Florida -- --- State University (http://www.gnat.com). -- +-- GNARL was developed by the GNARL team at Florida State University. -- +-- Extensive contributions were provided by Ada Core Technologies Inc. -- -- -- ------------------------------------------------------------------------------ --- This is the DEC Unix and IRIX version of this package. +-- This is the DEC Unix version of this package. -- This package encapsulates all direct interfaces to OS services -- that are needed by children of System. @@ -43,6 +41,8 @@ pragma Polling (Off); -- tasking operations. It causes infinite loops and other problems. with Interfaces.C; use Interfaces.C; +with System.Machine_Code; use System.Machine_Code; + package body System.OS_Interface is ------------------ @@ -54,6 +54,20 @@ package body System.OS_Interface is null; end pthread_init; + ------------------ + -- pthread_self -- + ------------------ + + function pthread_self return pthread_t is + Self : pthread_t; + begin + Asm ("call_pal 0x9e" & ASCII.LF & ASCII.HT & + "bis $31, $0, %0", + Outputs => pthread_t'Asm_Output ("=r", Self), + Clobber => "$0"); + return Self; + end pthread_self; + ----------------- -- To_Duration -- ----------------- @@ -88,10 +102,14 @@ package body System.OS_Interface is F := F + 1.0; end if; - return timespec' (tv_sec => S, - tv_nsec => long (Long_Long_Integer (F * 10#1#E9))); + return timespec'(tv_sec => S, + tv_nsec => long (Long_Long_Integer (F * 10#1#E9))); end To_Timespec; + ---------------- + -- To_Timeval -- + ---------------- + function To_Timeval (D : Duration) return struct_timeval is S : time_t; F : Duration; @@ -108,8 +126,10 @@ package body System.OS_Interface is F := F + 1.0; end if; - return struct_timeval' (tv_sec => S, - tv_usec => time_t (Long_Long_Integer (F * 10#1#E6))); + return + struct_timeval' + (tv_sec => S, + tv_usec => time_t (Long_Long_Integer (F * 10#1#E6))); end To_Timeval; end System.OS_Interface; diff --git a/gcc/ada/5aosinte.ads b/gcc/ada/5aosinte.ads index 815c5ac9c4ba..25733820e192 100644 --- a/gcc/ada/5aosinte.ads +++ b/gcc/ada/5aosinte.ads @@ -6,8 +6,7 @@ -- -- -- S p e c -- -- -- --- -- --- Copyright (C) 1998-2001 Free Software Foundation, Inc. -- +-- Copyright (C) 1998-2002 Free Software Foundation, Inc. -- -- -- -- GNARL 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- -- @@ -437,7 +436,7 @@ package System.OS_Interface is pragma Import (C, pthread_exit, "__pthread_exit"); function pthread_self return pthread_t; - pragma Import (C, pthread_self, "__pthread_self"); + pragma Inline (pthread_self); -------------------------- -- POSIX.1c Section 17 -- diff --git a/gcc/ada/5asystem.ads b/gcc/ada/5asystem.ads index edc63d0424b2..ee49d7176325 100644 --- a/gcc/ada/5asystem.ads +++ b/gcc/ada/5asystem.ads @@ -7,8 +7,7 @@ -- S p e c -- -- (DEC Unix Version) -- -- -- --- -- --- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- +-- Copyright (C) 1992-2003 Free Software Foundation, Inc. -- -- -- -- This specification is derived from the Ada Reference Manual for use with -- -- GNAT. The copyright notice above, and the license provisions that follow -- @@ -59,7 +58,7 @@ pragma Pure (System); Max_Mantissa : constant := 63; Fine_Delta : constant := 2.0 ** (-Max_Mantissa); - Tick : constant := 1.0; + Tick : constant := 1.0 / 1024.0; -- Storage-related Declarations @@ -120,6 +119,7 @@ private Backend_Overflow_Checks : constant Boolean := False; Command_Line_Args : constant Boolean := True; Denorm : constant Boolean := False; + Exit_Status_Supported : constant Boolean := True; Fractional_Fixed_Ops : constant Boolean := False; Frontend_Layout : constant Boolean := False; Functions_Return_By_DSP : constant Boolean := False; diff --git a/gcc/ada/5ataprop.adb b/gcc/ada/5ataprop.adb index 85c672ac704f..fbadd9b6aa10 100644 --- a/gcc/ada/5ataprop.adb +++ b/gcc/ada/5ataprop.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001, Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/5atasinf.ads b/gcc/ada/5atasinf.ads index 78d05365706e..e70ee3524083 100644 --- a/gcc/ada/5atasinf.ads +++ b/gcc/ada/5atasinf.ads @@ -7,7 +7,6 @@ -- S p e c -- -- (Compiler Interface) -- -- -- --- -- -- Copyright (C) 1998-2000 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/5ataspri.ads b/gcc/ada/5ataspri.ads index 2953bfc83074..b0cb9beef5cb 100644 --- a/gcc/ada/5ataspri.ads +++ b/gcc/ada/5ataspri.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1991-2000 Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/5atpopsp.adb b/gcc/ada/5atpopsp.adb index ee2ecf71d7d6..937041e22c10 100644 --- a/gcc/ada/5atpopsp.adb +++ b/gcc/ada/5atpopsp.adb @@ -7,7 +7,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001, Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/5avxwork.ads b/gcc/ada/5avxwork.ads index 47b90a9986b0..c78949327967 100644 --- a/gcc/ada/5avxwork.ads +++ b/gcc/ada/5avxwork.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1998-2001 Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/5bosinte.adb b/gcc/ada/5bosinte.adb index fe1fa084cf24..6c90fade486e 100644 --- a/gcc/ada/5bosinte.adb +++ b/gcc/ada/5bosinte.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1997-2001, Free Software Fundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/5bosinte.ads b/gcc/ada/5bosinte.ads index e5f2c5c6d16e..4f471d816c4f 100644 --- a/gcc/ada/5bosinte.ads +++ b/gcc/ada/5bosinte.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1997-2001 Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/5bsystem.ads b/gcc/ada/5bsystem.ads index 2ee53e0e858e..539b8df0afde 100644 --- a/gcc/ada/5bsystem.ads +++ b/gcc/ada/5bsystem.ads @@ -7,8 +7,7 @@ -- S p e c -- -- (AIX/PPC Version) -- -- -- --- -- --- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- +-- Copyright (C) 1992-2003 Free Software Foundation, Inc. -- -- -- -- This specification is derived from the Ada Reference Manual for use with -- -- GNAT. The copyright notice above, and the license provisions that follow -- @@ -59,7 +58,7 @@ pragma Pure (System); Max_Mantissa : constant := 63; Fine_Delta : constant := 2.0 ** (-Max_Mantissa); - Tick : constant := 1.0; + Tick : constant := 0.01; -- Storage-related Declarations @@ -120,6 +119,7 @@ private Backend_Overflow_Checks : constant Boolean := False; Command_Line_Args : constant Boolean := True; Denorm : constant Boolean := True; + Exit_Status_Supported : constant Boolean := True; Fractional_Fixed_Ops : constant Boolean := False; Frontend_Layout : constant Boolean := False; Functions_Return_By_DSP : constant Boolean := False; diff --git a/gcc/ada/5cosinte.ads b/gcc/ada/5cosinte.ads index 8c142f4955df..88dab8b21433 100644 --- a/gcc/ada/5cosinte.ads +++ b/gcc/ada/5cosinte.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1998-2001 Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/5dosinte.ads b/gcc/ada/5dosinte.ads index 5e5a1aa2177f..b76c1233c49f 100644 --- a/gcc/ada/5dosinte.ads +++ b/gcc/ada/5dosinte.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2001, Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/5esystem.ads b/gcc/ada/5esystem.ads index 2dee2011fb42..1d997840cfe5 100644 --- a/gcc/ada/5esystem.ads +++ b/gcc/ada/5esystem.ads @@ -5,10 +5,9 @@ -- S Y S T E M -- -- -- -- S p e c -- --- (X86 Solaris Version) -- +-- (x86 Solaris Version) -- -- -- --- -- --- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- +-- Copyright (C) 1992-2003 Free Software Foundation, Inc. -- -- -- -- This specification is derived from the Ada Reference Manual for use with -- -- GNAT. The copyright notice above, and the license provisions that follow -- @@ -59,7 +58,7 @@ pragma Pure (System); Max_Mantissa : constant := 63; Fine_Delta : constant := 2.0 ** (-Max_Mantissa); - Tick : constant := 1.0; + Tick : constant := 0.01; -- Storage-related Declarations @@ -120,6 +119,7 @@ private Backend_Overflow_Checks : constant Boolean := False; Command_Line_Args : constant Boolean := True; Denorm : constant Boolean := True; + Exit_Status_Supported : constant Boolean := True; Fractional_Fixed_Ops : constant Boolean := False; Frontend_Layout : constant Boolean := False; Functions_Return_By_DSP : constant Boolean := False; diff --git a/gcc/ada/5etpopse.adb b/gcc/ada/5etpopse.adb index 96749dd59a58..957a58332f32 100644 --- a/gcc/ada/5etpopse.adb +++ b/gcc/ada/5etpopse.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1991-1998, Florida State University -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/5fintman.adb b/gcc/ada/5fintman.adb index 1b25d7d20ff8..183544838a33 100644 --- a/gcc/ada/5fintman.adb +++ b/gcc/ada/5fintman.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1991-2001, Florida State University -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/5fosinte.ads b/gcc/ada/5fosinte.ads index 5b8aeaec815c..5a52148c48ed 100644 --- a/gcc/ada/5fosinte.ads +++ b/gcc/ada/5fosinte.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1998-2001, Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/5fsystem.ads b/gcc/ada/5fsystem.ads index b131c144093a..9da53a748e5f 100644 --- a/gcc/ada/5fsystem.ads +++ b/gcc/ada/5fsystem.ads @@ -7,8 +7,7 @@ -- S p e c -- -- (SGI Irix, o32 ABI) -- -- -- --- -- --- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- +-- Copyright (C) 1992-2003 Free Software Foundation, Inc. -- -- -- -- This specification is derived from the Ada Reference Manual for use with -- -- GNAT. The copyright notice above, and the license provisions that follow -- @@ -59,7 +58,7 @@ pragma Pure (System); Max_Mantissa : constant := 63; Fine_Delta : constant := 2.0 ** (-Max_Mantissa); - Tick : constant := 1.0; + Tick : constant := 0.01; -- Storage-related Declarations @@ -120,6 +119,7 @@ private Backend_Overflow_Checks : constant Boolean := False; Command_Line_Args : constant Boolean := True; Denorm : constant Boolean := False; + Exit_Status_Supported : constant Boolean := True; Fractional_Fixed_Ops : constant Boolean := False; Frontend_Layout : constant Boolean := False; Functions_Return_By_DSP : constant Boolean := True; diff --git a/gcc/ada/5ftaprop.adb b/gcc/ada/5ftaprop.adb index 7828de71a209..179f351eb7fe 100644 --- a/gcc/ada/5ftaprop.adb +++ b/gcc/ada/5ftaprop.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001, Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/5ftasinf.ads b/gcc/ada/5ftasinf.ads index 1797c5573271..0438b7664d3d 100644 --- a/gcc/ada/5ftasinf.ads +++ b/gcc/ada/5ftasinf.ads @@ -7,7 +7,6 @@ -- S p e c -- -- (Compiler Interface) -- -- -- --- -- -- Copyright (C) 1992-2000 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/5ginterr.adb b/gcc/ada/5ginterr.adb index 7d2eadeee989..2365dc1dac05 100644 --- a/gcc/ada/5ginterr.adb +++ b/gcc/ada/5ginterr.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1998-2001 Free Software Fundation -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/5gintman.adb b/gcc/ada/5gintman.adb index 4380591cfc39..8868a8479dc0 100644 --- a/gcc/ada/5gintman.adb +++ b/gcc/ada/5gintman.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1997-1998, Florida State University -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/5gmastop.adb b/gcc/ada/5gmastop.adb index 48077942ccc0..01e6381cadd6 100644 --- a/gcc/ada/5gmastop.adb +++ b/gcc/ada/5gmastop.adb @@ -7,7 +7,6 @@ -- B o d y -- -- (Version for IRIX/MIPS) -- -- -- --- -- -- Copyright (C) 1999-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/5gosinte.ads b/gcc/ada/5gosinte.ads index 5fa800898bfd..ab83d462f836 100644 --- a/gcc/ada/5gosinte.ads +++ b/gcc/ada/5gosinte.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1997-2001 Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/5gproinf.adb b/gcc/ada/5gproinf.adb index e0b99450e15f..3e6bbc9557d3 100644 --- a/gcc/ada/5gproinf.adb +++ b/gcc/ada/5gproinf.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1997-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/5gproinf.ads b/gcc/ada/5gproinf.ads index b4773b337c34..f185e81c0ae6 100644 --- a/gcc/ada/5gproinf.ads +++ b/gcc/ada/5gproinf.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1997 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/5gsystem.ads b/gcc/ada/5gsystem.ads index 295266b69f11..315724e19722 100644 --- a/gcc/ada/5gsystem.ads +++ b/gcc/ada/5gsystem.ads @@ -7,7 +7,6 @@ -- S p e c -- -- (SGI Irix, n32 ABI) -- -- -- --- -- -- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- -- -- -- This specification is derived from the Ada Reference Manual for use with -- diff --git a/gcc/ada/5gtaprop.adb b/gcc/ada/5gtaprop.adb index 96098f514f49..ae3ce107d1e5 100644 --- a/gcc/ada/5gtaprop.adb +++ b/gcc/ada/5gtaprop.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001, Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/5gtasinf.adb b/gcc/ada/5gtasinf.adb index 0db21a70838e..48eec8118baf 100644 --- a/gcc/ada/5gtasinf.adb +++ b/gcc/ada/5gtasinf.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/5gtasinf.ads b/gcc/ada/5gtasinf.ads index 1de0caaedf2b..31d2760c7dcf 100644 --- a/gcc/ada/5gtasinf.ads +++ b/gcc/ada/5gtasinf.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/5gtpgetc.adb b/gcc/ada/5gtpgetc.adb index 8b02ad9f9fcf..2754ae4a169b 100644 --- a/gcc/ada/5gtpgetc.adb +++ b/gcc/ada/5gtpgetc.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1999-2000 Free Software Fundation -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/5hosinte.adb b/gcc/ada/5hosinte.adb index 5436f4456948..51a288ab531d 100644 --- a/gcc/ada/5hosinte.adb +++ b/gcc/ada/5hosinte.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1991-2001, Florida State University -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/5hosinte.ads b/gcc/ada/5hosinte.ads index ac81cdaf18f6..117b2b4247ef 100644 --- a/gcc/ada/5hosinte.ads +++ b/gcc/ada/5hosinte.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1997-2001, Florida State University -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/5hparame.ads b/gcc/ada/5hparame.ads index d9dcd81ff691..ed5d8ac1a6ed 100644 --- a/gcc/ada/5hparame.ads +++ b/gcc/ada/5hparame.ads @@ -6,8 +6,7 @@ -- -- -- S p e c -- -- -- --- -- --- 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- -- @@ -95,6 +94,11 @@ pragma Pure (Parameters); -- when Size < Minimum_Stack_Size, return Minimum_Stack_Size -- otherwise return given Size + Default_Env_Stack_Size : constant Size_Type := 8_192_000; + -- Assumed size of the environment task, if no other information + -- is available. This value is used when stack checking is + -- enabled and no GNAT_STACK_LIMIT environment variable is set. + Stack_Grows_Down : constant Boolean := False; -- This constant indicates whether the stack grows up (False) or -- down (True) in memory as functions are called. It is used for diff --git a/gcc/ada/5hsystem.ads b/gcc/ada/5hsystem.ads index ec3789f378c8..f2d545355221 100644 --- a/gcc/ada/5hsystem.ads +++ b/gcc/ada/5hsystem.ads @@ -7,8 +7,7 @@ -- S p e c -- -- (HP-UX Version) -- -- -- --- -- --- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- +-- Copyright (C) 1992-2003 Free Software Foundation, Inc. -- -- -- -- This specification is derived from the Ada Reference Manual for use with -- -- GNAT. The copyright notice above, and the license provisions that follow -- @@ -59,7 +58,7 @@ pragma Pure (System); Max_Mantissa : constant := 63; Fine_Delta : constant := 2.0 ** (-Max_Mantissa); - Tick : constant := 1.0; + Tick : constant := 0.01; -- Storage-related Declarations @@ -102,6 +101,9 @@ pragma Pure (System); private + pragma Linker_Options ("-lpthread"); + -- To ease supporting --enable-threads=posix at configure-time. + type Address is mod Memory_Size; Null_Address : constant Address := 0; @@ -119,7 +121,8 @@ private Backend_Divide_Checks : constant Boolean := False; Backend_Overflow_Checks : constant Boolean := False; Command_Line_Args : constant Boolean := True; - Denorm : constant Boolean := False; + Denorm : constant Boolean := True; + Exit_Status_Supported : constant Boolean := True; Fractional_Fixed_Ops : constant Boolean := False; Frontend_Layout : constant Boolean := False; Functions_Return_By_DSP : constant Boolean := False; @@ -132,8 +135,8 @@ private Stack_Check_Default : constant Boolean := False; Stack_Check_Probes : constant Boolean := False; Use_Ada_Main_Program_Name : constant Boolean := False; - ZCX_By_Default : constant Boolean := False; - GCC_ZCX_Support : constant Boolean := False; + ZCX_By_Default : constant Boolean := True; + GCC_ZCX_Support : constant Boolean := True; Front_End_ZCX_Support : constant Boolean := False; -------------------------- diff --git a/gcc/ada/5htaprop.adb b/gcc/ada/5htaprop.adb index e6a127cf44b2..0d6a3d2b19fc 100644 --- a/gcc/ada/5htaprop.adb +++ b/gcc/ada/5htaprop.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001, Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/5htaspri.ads b/gcc/ada/5htaspri.ads index d51ad3767b5e..ae5c014764c4 100644 --- a/gcc/ada/5htaspri.ads +++ b/gcc/ada/5htaspri.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1991-2000 Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/5htraceb.adb b/gcc/ada/5htraceb.adb index b09de6d78239..9a59aa612b30 100644 --- a/gcc/ada/5htraceb.adb +++ b/gcc/ada/5htraceb.adb @@ -7,7 +7,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1999-2002 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- @@ -29,7 +28,7 @@ -- covered by the GNU Public License. -- -- -- -- GNAT was originally developed by the GNAT team at New York University. -- --- It is now maintained by Ada Core Technologies Inc (http://www.gnat.com). -- +-- Extensive contributions were provided by Ada Core Technologies Inc. -- -- -- ------------------------------------------------------------------------------ diff --git a/gcc/ada/5iosinte.adb b/gcc/ada/5iosinte.adb index 3bf7994c3f40..fd3371887c01 100644 --- a/gcc/ada/5iosinte.adb +++ b/gcc/ada/5iosinte.adb @@ -6,8 +6,7 @@ -- -- -- B o d y -- -- -- --- -- --- Copyright (C) 1991-2001 Florida State University -- +-- Copyright (C) 1991-2002 Florida State University -- -- -- -- GNARL 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- -- @@ -51,6 +50,8 @@ package body System.OS_Interface is -------------------- function Get_Stack_Base (thread : pthread_t) return Address is + pragma Warnings (Off, thread); + begin return Null_Address; end Get_Stack_Base; @@ -98,8 +99,8 @@ package body System.OS_Interface is F := F + 1.0; end if; - return timespec' - (tv_sec => S, tv_nsec => long (Long_Long_Integer (F * 10#1#E9))); + return timespec'(tv_sec => S, + tv_nsec => long (Long_Long_Integer (F * 10#1#E9))); end To_Timespec; ---------------- @@ -122,8 +123,10 @@ package body System.OS_Interface is F := F + 1.0; end if; - return struct_timeval' - (tv_sec => S, tv_usec => time_t (Long_Long_Integer (F * 10#1#E6))); + return + struct_timeval' + (tv_sec => S, + tv_usec => time_t (Long_Long_Integer (F * 10#1#E6))); end To_Timeval; end System.OS_Interface; diff --git a/gcc/ada/5iosinte.ads b/gcc/ada/5iosinte.ads index ea5e6a9928f6..81b82ec3c5cc 100644 --- a/gcc/ada/5iosinte.ads +++ b/gcc/ada/5iosinte.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1991-2001 Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/5itaprop.adb b/gcc/ada/5itaprop.adb index 137748c0c92a..13d5361a905b 100644 --- a/gcc/ada/5itaprop.adb +++ b/gcc/ada/5itaprop.adb @@ -6,8 +6,7 @@ -- -- -- B o d y -- -- -- --- -- --- Copyright (C) 1992-2001, Free Software Foundation, Inc. -- +-- Copyright (C) 1992-2003, Free Software Foundation, Inc. -- -- -- -- GNARL 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- -- @@ -339,10 +338,12 @@ package body System.Task_Primitives.Operations is -- Stack_Guard -- ----------------- - -- The underlying thread system extends the memory (up to 2MB) when - -- needed. + -- The underlying thread system extends the memory (up to 2MB) when needed procedure Stack_Guard (T : ST.Task_ID; On : Boolean) is + pragma Unreferenced (T); + pragma Unreferenced (On); + begin null; end Stack_Guard; @@ -367,17 +368,18 @@ package body System.Task_Primitives.Operations is --------------------- -- Note: mutexes and cond_variables needed per-task basis are - -- initialized in Initialize_TCB and the Storage_Error is - -- handled. Other mutexes (such as RTS_Lock, Memory_Lock...) - -- used in RTS is initialized before any status change of RTS. - -- Therefore rasing Storage_Error in the following routines - -- should be able to be handled safely. + -- initialized in Initialize_TCB and the Storage_Error is + -- handled. Other mutexes (such as RTS_Lock, Memory_Lock...) + -- used in RTS is initialized before any status change of RTS. + -- Therefore rasing Storage_Error in the following routines + -- should be able to be handled safely. procedure Initialize_Lock (Prio : System.Any_Priority; L : access Lock) is Result : Interfaces.C.int; + begin if Priority_Ceiling_Emulation then L.Ceiling := Prio; @@ -394,6 +396,8 @@ package body System.Task_Primitives.Operations is end Initialize_Lock; procedure Initialize_Lock (L : access RTS_Lock; Level : Lock_Level) is + pragma Unreferenced (Level); + Result : Interfaces.C.int; begin @@ -432,35 +436,45 @@ package body System.Task_Primitives.Operations is procedure Write_Lock (L : access Lock; Ceiling_Violation : out Boolean) is Result : Interfaces.C.int; + begin if Priority_Ceiling_Emulation then declare Self_ID : constant Task_ID := Self; + begin if Self_ID.Common.LL.Active_Priority > L.Ceiling then Ceiling_Violation := True; return; end if; + L.Saved_Priority := Self_ID.Common.LL.Active_Priority; + if Self_ID.Common.LL.Active_Priority < L.Ceiling then Self_ID.Common.LL.Active_Priority := L.Ceiling; end if; + Result := pthread_mutex_lock (L.L'Access); pragma Assert (Result = 0); Ceiling_Violation := False; end; + else Result := pthread_mutex_lock (L.L'Access); Ceiling_Violation := Result = EINVAL; - -- assumes the cause of EINVAL is a priority ceiling violation + + -- Assume the cause of EINVAL is a priority ceiling violation + pragma Assert (Result = 0 or else Result = EINVAL); end if; end Write_Lock; procedure Write_Lock - (L : access RTS_Lock; Global_Lock : Boolean := False) + (L : access RTS_Lock; + Global_Lock : Boolean := False) is Result : Interfaces.C.int; + begin if not Single_Lock or else Global_Lock then Result := pthread_mutex_lock (L); @@ -470,6 +484,7 @@ package body System.Task_Primitives.Operations is procedure Write_Lock (T : Task_ID) is Result : Interfaces.C.int; + begin if not Single_Lock then Result := pthread_mutex_lock (T.Common.LL.L'Access); @@ -492,17 +507,21 @@ package body System.Task_Primitives.Operations is procedure Unlock (L : access Lock) is Result : Interfaces.C.int; + begin if Priority_Ceiling_Emulation then declare Self_ID : constant Task_ID := Self; + begin Result := pthread_mutex_unlock (L.L'Access); pragma Assert (Result = 0); + if Self_ID.Common.LL.Active_Priority > L.Saved_Priority then Self_ID.Common.LL.Active_Priority := L.Saved_Priority; end if; end; + else Result := pthread_mutex_unlock (L.L'Access); pragma Assert (Result = 0); @@ -511,6 +530,7 @@ package body System.Task_Primitives.Operations is procedure Unlock (L : access RTS_Lock; Global_Lock : Boolean := False) is Result : Interfaces.C.int; + begin if not Single_Lock or else Global_Lock then Result := pthread_mutex_unlock (L); @@ -520,6 +540,7 @@ package body System.Task_Primitives.Operations is procedure Unlock (T : Task_ID) is Result : Interfaces.C.int; + begin if not Single_Lock then Result := pthread_mutex_unlock (T.Common.LL.L'Access); @@ -532,10 +553,13 @@ package body System.Task_Primitives.Operations is ----------- procedure Sleep - (Self_ID : Task_ID; + (Self_ID : Task_ID; Reason : System.Tasking.Task_States) is + pragma Unreferenced (Reason); + Result : Interfaces.C.int; + begin pragma Assert (Self_ID = Self); @@ -567,10 +591,13 @@ package body System.Task_Primitives.Operations is Timedout : out Boolean; Yielded : out Boolean) is + pragma Unreferenced (Reason); + Check_Time : constant Duration := Monotonic_Clock; Abs_Time : Duration; Request : aliased timespec; Result : Interfaces.C.int; + begin Timedout := True; Yielded := False; @@ -718,6 +745,8 @@ package body System.Task_Primitives.Operations is ------------ procedure Wakeup (T : Task_ID; Reason : System.Tasking.Task_States) is + pragma Unreferenced (Reason); + Result : Interfaces.C.int; begin @@ -743,10 +772,12 @@ package body System.Task_Primitives.Operations is ------------------ procedure Set_Priority - (T : Task_ID; - Prio : System.Any_Priority; + (T : Task_ID; + Prio : System.Any_Priority; Loss_Of_Inheritance : Boolean := False) is + pragma Unreferenced (Loss_Of_Inheritance); + Result : Interfaces.C.int; Param : aliased struct_sched_param; @@ -967,10 +998,11 @@ package body System.Task_Primitives.Operations is -- Check_Exit -- ---------------- - -- Dummy versions. The only currently working versions is for solaris - -- (native). + -- Dummy version function Check_Exit (Self_ID : ST.Task_ID) return Boolean is + pragma Unreferenced (Self_ID); + begin return True; end Check_Exit; @@ -980,6 +1012,8 @@ package body System.Task_Primitives.Operations is -------------------- function Check_No_Locks (Self_ID : ST.Task_ID) return Boolean is + pragma Unreferenced (Self_ID); + begin return True; end Check_No_Locks; @@ -999,7 +1033,9 @@ package body System.Task_Primitives.Operations is function Suspend_Task (T : ST.Task_ID; - Thread_Self : Thread_Id) return Boolean is + Thread_Self : Thread_Id) + return Boolean + is begin if T.Common.LL.Thread /= Thread_Self then return pthread_kill (T.Common.LL.Thread, SIGSTOP) = 0; @@ -1014,7 +1050,9 @@ package body System.Task_Primitives.Operations is function Resume_Task (T : ST.Task_ID; - Thread_Self : Thread_Id) return Boolean is + Thread_Self : Thread_Id) + return Boolean + is begin if T.Common.LL.Thread /= Thread_Self then return pthread_kill (T.Common.LL.Thread, SIGCONT) = 0; @@ -1043,6 +1081,7 @@ package body System.Task_Primitives.Operations is pragma Assert (Result = 0 or else Result = ENOMEM); Initialize_Lock (Single_RTS_Lock'Access, RTS_Lock_Level); + -- Initialize the global RTS lock Specific.Initialize (Environment_Task); @@ -1069,6 +1108,7 @@ package body System.Task_Primitives.Operations is begin declare Result : Interfaces.C.int; + begin -- Mask Environment task for all signals. The original mask of the -- Environment task will be recovered by Interrupt_Server task diff --git a/gcc/ada/5itaspri.ads b/gcc/ada/5itaspri.ads index 4c02c459ab97..c26def9fb426 100644 --- a/gcc/ada/5itaspri.ads +++ b/gcc/ada/5itaspri.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1991-2001 Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/5ksystem.ads b/gcc/ada/5ksystem.ads index 6854da1b47b3..afef59ee0147 100644 --- a/gcc/ada/5ksystem.ads +++ b/gcc/ada/5ksystem.ads @@ -7,8 +7,7 @@ -- S p e c -- -- (VxWorks version M68K) -- -- -- --- -- --- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- +-- Copyright (C) 1992-2003 Free Software Foundation, Inc. -- -- -- -- This specification is derived from the Ada Reference Manual for use with -- -- GNAT. The copyright notice above, and the license provisions that follow -- @@ -59,7 +58,7 @@ pragma Pure (System); Max_Mantissa : constant := 63; Fine_Delta : constant := 2.0 ** (-Max_Mantissa); - Tick : constant := 1.0; + Tick : constant := 1.0 / 60.0; -- Storage-related Declarations @@ -128,6 +127,7 @@ private Backend_Overflow_Checks : constant Boolean := False; Command_Line_Args : constant Boolean := False; Denorm : constant Boolean := True; + Exit_Status_Supported : constant Boolean := True; Fractional_Fixed_Ops : constant Boolean := False; Frontend_Layout : constant Boolean := False; Functions_Return_By_DSP : constant Boolean := False; diff --git a/gcc/ada/5kvxwork.ads b/gcc/ada/5kvxwork.ads index dc4c7abadf02..47a4e4bb5ef0 100644 --- a/gcc/ada/5kvxwork.ads +++ b/gcc/ada/5kvxwork.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1998-2001 Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/5lintman.adb b/gcc/ada/5lintman.adb index 492f5ec9a1d0..4db8c763c9f6 100644 --- a/gcc/ada/5lintman.adb +++ b/gcc/ada/5lintman.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1991-2002 Florida State University -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/5lml-tgt.adb b/gcc/ada/5lml-tgt.adb index bdabc5bc64e2..f884381d5ef9 100644 --- a/gcc/ada/5lml-tgt.adb +++ b/gcc/ada/5lml-tgt.adb @@ -7,7 +7,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 2001, Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/5losinte.ads b/gcc/ada/5losinte.ads index f101cce0d10e..2de2e91617dc 100644 --- a/gcc/ada/5losinte.ads +++ b/gcc/ada/5losinte.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1991-2001 Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/5lsystem.ads b/gcc/ada/5lsystem.ads index 951404c39264..c39e7c61d93f 100644 --- a/gcc/ada/5lsystem.ads +++ b/gcc/ada/5lsystem.ads @@ -7,8 +7,7 @@ -- S p e c -- -- (GNU-Linux/x86 Version) -- -- -- --- -- --- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- +-- Copyright (C) 1992-2003 Free Software Foundation, Inc. -- -- -- -- This specification is derived from the Ada Reference Manual for use with -- -- GNAT. The copyright notice above, and the license provisions that follow -- @@ -59,7 +58,7 @@ pragma Pure (System); Max_Mantissa : constant := 63; Fine_Delta : constant := 2.0 ** (-Max_Mantissa); - Tick : constant := 1.0; + Tick : constant := 0.01; -- Storage-related Declarations @@ -120,6 +119,7 @@ private Backend_Overflow_Checks : constant Boolean := False; Command_Line_Args : constant Boolean := True; Denorm : constant Boolean := True; + Exit_Status_Supported : constant Boolean := True; Fractional_Fixed_Ops : constant Boolean := False; Frontend_Layout : constant Boolean := False; Functions_Return_By_DSP : constant Boolean := False; @@ -135,4 +135,5 @@ private ZCX_By_Default : constant Boolean := False; GCC_ZCX_Support : constant Boolean := False; Front_End_ZCX_Support : constant Boolean := False; + end System; diff --git a/gcc/ada/5mosinte.ads b/gcc/ada/5mosinte.ads index 04aabb12eaba..17ed7f51025e 100644 --- a/gcc/ada/5mosinte.ads +++ b/gcc/ada/5mosinte.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1997-2001, Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/5mvxwork.ads b/gcc/ada/5mvxwork.ads index 6aec2673b69f..468d65054409 100644 --- a/gcc/ada/5mvxwork.ads +++ b/gcc/ada/5mvxwork.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1998-2001 Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/5ninmaop.adb b/gcc/ada/5ninmaop.adb index 5e3d56893aea..c977fec01a20 100644 --- a/gcc/ada/5ninmaop.adb +++ b/gcc/ada/5ninmaop.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/5nintman.adb b/gcc/ada/5nintman.adb index f62ecff01b45..a335add09a6a 100644 --- a/gcc/ada/5nintman.adb +++ b/gcc/ada/5nintman.adb @@ -6,8 +6,7 @@ -- -- -- B o d y -- -- -- --- -- --- Copyright (C) 1991-1996, 1998 Free Software Foundation, Inc. -- +-- Copyright (C) 1997-2002 Free Software Foundation, Inc. -- -- -- -- GNARL 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- -- @@ -32,6 +31,8 @@ -- -- ------------------------------------------------------------------------------ +-- This is a NO tasking version of this package. + package body System.Interrupt_Management is --------------------------- diff --git a/gcc/ada/5nosinte.ads b/gcc/ada/5nosinte.ads index e7f4fd643a1c..d85b13770b78 100644 --- a/gcc/ada/5nosinte.ads +++ b/gcc/ada/5nosinte.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/5ntaprop.adb b/gcc/ada/5ntaprop.adb index fd6ce7802e34..0562c9c7640f 100644 --- a/gcc/ada/5ntaprop.adb +++ b/gcc/ada/5ntaprop.adb @@ -6,8 +6,7 @@ -- -- -- B o d y -- -- -- --- -- --- Copyright (C) 1992-2001, Free Software Foundation, Inc. -- +-- Copyright (C) 1992-2002, Free Software Foundation, Inc. -- -- -- -- GNARL 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- -- @@ -53,6 +52,9 @@ package body System.Task_Primitives.Operations is use System.Tasking; use System.Parameters; + pragma Warnings (Off); + -- Turn off warnings since so many unreferenced parameters + ----------------- -- Stack_Guard -- ----------------- @@ -86,7 +88,8 @@ package body System.Task_Primitives.Operations is procedure Initialize_Lock (Prio : System.Any_Priority; - L : access Lock) is + L : access Lock) + is begin null; end Initialize_Lock; @@ -120,7 +123,8 @@ package body System.Task_Primitives.Operations is end Write_Lock; procedure Write_Lock - (L : access RTS_Lock; Global_Lock : Boolean := False) + (L : access RTS_Lock; + Global_Lock : Boolean := False) is begin null; @@ -375,7 +379,9 @@ package body System.Task_Primitives.Operations is function Suspend_Task (T : ST.Task_ID; - Thread_Self : OSI.Thread_Id) return Boolean is + Thread_Self : OSI.Thread_Id) + return Boolean + is begin return False; end Suspend_Task; @@ -386,7 +392,9 @@ package body System.Task_Primitives.Operations is function Resume_Task (T : ST.Task_ID; - Thread_Self : OSI.Thread_Id) return Boolean is + Thread_Self : OSI.Thread_Id) + return Boolean + is begin return False; end Resume_Task; diff --git a/gcc/ada/5ntaspri.ads b/gcc/ada/5ntaspri.ads index 7520c04ab592..78b51236471d 100644 --- a/gcc/ada/5ntaspri.ads +++ b/gcc/ada/5ntaspri.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1991-2000 Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/5ointerr.adb b/gcc/ada/5ointerr.adb index 5685cc0ff56d..4d46c8ef63d1 100644 --- a/gcc/ada/5ointerr.adb +++ b/gcc/ada/5ointerr.adb @@ -6,8 +6,7 @@ -- -- -- B o d y -- -- -- --- -- --- Copyright (C) 1991-2001 Florida State University -- +-- Copyright (C) 1991-2002 Florida State University -- -- -- -- GNARL 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- -- @@ -59,9 +58,9 @@ package body System.Interrupts is -------------------- procedure Attach_Handler - (New_Handler : in Parameterless_Handler; - Interrupt : in Interrupt_ID; - Static : in Boolean := False) + (New_Handler : Parameterless_Handler; + Interrupt : Interrupt_ID; + Static : Boolean := False) is begin Unimplemented; @@ -107,8 +106,8 @@ package body System.Interrupts is -------------------- procedure Detach_Handler - (Interrupt : in Interrupt_ID; - Static : in Boolean := False) + (Interrupt : Interrupt_ID; + Static : Boolean := False) is begin Unimplemented; @@ -129,9 +128,9 @@ package body System.Interrupts is procedure Exchange_Handler (Old_Handler : out Parameterless_Handler; - New_Handler : in Parameterless_Handler; - Interrupt : in Interrupt_ID; - Static : in Boolean := False) + New_Handler : Parameterless_Handler; + Interrupt : Interrupt_ID; + Static : Boolean := False) is begin Old_Handler := null; @@ -155,6 +154,8 @@ package body System.Interrupts is (Object : access Dynamic_Interrupt_Protection) return Boolean is + pragma Warnings (Off, Object); + begin Unimplemented; return True; @@ -164,6 +165,8 @@ package body System.Interrupts is (Object : access Static_Interrupt_Protection) return Boolean is + pragma Warnings (Off, Object); + begin Unimplemented; return True; @@ -184,7 +187,7 @@ package body System.Interrupts is procedure Install_Handlers (Object : access Static_Interrupt_Protection; - New_Handlers : in New_Handler_Array) + New_Handlers : New_Handler_Array) is begin Unimplemented; diff --git a/gcc/ada/5omastop.adb b/gcc/ada/5omastop.adb index f4ce4ced8aa5..7fa6fb6560bb 100644 --- a/gcc/ada/5omastop.adb +++ b/gcc/ada/5omastop.adb @@ -7,7 +7,6 @@ -- B o d y -- -- (Version for x86) -- -- -- --- -- -- Copyright (C) 1999-2002 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- @@ -29,7 +28,7 @@ -- covered by the GNU Public License. -- -- -- -- GNAT was originally developed by the GNAT team at New York University. -- --- It is now maintained by Ada Core Technologies Inc (http://www.gnat.com). -- +-- Extensive contributions were provided by Ada Core Technologies Inc. -- -- -- ------------------------------------------------------------------------------ diff --git a/gcc/ada/5oosinte.adb b/gcc/ada/5oosinte.adb index 36d2b5743549..538b3fa95fe5 100644 --- a/gcc/ada/5oosinte.adb +++ b/gcc/ada/5oosinte.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1991-2002 Florida State University -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- @@ -111,8 +110,8 @@ package body System.OS_Interface is Tick_Count : aliased QWORD; begin - -- Read nr of clock ticks since boot time + Must_Not_Fail (DosTmrQueryTime (Tick_Count'Access)); return Tick_Count * Tick_Duration; diff --git a/gcc/ada/5oosinte.ads b/gcc/ada/5oosinte.ads index e05aa8415589..b2b4b2987ebb 100644 --- a/gcc/ada/5oosinte.ads +++ b/gcc/ada/5oosinte.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1991-2001 Florida State University -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/5oosprim.adb b/gcc/ada/5oosprim.adb index 3741f33ecd19..b56c35ded94d 100644 --- a/gcc/ada/5oosprim.adb +++ b/gcc/ada/5oosprim.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1998-2001 Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/5oparame.adb b/gcc/ada/5oparame.adb index a6b498cb34e1..697c5959f820 100644 --- a/gcc/ada/5oparame.adb +++ b/gcc/ada/5oparame.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1997-1998 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/5osystem.ads b/gcc/ada/5osystem.ads index b13aee66b0cd..404da6601f1f 100644 --- a/gcc/ada/5osystem.ads +++ b/gcc/ada/5osystem.ads @@ -7,8 +7,7 @@ -- S p e c -- -- (OS/2 Version) -- -- -- --- -- --- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- +-- Copyright (C) 1992-2003 Free Software Foundation, Inc. -- -- -- -- This specification is derived from the Ada Reference Manual for use with -- -- GNAT. The copyright notice above, and the license provisions that follow -- @@ -59,7 +58,7 @@ pragma Pure (System); Max_Mantissa : constant := 63; Fine_Delta : constant := 2.0 ** (-Max_Mantissa); - Tick : constant := 1.0; + Tick : constant := 0.01; -- Storage-related Declarations @@ -120,6 +119,7 @@ private Backend_Overflow_Checks : constant Boolean := False; Command_Line_Args : constant Boolean := True; Denorm : constant Boolean := True; + Exit_Status_Supported : constant Boolean := True; Fractional_Fixed_Ops : constant Boolean := False; Frontend_Layout : constant Boolean := False; Functions_Return_By_DSP : constant Boolean := False; diff --git a/gcc/ada/5otaprop.adb b/gcc/ada/5otaprop.adb index f3517cf1ade6..297a48cc6fc0 100644 --- a/gcc/ada/5otaprop.adb +++ b/gcc/ada/5otaprop.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2002, Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/5otaspri.ads b/gcc/ada/5otaspri.ads index 434b27a5e929..9dd412cf421c 100644 --- a/gcc/ada/5otaspri.ads +++ b/gcc/ada/5otaspri.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1991-2001 Florida State University -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/5posinte.ads b/gcc/ada/5posinte.ads index 155bf0254b64..1db503934b9a 100644 --- a/gcc/ada/5posinte.ads +++ b/gcc/ada/5posinte.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1997-2001 Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/5posprim.adb b/gcc/ada/5posprim.adb index d0553e3360f3..1dfb37110cec 100644 --- a/gcc/ada/5posprim.adb +++ b/gcc/ada/5posprim.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1998-2001 Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/5pvxwork.ads b/gcc/ada/5pvxwork.ads index 1938e086b4b5..829daa239445 100644 --- a/gcc/ada/5pvxwork.ads +++ b/gcc/ada/5pvxwork.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1998-2001 Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/5qosinte.adb b/gcc/ada/5qosinte.adb index db2b8d901790..59d34acd4c8f 100644 --- a/gcc/ada/5qosinte.adb +++ b/gcc/ada/5qosinte.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1991-2001 Florida State University -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/5qosinte.ads b/gcc/ada/5qosinte.ads index b1e7eb6efd10..06f0e6cfc96e 100644 --- a/gcc/ada/5qosinte.ads +++ b/gcc/ada/5qosinte.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1991-2001 Florida State University -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/5qstache.adb b/gcc/ada/5qstache.adb index 2ad9dceb02a1..58460cdfb0f7 100644 --- a/gcc/ada/5qstache.adb +++ b/gcc/ada/5qstache.adb @@ -7,7 +7,6 @@ -- B o d y -- -- (Dummy version) -- -- -- --- -- -- Copyright (C) 2000 Ada Core Technologies, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/5qtaprop.adb b/gcc/ada/5qtaprop.adb index 988f8ba9e095..aa1e97be6942 100644 --- a/gcc/ada/5qtaprop.adb +++ b/gcc/ada/5qtaprop.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001, Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/5qtaspri.ads b/gcc/ada/5qtaspri.ads index 89dafed16698..0bd2d2fe6adf 100644 --- a/gcc/ada/5qtaspri.ads +++ b/gcc/ada/5qtaspri.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1991-2001, Florida State University -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/5rosinte.adb b/gcc/ada/5rosinte.adb index a0a738109f44..f4bfca547663 100644 --- a/gcc/ada/5rosinte.adb +++ b/gcc/ada/5rosinte.adb @@ -6,8 +6,7 @@ -- -- -- B o d y -- -- -- --- -- --- Copyright (C) 1991-2000 Florida State University -- +-- Copyright (C) 1991-2002 Florida State University -- -- -- -- GNARL 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- -- @@ -69,13 +68,12 @@ package body System.OS_Interface is S := time_t (Long_Long_Integer (D)); F := D - Duration (S); - -- If F has negative value due to a round-up, adjust for positive F - -- value. - if F < 0.0 then S := S - 1; F := F + 1.0; end if; - return timespec' (tv_sec => S, - tv_nsec => long (Long_Long_Integer (F * 10#1#E9))); - end To_Timespec; + -- If F has negative value due to round-up, adjust for positive F value + if F < 0.0 then S := S - 1; F := F + 1.0; end if; + return timespec'(tv_sec => S, + tv_nsec => long (Long_Long_Integer (F * 10#1#E9))); + end To_Timespec; function To_Duration (TV : struct_timeval) return Duration is begin @@ -92,8 +90,10 @@ package body System.OS_Interface is -- If F has negative value due to a round-up, adjust for positive F -- value. if F < 0.0 then S := S - 1; F := F + 1.0; end if; - return struct_timeval' (tv_sec => S, - tv_usec => int (Long_Long_Integer (F * 10#1#E6))); + return + struct_timeval' + (tv_sec => S, + tv_usec => int (Long_Long_Integer (F * 10#1#E6))); end To_Timeval; procedure pthread_init is @@ -102,6 +102,8 @@ package body System.OS_Interface is end pthread_init; function Get_Stack_Base (thread : pthread_t) return Address is + pragma Warnings (Off, thread); + begin return Null_Address; end Get_Stack_Base; diff --git a/gcc/ada/5rosinte.ads b/gcc/ada/5rosinte.ads index 649499aae1bd..710176c12226 100644 --- a/gcc/ada/5rosinte.ads +++ b/gcc/ada/5rosinte.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1997-2003 Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- @@ -88,6 +87,7 @@ package System.OS_Interface is Max_Interrupt : constant := 31; type Signal is new int range 0 .. Max_Interrupt; + SIGXCPU : constant := 0; -- XCPU SIGHUP : constant := 1; -- hangup SIGINT : constant := 2; -- interrupt (rubout) SIGQUIT : constant := 3; -- quit (ASCD FS) @@ -106,7 +106,6 @@ package System.OS_Interface is SIGTERM : constant := 15; -- software termination signal from kill SIGUSR1 : constant := 16; -- user defined signal 1 SIGUSR2 : constant := 17; -- user defined signal 2 - SIGXCPU : constant := 0; -- XCPU SIGADAABORT : constant := SIGABRT; diff --git a/gcc/ada/5rparame.adb b/gcc/ada/5rparame.adb index 2a7cf5b777ef..b6e15c776a88 100644 --- a/gcc/ada/5rparame.adb +++ b/gcc/ada/5rparame.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1997-1998 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/5sintman.adb b/gcc/ada/5sintman.adb index 4f117818f3bb..77315a7a15bc 100644 --- a/gcc/ada/5sintman.adb +++ b/gcc/ada/5sintman.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/5sosinte.adb b/gcc/ada/5sosinte.adb index bb90d60cfc45..2909c7d0a4e8 100644 --- a/gcc/ada/5sosinte.adb +++ b/gcc/ada/5sosinte.adb @@ -6,8 +6,7 @@ -- -- -- B o d y -- -- -- --- -- --- Copyright (C) 1991-2001 Florida State University -- +-- Copyright (C) 1991-2002 Florida State University -- -- -- -- GNARL 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- -- @@ -68,8 +67,8 @@ package body System.OS_Interface is -- If F has negative value due to a round-up, adjust for positive F -- value. if F < 0.0 then S := S - 1; F := F + 1.0; end if; - return timespec' (tv_sec => S, - tv_nsec => long (Long_Long_Integer (F * 10#1#E9))); + return timespec'(tv_sec => S, + tv_nsec => long (Long_Long_Integer (F * 10#1#E9))); end To_Timespec; function To_Duration (TV : struct_timeval) return Duration is @@ -87,8 +86,10 @@ package body System.OS_Interface is -- If F has negative value due to a round-up, adjust for positive F -- value. if F < 0.0 then S := S - 1; F := F + 1.0; end if; - return struct_timeval' (tv_sec => S, - tv_usec => long (Long_Long_Integer (F * 10#1#E6))); + return + struct_timeval' + (tv_sec => S, + tv_usec => long (Long_Long_Integer (F * 10#1#E6))); end To_Timeval; procedure pthread_init is diff --git a/gcc/ada/5sosinte.ads b/gcc/ada/5sosinte.ads index 33f1ffdad5c5..1bd01f161c5a 100644 --- a/gcc/ada/5sosinte.ads +++ b/gcc/ada/5sosinte.ads @@ -6,8 +6,7 @@ -- -- -- S p e c -- -- -- --- -- --- Copyright (C) 1997-2001 Free Software Foundation, Inc. -- +-- Copyright (C) 1997-2002 Free Software Foundation, Inc. -- -- -- -- GNARL 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- -- @@ -127,7 +126,8 @@ package System.OS_Interface is -- Following signals should not be disturbed. -- See c-posix-signals.c in FLORIST - Reserved : constant Signal_Set := (SIGKILL, SIGSTOP, SIGWAITING, SIGCANCEL); + Reserved : constant Signal_Set := + (SIGKILL, SIGSTOP, SIGWAITING, SIGCANCEL, SIGTRAP, SIGSEGV); type sigset_t is private; @@ -259,6 +259,10 @@ package System.OS_Interface is (clock_id : clockid_t; tp : access timespec) return int; pragma Import (C, clock_gettime, "clock_gettime"); + function clock_getres + (clock_id : clockid_t; res : access timespec) return int; + pragma Import (C, clock_getres, "clock_getres"); + function To_Duration (TS : timespec) return Duration; pragma Inline (To_Duration); diff --git a/gcc/ada/5sparame.adb b/gcc/ada/5sparame.adb index 952196dd8cce..847dda820e88 100644 --- a/gcc/ada/5sparame.adb +++ b/gcc/ada/5sparame.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1998-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/5ssystem.ads b/gcc/ada/5ssystem.ads index 506fb6700a9c..d39b090dc72d 100644 --- a/gcc/ada/5ssystem.ads +++ b/gcc/ada/5ssystem.ads @@ -7,8 +7,7 @@ -- S p e c -- -- (SUN Solaris Version) -- -- -- --- -- --- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- +-- Copyright (C) 1992-2003 Free Software Foundation, Inc. -- -- -- -- This specification is derived from the Ada Reference Manual for use with -- -- GNAT. The copyright notice above, and the license provisions that follow -- @@ -59,7 +58,7 @@ pragma Pure (System); Max_Mantissa : constant := 63; Fine_Delta : constant := 2.0 ** (-Max_Mantissa); - Tick : constant := 1.0; + Tick : constant := 0.01; -- Storage-related Declarations @@ -120,6 +119,7 @@ private Backend_Overflow_Checks : constant Boolean := False; Command_Line_Args : constant Boolean := True; Denorm : constant Boolean := True; + Exit_Status_Supported : constant Boolean := True; Fractional_Fixed_Ops : constant Boolean := False; Frontend_Layout : constant Boolean := False; Functions_Return_By_DSP : constant Boolean := False; @@ -132,8 +132,8 @@ private Stack_Check_Default : constant Boolean := False; Stack_Check_Probes : constant Boolean := True; Use_Ada_Main_Program_Name : constant Boolean := False; - ZCX_By_Default : constant Boolean := False; - GCC_ZCX_Support : constant Boolean := False; + ZCX_By_Default : constant Boolean := True; + GCC_ZCX_Support : constant Boolean := True; Front_End_ZCX_Support : constant Boolean := False; end System; diff --git a/gcc/ada/5staprop.adb b/gcc/ada/5staprop.adb index dd1143fe837f..e23bd0163e57 100644 --- a/gcc/ada/5staprop.adb +++ b/gcc/ada/5staprop.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2002, Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/5stasinf.adb b/gcc/ada/5stasinf.adb index 9bd2e1e75431..859bcd082ecd 100644 --- a/gcc/ada/5stasinf.adb +++ b/gcc/ada/5stasinf.adb @@ -6,8 +6,7 @@ -- -- -- B o d y -- -- -- --- -- --- Copyright (C) 1992-1998 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- -- @@ -57,18 +56,18 @@ package body System.Task_Info is function New_Unbound_Thread_Attributes return Task_Info_Type is begin - return new Thread_Attributes' (False, False); + return new Thread_Attributes'(False, False); end New_Unbound_Thread_Attributes; function New_Bound_Thread_Attributes return Task_Info_Type is begin - return new Thread_Attributes' (False, True); + return new Thread_Attributes'(False, True); end New_Bound_Thread_Attributes; function New_Bound_Thread_Attributes (CPU : CPU_Number) return Task_Info_Type is begin - return new Thread_Attributes' (True, True, CPU); + return new Thread_Attributes'(True, True, CPU); end New_Bound_Thread_Attributes; end System.Task_Info; diff --git a/gcc/ada/5stasinf.ads b/gcc/ada/5stasinf.ads index cd19ef05d576..1002ee7ca218 100644 --- a/gcc/ada/5stasinf.ads +++ b/gcc/ada/5stasinf.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2000 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/5staspri.ads b/gcc/ada/5staspri.ads index 251cd6c242de..ea4653ee7f84 100644 --- a/gcc/ada/5staspri.ads +++ b/gcc/ada/5staspri.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2000, Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/5stpopse.adb b/gcc/ada/5stpopse.adb index b3a05e1cd1ee..a6c1e9e89b36 100644 --- a/gcc/ada/5stpopse.adb +++ b/gcc/ada/5stpopse.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2002, Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/5svxwork.ads b/gcc/ada/5svxwork.ads index 928fe5c54771..0fa38725b801 100644 --- a/gcc/ada/5svxwork.ads +++ b/gcc/ada/5svxwork.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1998-2002 Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/5tosinte.ads b/gcc/ada/5tosinte.ads index 872a579167de..266ba885040a 100644 --- a/gcc/ada/5tosinte.ads +++ b/gcc/ada/5tosinte.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1997-2002, Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/5uintman.adb b/gcc/ada/5uintman.adb index fb352aeb4172..42531492ae7a 100644 --- a/gcc/ada/5uintman.adb +++ b/gcc/ada/5uintman.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1991-2002 Florida State University -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/5uosinte.ads b/gcc/ada/5uosinte.ads index 0c923c7afd91..6afffa96aab2 100644 --- a/gcc/ada/5uosinte.ads +++ b/gcc/ada/5uosinte.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1997-2001, Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/5vasthan.adb b/gcc/ada/5vasthan.adb index 14b3931cf782..9a65ed269da9 100644 --- a/gcc/ada/5vasthan.adb +++ b/gcc/ada/5vasthan.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1996-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/5vinmaop.adb b/gcc/ada/5vinmaop.adb index 6eb6b7401458..e5c8eeedf7ba 100644 --- a/gcc/ada/5vinmaop.adb +++ b/gcc/ada/5vinmaop.adb @@ -7,7 +7,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1991-2001 Florida State University -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/5vinterr.adb b/gcc/ada/5vinterr.adb index bf06cf30b8a2..c32dd9938c5b 100644 --- a/gcc/ada/5vinterr.adb +++ b/gcc/ada/5vinterr.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2002, Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/5vintman.adb b/gcc/ada/5vintman.adb index 6566a16f6309..d679bd0375d9 100644 --- a/gcc/ada/5vintman.adb +++ b/gcc/ada/5vintman.adb @@ -6,8 +6,7 @@ -- -- -- B o d y -- -- -- --- -- --- Copyright (C) 1991-2001, Florida State University -- +-- Copyright (C) 1992-2002, Free Software Foundation, Inc. -- -- -- -- GNARL 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- -- @@ -28,8 +27,7 @@ -- covered by the GNU Public License. -- -- -- -- GNARL was developed by the GNARL team at Florida State University. It is -- --- now maintained by Ada Core Technologies Inc. in cooperation with Florida -- --- State University (http://www.gnat.com). -- +-- now maintained by Ada Core Technologies, Inc. (http://www.gnat.com). -- -- -- ------------------------------------------------------------------------------ @@ -55,6 +53,7 @@ package body System.Interrupt_Management is procedure Initialize_Interrupts is Status : Cond_Value_Type; + begin Sys_Crembx (Status => Status, @@ -74,11 +73,11 @@ package body System.Interrupt_Management is Flags => AGN_M_WRITEONLY); pragma Assert ((Status and 1) = 1); - end Initialize_Interrupts; begin -- Unused + Abort_Task_Interrupt := Interrupt_ID_0; Reserve := Reserve or Keep_Unmasked or Keep_Masked; @@ -86,5 +85,4 @@ begin Reserve (Interrupt_ID_0) := True; Initialize_Interrupts; - end System.Interrupt_Management; diff --git a/gcc/ada/5vintman.ads b/gcc/ada/5vintman.ads index 8c198d9ecf25..5a0382db90b3 100644 --- a/gcc/ada/5vintman.ads +++ b/gcc/ada/5vintman.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1991-2001 Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/5vmastop.adb b/gcc/ada/5vmastop.adb index 01fe13928fc0..bf4cc3082732 100644 --- a/gcc/ada/5vmastop.adb +++ b/gcc/ada/5vmastop.adb @@ -7,7 +7,6 @@ -- B o d y -- -- (Version for Alpha/VMS) -- -- -- --- -- -- Copyright (C) 2001-2002 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/5vosinte.adb b/gcc/ada/5vosinte.adb index eddbdd1a87d2..5c0909ee39e0 100644 --- a/gcc/ada/5vosinte.adb +++ b/gcc/ada/5vosinte.adb @@ -6,8 +6,7 @@ -- -- -- B o d y -- -- -- --- -- --- Copyright (C) 1991-2000 Florida State University -- +-- Copyright (C) 1991-2002 Florida State University -- -- -- -- GNARL 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- -- @@ -43,11 +42,34 @@ pragma Polling (Off); -- tasking operations. It causes infinite loops and other problems. with Interfaces.C; use Interfaces.C; +with System.Machine_Code; use System.Machine_Code; + package body System.OS_Interface is + ------------------ + -- pthread_self -- + ------------------ + + function pthread_self return pthread_t is + use ASCII; + Self : pthread_t; + + begin + Asm ("call_pal 0x9e" & LF & HT & + "bis $31, $0, %0", + Outputs => pthread_t'Asm_Output ("=r", Self), + Clobber => "$0"); + return Self; + end pthread_self; + + ----------------- + -- sched_yield -- + ----------------- + function sched_yield return int is procedure sched_yield_base; pragma Import (C, sched_yield_base, "PTHREAD_YIELD_NP"); + begin sched_yield_base; return 0; diff --git a/gcc/ada/5vosinte.ads b/gcc/ada/5vosinte.ads index 433dd1e83c19..7903bb67fbec 100644 --- a/gcc/ada/5vosinte.ads +++ b/gcc/ada/5vosinte.ads @@ -6,8 +6,7 @@ -- -- -- S p e c -- -- -- --- -- --- Copyright (C) 1991-2001 Free Software Foundation, Inc. -- +-- Copyright (C) 1991-2002 Free Software Foundation, Inc. -- -- -- -- GNARL 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- -- @@ -550,7 +549,6 @@ package System.OS_Interface is pragma Import (C, pthread_exit, "PTHREAD_EXIT"); function pthread_self return pthread_t; - pragma Import (C, pthread_self, "PTHREAD_SELF"); -------------------------- -- POSIX.1c Section 17 -- @@ -637,4 +635,6 @@ private type pthread_key_t is new unsigned; + pragma Inline (pthread_self); + end System.OS_Interface; diff --git a/gcc/ada/5vosprim.adb b/gcc/ada/5vosprim.adb index d06eca3f09e5..6db0ccea5b1b 100644 --- a/gcc/ada/5vosprim.adb +++ b/gcc/ada/5vosprim.adb @@ -6,8 +6,7 @@ -- -- -- B o d y -- -- -- --- -- --- Copyright (C) 1998-2001 Free Software Foundation, Inc. -- +-- Copyright (C) 1998-2002 Free Software Foundation, Inc. -- -- -- -- GNARL 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- -- @@ -110,11 +109,10 @@ package body System.OS_Primitives is --------------- -- Sys_Hiber -- --------------- - -- + -- Hibernate (until woken up) - -- + -- status = returned status - -- procedure Sys_Hiber (Status : out Cond_Value_Type); -- VMS system call to hibernate the current process @@ -174,6 +172,7 @@ package body System.OS_Primitives is ----------------- function To_Duration (T : OS_Time; Mode : Integer) return Duration is + pragma Warnings (Off, Mode); begin return Duration'Fixed_Value (T - VMS_Epoch_Offset) * 100; end To_Duration; diff --git a/gcc/ada/5vosprim.ads b/gcc/ada/5vosprim.ads index bc504ad1b717..a777bea3b83b 100644 --- a/gcc/ada/5vosprim.ads +++ b/gcc/ada/5vosprim.ads @@ -6,8 +6,7 @@ -- -- -- S p e c -- -- -- --- -- --- Copyright (C) 1998-2001 Free Software Foundation, Inc. -- +-- Copyright (C) 1998-2003 Free Software Foundation, Inc. -- -- -- -- GNARL 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- -- @@ -49,13 +48,17 @@ package System.OS_Primitives is -- Calendar.Time is positive. -- See Ada.Calendar.Delays for more information on VMS Time. - Max_Sensible_Delay : constant Duration := 183 * 24 * 60 * 60.0; + Max_Sensible_Delay : constant Duration := + Duration'Min (183 * 24 * 60 * 60.0, + Duration'Last); -- Max of half a year delay, needed to prevent exceptions for large -- delay values. It seems unlikely that any test will notice this -- restriction, except in the case of applications setting the clock at -- at run time (see s-tastim.adb). Also note that a larger value might -- cause problems (e.g overflow, or more likely OS limitation in the - -- primitives used). + -- primitives used). In the case where half a year is too long (which + -- occurs in high integrity mode with 32-bit words, and possibly on + -- some specific ports of GNAT), Duration'Last is used instead. function OS_Clock return OS_Time; -- Returns "absolute" time, represented as an offset diff --git a/gcc/ada/5vparame.ads b/gcc/ada/5vparame.ads index d9d6e10b09fb..360596d4dbc5 100644 --- a/gcc/ada/5vparame.ads +++ b/gcc/ada/5vparame.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- @@ -95,6 +94,11 @@ pragma Pure (Parameters); -- when Size < Minimum_Stack_Size, return Minimum_Stack_Size -- otherwise return given Size + Default_Env_Stack_Size : constant Size_Type := 8_192_000; + -- Assumed size of the environment task, if no other information + -- is available. This value is used when stack checking is + -- enabled and no GNAT_STACK_LIMIT environment variable is set. + Stack_Grows_Down : constant Boolean := True; -- This constant indicates whether the stack grows up (False) or -- down (True) in memory as functions are called. It is used for diff --git a/gcc/ada/5vsystem.ads b/gcc/ada/5vsystem.ads index 6c62a0756895..ddf582bd0460 100644 --- a/gcc/ada/5vsystem.ads +++ b/gcc/ada/5vsystem.ads @@ -7,8 +7,7 @@ -- S p e c -- -- (OpenVMS DEC Threads Version) -- -- -- --- -- --- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- +-- Copyright (C) 1992-2003 Free Software Foundation, Inc. -- -- -- -- This specification is derived from the Ada Reference Manual for use with -- -- GNAT. The copyright notice above, and the license provisions that follow -- @@ -59,7 +58,7 @@ pragma Pure (System); Max_Mantissa : constant := 63; Fine_Delta : constant := 2.0 ** (-Max_Mantissa); - Tick : constant := 1.0; + Tick : constant := 0.01; -- Storage-related Declarations @@ -120,11 +119,12 @@ private Backend_Overflow_Checks : constant Boolean := False; Command_Line_Args : constant Boolean := True; Denorm : constant Boolean := False; + Exit_Status_Supported : constant Boolean := True; Fractional_Fixed_Ops : constant Boolean := False; Frontend_Layout : constant Boolean := False; Functions_Return_By_DSP : constant Boolean := False; - Long_Shifts_Inlined : constant Boolean := True; High_Integrity_Mode : constant Boolean := False; + Long_Shifts_Inlined : constant Boolean := False; Machine_Overflows : constant Boolean := False; Machine_Rounds : constant Boolean := True; OpenVMS : constant Boolean := True; diff --git a/gcc/ada/5vtaprop.adb b/gcc/ada/5vtaprop.adb index fbd683a7c25a..076647445029 100644 --- a/gcc/ada/5vtaprop.adb +++ b/gcc/ada/5vtaprop.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001, Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/5vtaspri.ads b/gcc/ada/5vtaspri.ads index a51413c4f557..f0bbc051051e 100644 --- a/gcc/ada/5vtaspri.ads +++ b/gcc/ada/5vtaspri.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1991-2000 Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/5vtpopde.adb b/gcc/ada/5vtpopde.adb index b708f82f015d..59b2f8a96f4b 100644 --- a/gcc/ada/5vtpopde.adb +++ b/gcc/ada/5vtpopde.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 2000-2001 Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/5vtpopde.ads b/gcc/ada/5vtpopde.ads index 492d57d65663..03a531eaa8e3 100644 --- a/gcc/ada/5vtpopde.ads +++ b/gcc/ada/5vtpopde.ads @@ -2,13 +2,11 @@ -- -- -- GNU ADA RUN-TIME LIBRARY (GNARL) COMPONENTS -- -- -- --- S Y S T E M . T A S K _ P R I M I T I V E S . O P E R A T I O N S -- --- . D E C -- +-- SYSTEM.TASK_PRIMITIVES.OPERATIONS.DEC -- -- -- -- S p e c -- -- -- --- -- --- Copyright (C) 2000 Free Software Foundation, Inc. -- +-- Copyright (C) 2000-2002 Free Software Foundation, Inc. -- -- -- -- GNARL 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- -- diff --git a/gcc/ada/5vvaflop.adb b/gcc/ada/5vvaflop.adb index 8e0206cb61dd..8b1bf031fa4c 100644 --- a/gcc/ada/5vvaflop.adb +++ b/gcc/ada/5vvaflop.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1997-2000 Free Software Foundation, Inc. -- -- (Version for Alpha OpenVMS) -- -- -- diff --git a/gcc/ada/5wgloloc.adb b/gcc/ada/5wgloloc.adb index 8a7594b2b7d1..dc367b6a0e09 100644 --- a/gcc/ada/5wgloloc.adb +++ b/gcc/ada/5wgloloc.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1999-2001 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/5wintman.adb b/gcc/ada/5wintman.adb index 052dfc7c99aa..b6ade065740d 100644 --- a/gcc/ada/5wintman.adb +++ b/gcc/ada/5wintman.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1991-2000 Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/5wmemory.adb b/gcc/ada/5wmemory.adb index 563465da7914..0452ae8668be 100644 --- a/gcc/ada/5wmemory.adb +++ b/gcc/ada/5wmemory.adb @@ -6,8 +6,7 @@ -- -- -- S p e c -- -- -- --- -- --- Copyright (C) 2001 Free Software Foundation, Inc. -- +-- Copyright (C) 2001-2002 Free Software Foundation, Inc. -- -- -- -- This specification is derived from the Ada Reference Manual for use with -- -- GNAT. The copyright notice above, and the license provisions that follow -- @@ -192,7 +191,7 @@ package body System.Memory is return System.Address is Result : System.Address; - Actual_Size : size_t := Size; + Actual_Size : constant size_t := Size; Old_Size : size_t; begin diff --git a/gcc/ada/5wosinte.ads b/gcc/ada/5wosinte.ads index c28537392ad3..cf9aee5a35bf 100644 --- a/gcc/ada/5wosinte.ads +++ b/gcc/ada/5wosinte.ads @@ -6,8 +6,7 @@ -- -- -- S p e c -- -- -- --- -- --- Copyright (C) 1997-2001, Free Software Foundation, Inc. -- +-- Copyright (C) 1997-2003, Free Software Foundation, Inc. -- -- -- -- GNARL 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- -- @@ -63,7 +62,6 @@ pragma Preelaborate; -- (See Operations.Clock) type LARGE_INTEGER is delta 1.0 range -2.0**63 .. 2.0**63 - 1.0; - for LARGE_INTEGER'Alignment use 4; subtype PSZ is Interfaces.C.Strings.chars_ptr; subtype PCHAR is Interfaces.C.Strings.chars_ptr; @@ -185,6 +183,9 @@ pragma Preelaborate; type Thread_Body is access function (arg : System.Address) return System.Address; + procedure SwitchToThread; + pragma Import (Stdcall, SwitchToThread, "SwitchToThread"); + ----------------------- -- Critical sections -- ----------------------- @@ -400,6 +401,11 @@ pragma Preelaborate; dwPriorityClass : DWORD) return BOOL; pragma Import (Stdcall, SetPriorityClass, "SetPriorityClass"); + procedure SetThreadPriorityBoost + (hThread : HANDLE; + DisablePriorityBoost : BOOL); + pragma Import (Stdcall, SetThreadPriorityBoost, "SetThreadPriorityBoost"); + Normal_Priority_Class : constant := 16#00000020#; Idle_Priority_Class : constant := 16#00000040#; High_Priority_Class : constant := 16#00000080#; diff --git a/gcc/ada/5wosprim.adb b/gcc/ada/5wosprim.adb index b4279a02751c..4ceee490e6ed 100644 --- a/gcc/ada/5wosprim.adb +++ b/gcc/ada/5wosprim.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1998-2001 Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/5wsystem.ads b/gcc/ada/5wsystem.ads index f828e410ab64..0e832334e0a2 100644 --- a/gcc/ada/5wsystem.ads +++ b/gcc/ada/5wsystem.ads @@ -7,7 +7,6 @@ -- S p e c -- -- (NT Version) -- -- -- --- -- -- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- -- -- -- This specification is derived from the Ada Reference Manual for use with -- diff --git a/gcc/ada/5wtaprop.adb b/gcc/ada/5wtaprop.adb index eb52268e530b..a4094c886c1e 100644 --- a/gcc/ada/5wtaprop.adb +++ b/gcc/ada/5wtaprop.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2002, Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/5wtaspri.ads b/gcc/ada/5wtaspri.ads index 046c61d0673e..26160c6b0945 100644 --- a/gcc/ada/5wtaspri.ads +++ b/gcc/ada/5wtaspri.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1991-2000 Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/5ysystem.ads b/gcc/ada/5ysystem.ads index 2f2b9eae0981..7612018554d6 100644 --- a/gcc/ada/5ysystem.ads +++ b/gcc/ada/5ysystem.ads @@ -7,7 +7,6 @@ -- S p e c -- -- (VXWORKS Version PPC) -- -- -- --- -- -- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- -- -- -- This specification is derived from the Ada Reference Manual for use with -- diff --git a/gcc/ada/5zinterr.adb b/gcc/ada/5zinterr.adb index f66777a05e52..03a724a83dfb 100644 --- a/gcc/ada/5zinterr.adb +++ b/gcc/ada/5zinterr.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2002, Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/5zintman.adb b/gcc/ada/5zintman.adb index 9b274b5e0d49..0f1defc47159 100644 --- a/gcc/ada/5zintman.adb +++ b/gcc/ada/5zintman.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/5zosinte.adb b/gcc/ada/5zosinte.adb index 920dc1da2702..1fbb58c64054 100644 --- a/gcc/ada/5zosinte.adb +++ b/gcc/ada/5zosinte.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1997-2002 Free Software Foundation -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/5zosinte.ads b/gcc/ada/5zosinte.ads index b4b98bec81a4..398db312c0d0 100644 --- a/gcc/ada/5zosinte.ads +++ b/gcc/ada/5zosinte.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1997-2001 Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/5zosprim.adb b/gcc/ada/5zosprim.adb index 01d15ff2d7a6..1a5d036e3aae 100644 --- a/gcc/ada/5zosprim.adb +++ b/gcc/ada/5zosprim.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1998-2001 Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/5zsystem.ads b/gcc/ada/5zsystem.ads index 551911ec8ad9..e7fd405966ce 100644 --- a/gcc/ada/5zsystem.ads +++ b/gcc/ada/5zsystem.ads @@ -7,7 +7,6 @@ -- S p e c -- -- (VXWORKS Version Alpha) -- -- -- --- -- -- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- -- -- -- This specification is derived from the Ada Reference Manual for use with -- diff --git a/gcc/ada/5ztaprop.adb b/gcc/ada/5ztaprop.adb index 7c7a325ba32c..2051041becb5 100644 --- a/gcc/ada/5ztaprop.adb +++ b/gcc/ada/5ztaprop.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2002, Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/6vcpp.adb b/gcc/ada/6vcpp.adb index 57b15f1f7b0e..8e4764ea7b4a 100644 --- a/gcc/ada/6vcpp.adb +++ b/gcc/ada/6vcpp.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 2000-2002, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/6vcstrea.adb b/gcc/ada/6vcstrea.adb index 00873bfb0d21..20379da30acd 100644 --- a/gcc/ada/6vcstrea.adb +++ b/gcc/ada/6vcstrea.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1996-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/6vinterf.ads b/gcc/ada/6vinterf.ads index c1539dda3042..96902868ec3f 100644 --- a/gcc/ada/6vinterf.ads +++ b/gcc/ada/6vinterf.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- This specification is adapted from the Ada Reference Manual for use with -- -- GNAT. In accordance with the copyright of that document, you can freely -- -- copy and modify this specification, provided that if you redistribute a -- diff --git a/gcc/ada/7sinmaop.adb b/gcc/ada/7sinmaop.adb index 57242e0e8a04..98058a22d8d4 100644 --- a/gcc/ada/7sinmaop.adb +++ b/gcc/ada/7sinmaop.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1997-1998, Florida State University -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/7sintman.adb b/gcc/ada/7sintman.adb index c0c8fbe67230..ee8acee5d584 100644 --- a/gcc/ada/7sintman.adb +++ b/gcc/ada/7sintman.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1991-2002, Florida State University -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/7sosinte.adb b/gcc/ada/7sosinte.adb index 1891eed83799..252ce1f3046d 100644 --- a/gcc/ada/7sosinte.adb +++ b/gcc/ada/7sosinte.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1997-2001 Florida State University -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/7sosprim.adb b/gcc/ada/7sosprim.adb index 6d4cf22c1f8d..a0c76f5c6d8a 100644 --- a/gcc/ada/7sosprim.adb +++ b/gcc/ada/7sosprim.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1998-2001 Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/7staprop.adb b/gcc/ada/7staprop.adb index 4d4d0e9c2c2a..5c1b1e16e0e1 100644 --- a/gcc/ada/7staprop.adb +++ b/gcc/ada/7staprop.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001, Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/7staspri.ads b/gcc/ada/7staspri.ads index 140eebb3b8ba..5fc600cdb90a 100644 --- a/gcc/ada/7staspri.ads +++ b/gcc/ada/7staspri.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1991-2000, Florida State University -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/7stpopsp.adb b/gcc/ada/7stpopsp.adb index e3c3b3a5927c..a0833b868368 100644 --- a/gcc/ada/7stpopsp.adb +++ b/gcc/ada/7stpopsp.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1991-2001, Florida State University -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/7straceb.adb b/gcc/ada/7straceb.adb index 73188f849415..e3a7ff7f9807 100644 --- a/gcc/ada/7straceb.adb +++ b/gcc/ada/7straceb.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1999-2000 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/86numaux.adb b/gcc/ada/86numaux.adb index 1392f52786b3..a13733305a1a 100644 --- a/gcc/ada/86numaux.adb +++ b/gcc/ada/86numaux.adb @@ -7,7 +7,6 @@ -- B o d y -- -- (Machine Version for x86) -- -- -- --- -- -- Copyright (C) 1998-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/86numaux.ads b/gcc/ada/86numaux.ads index 1d3731d5d67e..857499fdfc12 100644 --- a/gcc/ada/86numaux.ads +++ b/gcc/ada/86numaux.ads @@ -7,7 +7,6 @@ -- S p e c -- -- (Machine Version for x86) -- -- -- --- -- -- Copyright (C) 1992-1998 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/9drpc.adb b/gcc/ada/9drpc.adb index c44200cf443d..cca1785bbc11 100644 --- a/gcc/ada/9drpc.adb +++ b/gcc/ada/9drpc.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog index 038b18f6971f..0d720738ffed 100644 --- a/gcc/ada/ChangeLog +++ b/gcc/ada/ChangeLog @@ -1,3 +1,340 @@ +2003-04-23 Geert Bosch + + * 1aexcept.adb, 1aexcept.ads, 1ic.ads, 1ssecsta.adb, + 1ssecsta.ads, 31soccon.ads, 31soliop.ads, 3asoccon.ads, + 3bsoccon.ads, 3gsoccon.ads, 3hsoccon.ads, 3ssoccon.ads, + 3ssoliop.ads, 3wsoccon.ads, 3wsocthi.adb, 3wsocthi.ads, + 3wsoliop.ads, 41intnam.ads, 42intnam.ads, 4aintnam.ads, + 4cintnam.ads, 4dintnam.ads, 4gintnam.ads, 4hexcpol.adb, + 4hintnam.ads, 4lintnam.ads, 4mintnam.ads, 4nintnam.ads, + 4ointnam.ads, 4onumaux.ads, 4pintnam.ads, 4rintnam.ads, + 4sintnam.ads, 4uintnam.ads, 4vcaldel.adb, 4vcalend.adb, + 4vcalend.ads, 4vintnam.ads, 4wcalend.adb, 4wexcpol.adb, + 4wintnam.ads, 4zintnam.ads, 4znumaux.ads, 4zsytaco.adb, + 4zsytaco.ads, 51osinte.adb, 51osinte.ads, 52osinte.adb, + 52osinte.ads, 52system.ads, 53osinte.ads, 54osinte.ads, + 5amastop.adb, 5aosinte.adb, 5aosinte.ads, 5asystem.ads, + 5ataprop.adb, 5atasinf.ads, 5ataspri.ads, 5atpopsp.adb, + 5avxwork.ads, 5bosinte.adb, 5bosinte.ads, 5bsystem.ads, + 5cosinte.ads, 5dosinte.ads, 5esystem.ads, 5etpopse.adb, + 5fintman.adb, 5fosinte.ads, 5fsystem.ads, 5ftaprop.adb, + 5ftasinf.ads, 5ginterr.adb, 5gintman.adb, 5gmastop.adb, + 5gosinte.ads, 5gproinf.adb, 5gproinf.ads, 5gsystem.ads, + 5gtaprop.adb, 5gtasinf.adb, 5gtasinf.ads, 5gtpgetc.adb, + 5hosinte.adb, 5hosinte.ads, 5hparame.ads, 5hsystem.ads, + 5htaprop.adb, 5htaspri.ads, 5htraceb.adb, 5iosinte.adb, + 5iosinte.ads, 5itaprop.adb, 5itaspri.ads, 5ksystem.ads, + 5kvxwork.ads, 5lintman.adb, 5lml-tgt.adb, 5losinte.ads, + 5lsystem.ads, 5mosinte.ads, 5mvxwork.ads, 5ninmaop.adb, + 5nintman.adb, 5nosinte.ads, 5ntaprop.adb, 5ntaspri.ads, + 5ointerr.adb, 5omastop.adb, 5oosinte.adb, 5oosinte.ads, + 5oosprim.adb, 5oparame.adb, 5osystem.ads, 5otaprop.adb, + 5otaspri.ads, 5posinte.ads, 5posprim.adb, 5pvxwork.ads, + 5qosinte.adb, 5qosinte.ads, 5qstache.adb, 5qtaprop.adb, + 5qtaspri.ads, 5rosinte.adb, 5rosinte.ads, 5rparame.adb, + 5sintman.adb, 5sosinte.adb, 5sosinte.ads, 5sparame.adb, + 5ssystem.ads, 5staprop.adb, 5stasinf.adb, 5stasinf.ads, + 5staspri.ads, 5stpopse.adb, 5svxwork.ads, 5tosinte.ads, + 5uintman.adb, 5uosinte.ads, 5vasthan.adb, 5vinmaop.adb, + 5vinterr.adb, 5vintman.adb, 5vintman.ads, 5vmastop.adb, + 5vosinte.adb, 5vosinte.ads, 5vosprim.adb, 5vosprim.ads, + 5vparame.ads, 5vsystem.ads, 5vtaprop.adb, 5vtaspri.ads, + 5vtpopde.adb, 5vtpopde.ads, 5vvaflop.adb, 5wgloloc.adb, + 5wintman.adb, 5wmemory.adb, 5wosinte.ads, 5wosprim.adb, + 5wsystem.ads, 5wtaprop.adb, 5wtaspri.ads, 5ysystem.ads, + 5zinterr.adb, 5zintman.adb, 5zosinte.adb, 5zosinte.ads, + 5zosprim.adb, 5zsystem.ads, 5ztaprop.adb, 6vcpp.adb, + 6vcstrea.adb, 6vinterf.ads, 7sinmaop.adb, 7sintman.adb, + 7sosinte.adb, 7sosprim.adb, 7staprop.adb, 7staspri.ads, + 7stpopsp.adb, 7straceb.adb, 86numaux.adb, 86numaux.ads, + 9drpc.adb, a-astaco.adb, a-astaco.ads, a-caldel.adb, + a-caldel.ads, a-calend.adb, a-calend.ads, a-chahan.adb, + a-chahan.ads, a-charac.ads, a-chlat1.ads, a-chlat9.ads, + a-colien.adb, a-colien.ads, a-colire.adb, a-colire.ads, + a-comlin.adb, a-comlin.ads, a-cwila1.ads, a-cwila9.ads, + a-decima.adb, a-decima.ads, a-diocst.adb, a-diocst.ads, + a-direio.adb, a-direio.ads, a-dynpri.adb, a-dynpri.ads, + a-einuoc.adb, a-einuoc.ads, a-except.adb, a-except.ads, + a-excpol.adb, a-exctra.adb, a-exctra.ads, a-filico.adb, + a-filico.ads, a-finali.adb, a-finali.ads, a-flteio.ads, + a-fwteio.ads, a-inteio.ads, a-interr.adb, a-interr.ads, + a-intnam.ads, a-intsig.adb, a-intsig.ads, a-ioexce.ads, + a-iwteio.ads, a-lfteio.ads, a-lfwtio.ads, a-liteio.ads, + a-liwtio.ads, a-llftio.ads, a-llfwti.ads, a-llitio.ads, + a-lliwti.ads, a-ncelfu.ads, a-ngcefu.adb, a-ngcefu.ads, + a-ngcoty.adb, a-ngcoty.ads, a-ngelfu.adb, a-ngelfu.ads, + a-nlcefu.ads, a-nlcoty.ads, a-nlelfu.ads, a-nllcef.ads, + a-nllcty.ads, a-nllefu.ads, a-nscefu.ads, a-nscoty.ads, + a-nselfu.ads, a-nucoty.ads, a-nudira.adb, a-nudira.ads, + a-nuelfu.ads, a-nuflra.adb, a-nuflra.ads, a-numaux.ads, + a-numeri.ads, a-reatim.adb, a-reatim.ads, a-retide.adb, + a-retide.ads, a-sequio.adb, a-sequio.ads, a-sfteio.ads, + a-sfwtio.ads, a-siocst.adb, a-siocst.ads, a-siteio.ads, + a-siwtio.ads, a-ssicst.adb, a-ssicst.ads, a-ssitio.ads, + a-ssiwti.ads, a-stmaco.ads, a-storio.adb, a-storio.ads, + a-strbou.adb, a-strbou.ads, a-stream.ads, a-strfix.adb, + a-strfix.ads, a-string.ads, a-strmap.adb, a-strmap.ads, + a-strsea.adb, a-strsea.ads, a-strunb.adb, a-strunb.ads, + a-ststio.adb, a-ststio.ads, a-stunau.adb, a-stunau.ads, + a-stwibo.adb, a-stwibo.ads, a-stwifi.adb, a-stwifi.ads, + a-stwima.adb, a-stwima.ads, a-stwise.adb, a-stwise.ads, + a-stwiun.adb, a-stwiun.ads, a-suteio.adb, a-suteio.ads, + a-swmwco.ads, a-swuwti.adb, a-swuwti.ads, a-sytaco.adb, + a-sytaco.ads, a-tags.adb, a-tags.ads, a-tasatt.adb, + a-tasatt.ads, a-taside.adb, a-taside.ads, a-teioed.adb, + a-teioed.ads, a-textio.adb, a-textio.ads, a-ticoau.adb, + a-ticoau.ads, a-ticoio.adb, a-ticoio.ads, a-tideau.adb, + a-tideau.ads, a-tideio.adb, a-tideio.ads, a-tienau.adb, + a-tienau.ads, a-tienio.adb, a-tienio.ads, a-tifiio.adb, + a-tifiio.ads, a-tiflau.adb, a-tiflau.ads, a-tiflio.adb, + a-tiflio.ads, a-tigeau.adb, a-tigeau.ads, a-tiinau.adb, + a-tiinau.ads, a-tiinio.adb, a-tiinio.ads, a-timoau.adb, + a-timoau.ads, a-timoio.adb, a-timoio.ads, a-tiocst.adb, + a-tiocst.ads, a-titest.adb, a-titest.ads, a-unccon.ads, + a-uncdea.ads, a-witeio.adb, a-witeio.ads, a-wtcoau.adb, + a-wtcoau.ads, a-wtcoio.adb, a-wtcoio.ads, a-wtcstr.adb, + a-wtcstr.ads, a-wtdeau.adb, a-wtdeau.ads, a-wtdeio.adb, + a-wtdeio.ads, a-wtedit.adb, a-wtedit.ads, a-wtenau.adb, + a-wtenau.ads, a-wtenio.adb, a-wtenio.ads, a-wtfiio.adb, + a-wtfiio.ads, a-wtflau.adb, a-wtflau.ads, a-wtflio.adb, + a-wtflio.ads, a-wtgeau.adb, a-wtgeau.ads, a-wtinau.adb, + a-wtinau.ads, a-wtinio.adb, a-wtinio.ads, a-wtmoau.adb, + a-wtmoau.ads, a-wtmoio.adb, a-wtmoio.ads, a-wttest.adb, + a-wttest.ads, ada-tree.h, ada.ads, ada.h, + adadecode.c, adadecode.h, ali-util.adb, ali-util.ads, + ali.adb, ali.ads, alloc.ads, argv.c, + atree.adb, atree.ads, atree.h, aux-io.c, + back_end.adb, back_end.ads, bcheck.adb, bcheck.ads, + binde.adb, binde.ads, binderr.adb, binderr.ads, + bindgen.adb, bindgen.ads, bindusg.adb, bindusg.ads, + butil.adb, butil.ads, cal.c, calendar.ads, + casing.adb, casing.ads, ceinfo.adb, checks.adb, + checks.ads, cio.c, comperr.adb, comperr.ads, + config-lang.in, csets.adb, csets.ads, csinfo.adb, + cstand.adb, cstand.ads, cuintp.c, debug.adb, + debug.ads, debug_a.adb, debug_a.ads, dec-io.adb, + dec-io.ads, dec.ads, deftarg.c, directio.ads, + einfo.adb, einfo.ads, elists.adb, elists.ads, + elists.h, errno.c, errout.adb, errout.ads, + eval_fat.adb, eval_fat.ads, exit.c, exp_aggr.adb, + exp_aggr.ads, exp_attr.adb, exp_attr.ads, exp_ch10.ads, + exp_ch11.adb, exp_ch11.ads, exp_ch12.adb, exp_ch12.ads, + exp_ch13.adb, exp_ch13.ads, exp_ch2.adb, exp_ch2.ads, + exp_ch3.adb, exp_ch3.ads, exp_ch4.adb, exp_ch4.ads, + exp_ch5.adb, exp_ch5.ads, exp_ch6.adb, exp_ch6.ads, + exp_ch7.adb, exp_ch7.ads, exp_ch8.adb, exp_ch8.ads, + exp_ch9.adb, exp_ch9.ads, exp_code.adb, exp_code.ads, + exp_dbug.adb, exp_dbug.ads, exp_disp.adb, exp_disp.ads, + exp_dist.adb, exp_dist.ads, exp_fixd.adb, exp_fixd.ads, + exp_imgv.adb, exp_imgv.ads, exp_intr.adb, exp_intr.ads, + exp_pakd.adb, exp_pakd.ads, exp_prag.adb, exp_prag.ads, + exp_smem.adb, exp_smem.ads, exp_strm.adb, exp_strm.ads, + exp_tss.adb, exp_tss.ads, exp_util.adb, exp_util.ads, + exp_vfpt.adb, exp_vfpt.ads, expander.adb, expander.ads, + fmap.adb, fmap.ads, fname-sf.adb, fname-sf.ads, + fname-uf.adb, fname-uf.ads, fname.adb, fname.ads, + freeze.adb, freeze.ads, frontend.adb, frontend.ads, + g-awk.adb, g-awk.ads, g-busora.adb, g-busora.ads, + g-busorg.adb, g-busorg.ads, g-calend.adb, g-calend.ads, + g-casuti.adb, g-casuti.ads, g-catiio.adb, g-catiio.ads, + g-cgi.adb, g-cgi.ads, g-cgicoo.adb, g-cgicoo.ads, + g-cgideb.adb, g-cgideb.ads, g-comlin.adb, g-comlin.ads, + g-crc32.adb, g-crc32.ads, g-curexc.ads, g-debpoo.adb, + g-debpoo.ads, g-debuti.adb, g-debuti.ads, g-diopit.adb, + g-diopit.ads, g-dirope.adb, g-dirope.ads, g-dyntab.adb, + g-dyntab.ads, g-enblsp.adb, g-except.ads, g-exctra.adb, + g-exctra.ads, g-expect.adb, g-expect.ads, g-flocon.ads, + g-hesora.adb, g-hesora.ads, g-hesorg.adb, g-hesorg.ads, + g-htable.adb, g-htable.ads, g-io.adb, g-io.ads, + g-io_aux.adb, g-io_aux.ads, g-locfil.ads, g-md5.adb, + g-md5.ads, g-moreex.adb, g-moreex.ads, g-os_lib.adb, + g-os_lib.ads, g-regexp.adb, g-regexp.ads, g-regist.ads, + g-regpat.adb, g-regpat.ads, g-soccon.ads, g-socket.adb, + g-socket.ads, g-socthi.adb, g-socthi.ads, g-soliop.ads, + g-souinf.ads, g-speche.adb, g-speche.ads, g-spipat.adb, + g-spipat.ads, g-spitbo.adb, g-spitbo.ads, g-sptabo.ads, + g-sptain.ads, g-sptavs.ads, g-table.adb, g-table.ads, + g-tasloc.adb, g-tasloc.ads, g-thread.adb, g-thread.ads, + g-traceb.adb, g-traceb.ads, g-trasym.adb, g-trasym.ads, + get_targ.adb, get_targ.ads, gnat-style.texi, gnat.ads, + gnat1drv.adb, gnat1drv.ads, gnatbind.adb, gnatbind.ads, + gnatbl.c, gnatchop.adb, gnatcmd.adb, gnatcmd.ads, + gnatdll.adb, gnatfind.adb, gnatkr.adb, gnatkr.ads, + gnatlbr.adb, gnatlink.adb, gnatlink.ads, gnatls.adb, + gnatls.ads, gnatmake.adb, gnatmake.ads, gnatmem.adb, + gnatname.adb, gnatname.ads, gnatprep.adb, gnatprep.ads, + gnatpsta.adb, gnatvsn.adb, gnatvsn.ads, gnatxref.adb, + hlo.adb, hlo.ads, hostparm.ads, i-c.adb, + i-c.ads, i-cexten.ads, i-cobol.adb, i-cobol.ads, + i-cpoint.adb, i-cpoint.ads, i-cpp.adb, i-cpp.ads, + i-cstrea.adb, i-cstrea.ads, i-cstrin.adb, i-cstrin.ads, + i-fortra.adb, i-fortra.ads, i-os2err.ads, i-os2lib.adb, + i-os2lib.ads, i-os2syn.ads, i-os2thr.ads, i-pacdec.adb, + i-pacdec.ads, i-vxwork.ads, impunit.adb, impunit.ads, + inline.adb, inline.ads, interfac.ads, ioexcept.ads, + itypes.adb, itypes.ads, krunch.adb, krunch.ads, + layout.adb, layout.ads, lib-list.adb, lib-load.adb, + lib-load.ads, lib-sort.adb, lib-util.adb, lib-util.ads, + lib-writ.adb, lib-writ.ads, lib-xref.adb, lib-xref.ads, + lib.adb, lib.ads, live.adb, live.ads, + machcode.ads, make.adb, make.ads, makeusg.adb, + makeusg.ads, math_lib.adb, mdll-fil.adb, mdll-fil.ads, + mdll-utl.adb, mdll-utl.ads, mdll.adb, mdll.ads, + memroot.adb, memroot.ads, memtrack.adb, mlib-fil.adb, + mlib-fil.ads, mlib-prj.adb, mlib-prj.ads, mlib-tgt.adb, + mlib-tgt.ads, mlib-utl.adb, mlib-utl.ads, mlib.adb, + mlib.ads, namet.adb, namet.ads, nlists.adb, + nlists.ads, opt.adb, opt.ads, osint-b.adb, + osint-b.ads, osint-c.adb, osint-c.ads, osint-l.adb, + osint-l.ads, osint-m.adb, osint-m.ads, osint.adb, + osint.ads, output.adb, output.ads, par-ch10.adb, + par-ch11.adb, par-ch12.adb, par-ch13.adb, par-ch2.adb, + par-ch3.adb, par-ch4.adb, par-ch5.adb, par-ch6.adb, + par-ch7.adb, par-ch8.adb, par-ch9.adb, par-endh.adb, + par-labl.adb, par-load.adb, par-prag.adb, par-sync.adb, + par-tchk.adb, par-util.adb, par.adb, par.ads, + prj-attr.adb, prj-attr.ads, prj-com.adb, prj-com.ads, + prj-dect.adb, prj-dect.ads, prj-env.adb, prj-env.ads, + prj-ext.adb, prj-ext.ads, prj-makr.adb, prj-makr.ads, + prj-nmsc.adb, prj-nmsc.ads, prj-pars.adb, prj-pars.ads, + prj-part.adb, prj-part.ads, prj-pp.adb, prj-pp.ads, + prj-proc.adb, prj-proc.ads, prj-strt.adb, prj-strt.ads, + prj-tree.adb, prj-tree.ads, prj-util.adb, prj-util.ads, + prj.adb, prj.ads, repinfo.adb, repinfo.ads, + restrict.adb, restrict.ads, rident.ads, rtsfind.adb, + rtsfind.ads, s-addima.adb, s-addima.ads, s-arit64.adb, + s-arit64.ads, s-assert.adb, s-assert.ads, s-asthan.adb, + s-asthan.ads, s-atacco.adb, s-atacco.ads, s-auxdec.adb, + s-auxdec.ads, s-bitops.adb, s-bitops.ads, s-chepoo.ads, + s-crc32.adb, s-crc32.ads, s-direio.adb, s-direio.ads, + s-errrep.adb, s-errrep.ads, s-except.ads, s-exctab.adb, + s-exctab.ads, s-exnflt.ads, s-exngen.adb, s-exngen.ads, + s-exnint.ads, s-exnlfl.ads, s-exnlin.ads, s-exnllf.ads, + s-exnlli.ads, s-exnsfl.ads, s-exnsin.ads, s-exnssi.ads, + s-expflt.ads, s-expgen.adb, s-expgen.ads, s-expint.ads, + s-explfl.ads, s-explin.ads, s-expllf.ads, s-explli.ads, + s-expllu.adb, s-expllu.ads, s-expmod.adb, s-expmod.ads, + s-expsfl.ads, s-expsin.ads, s-expssi.ads, s-expuns.adb, + s-expuns.ads, s-fatflt.ads, s-fatgen.adb, s-fatgen.ads, + s-fatlfl.ads, s-fatllf.ads, s-fatsfl.ads, s-ficobl.ads, + s-fileio.adb, s-fileio.ads, s-finimp.adb, s-finimp.ads, + s-finroo.adb, s-finroo.ads, s-fore.adb, s-fore.ads, + s-gloloc.adb, s-gloloc.ads, s-imgbiu.adb, s-imgbiu.ads, + s-imgboo.adb, s-imgboo.ads, s-imgcha.adb, s-imgcha.ads, + s-imgdec.adb, s-imgdec.ads, s-imgenu.adb, s-imgenu.ads, + s-imgint.adb, s-imgint.ads, s-imgllb.adb, s-imgllb.ads, + s-imglld.adb, s-imglld.ads, s-imglli.adb, s-imglli.ads, + s-imgllu.adb, s-imgllu.ads, s-imgllw.adb, s-imgllw.ads, + s-imgrea.adb, s-imgrea.ads, s-imguns.adb, s-imguns.ads, + s-imgwch.adb, s-imgwch.ads, s-imgwiu.adb, s-imgwiu.ads, + s-inmaop.ads, s-interr.adb, s-interr.ads, s-intman.ads, + s-io.adb, s-io.ads, s-maccod.ads, s-mantis.adb, + s-mantis.ads, s-mastop.adb, s-mastop.ads, s-memory.adb, + s-memory.ads, s-osprim.ads, s-pack03.adb, s-pack03.ads, + s-pack05.adb, s-pack05.ads, s-pack06.adb, s-pack06.ads, + s-pack07.adb, s-pack07.ads, s-pack09.adb, s-pack09.ads, + s-pack10.adb, s-pack10.ads, s-pack11.adb, s-pack11.ads, + s-pack12.adb, s-pack12.ads, s-pack13.adb, s-pack13.ads, + s-pack14.adb, s-pack14.ads, s-pack15.adb, s-pack15.ads, + s-pack17.adb, s-pack17.ads, s-pack18.adb, s-pack18.ads, + s-pack19.adb, s-pack19.ads, s-pack20.adb, s-pack20.ads, + s-pack21.adb, s-pack21.ads, s-pack22.adb, s-pack22.ads, + s-pack23.adb, s-pack23.ads, s-pack24.adb, s-pack24.ads, + s-pack25.adb, s-pack25.ads, s-pack26.adb, s-pack26.ads, + s-pack27.adb, s-pack27.ads, s-pack28.adb, s-pack28.ads, + s-pack29.adb, s-pack29.ads, s-pack30.adb, s-pack30.ads, + s-pack31.adb, s-pack31.ads, s-pack33.adb, s-pack33.ads, + s-pack34.adb, s-pack34.ads, s-pack35.adb, s-pack35.ads, + s-pack36.adb, s-pack36.ads, s-pack37.adb, s-pack37.ads, + s-pack38.adb, s-pack38.ads, s-pack39.adb, s-pack39.ads, + s-pack40.adb, s-pack40.ads, s-pack41.adb, s-pack41.ads, + s-pack42.adb, s-pack42.ads, s-pack43.adb, s-pack43.ads, + s-pack44.adb, s-pack44.ads, s-pack45.adb, s-pack45.ads, + s-pack46.adb, s-pack46.ads, s-pack47.adb, s-pack47.ads, + s-pack48.adb, s-pack48.ads, s-pack49.adb, s-pack49.ads, + s-pack50.adb, s-pack50.ads, s-pack51.adb, s-pack51.ads, + s-pack52.adb, s-pack52.ads, s-pack53.adb, s-pack53.ads, + s-pack54.adb, s-pack54.ads, s-pack55.adb, s-pack55.ads, + s-pack56.adb, s-pack56.ads, s-pack57.adb, s-pack57.ads, + s-pack58.adb, s-pack58.ads, s-pack59.adb, s-pack59.ads, + s-pack60.adb, s-pack60.ads, s-pack61.adb, s-pack61.ads, + s-pack62.adb, s-pack62.ads, s-pack63.adb, s-pack63.ads, + s-parame.adb, s-parame.ads, s-parint.adb, s-parint.ads, + s-pooglo.adb, s-pooglo.ads, s-pooloc.adb, s-pooloc.ads, + s-poosiz.adb, s-poosiz.ads, s-powtab.ads, s-proinf.adb, + s-proinf.ads, s-rpc.adb, s-rpc.ads, s-scaval.ads, + s-secsta.adb, s-secsta.ads, s-sequio.adb, s-sequio.ads, + s-shasto.adb, s-shasto.ads, s-soflin.adb, s-soflin.ads, + s-sopco3.adb, s-sopco3.ads, s-sopco4.adb, s-sopco4.ads, + s-sopco5.adb, s-sopco5.ads, s-stache.adb, s-stache.ads, + s-stalib.adb, s-stalib.ads, s-stoele.adb, s-stoele.ads, + s-stopoo.ads, s-stratt.adb, s-stratt.ads, s-strops.adb, + s-strops.ads, s-taasde.adb, s-taasde.ads, s-tadeca.adb, + s-tadeca.ads, s-tadert.adb, s-tadert.ads, s-taenca.adb, + s-taenca.ads, s-taprob.adb, s-taprob.ads, s-taprop.ads, + s-tarest.adb, s-tarest.ads, s-tasdeb.adb, s-tasdeb.ads, + s-tasinf.adb, s-tasinf.ads, s-tasini.adb, s-tasini.ads, + s-taskin.adb, s-taskin.ads, s-tasque.adb, s-tasque.ads, + s-tasren.adb, s-tasren.ads, s-tasres.ads, s-tassta.adb, + s-tassta.ads, s-tasuti.adb, s-tasuti.ads, s-tataat.adb, + s-tataat.ads, s-tpinop.adb, s-tpinop.ads, s-tpoben.adb, + s-tpoben.ads, s-tpobop.adb, s-tpobop.ads, s-tposen.adb, + s-tposen.ads, s-traceb.adb, s-traceb.ads, s-traces.adb, + s-traces.ads, s-tratas.adb, s-tratas.ads, s-unstyp.ads, + s-vaflop.adb, s-vaflop.ads, s-valboo.adb, s-valboo.ads, + s-valcha.adb, s-valcha.ads, s-valdec.adb, s-valdec.ads, + s-valenu.adb, s-valenu.ads, s-valint.adb, s-valint.ads, + s-vallld.adb, s-vallld.ads, s-vallli.adb, s-vallli.ads, + s-valllu.adb, s-valllu.ads, s-valrea.adb, s-valrea.ads, + s-valuns.adb, s-valuns.ads, s-valuti.adb, s-valuti.ads, + s-valwch.adb, s-valwch.ads, s-vercon.adb, s-vercon.ads, + s-vmexta.adb, s-vmexta.ads, s-wchcnv.adb, s-wchcnv.ads, + s-wchcon.ads, s-wchjis.adb, s-wchjis.ads, s-wchstw.adb, + s-wchstw.ads, s-wchwts.adb, s-wchwts.ads, s-widboo.adb, + s-widboo.ads, s-widcha.adb, s-widcha.ads, s-widenu.adb, + s-widenu.ads, s-widlli.adb, s-widlli.ads, s-widllu.adb, + s-widllu.ads, s-widwch.adb, s-widwch.ads, s-wwdcha.adb, + s-wwdcha.ads, s-wwdenu.adb, s-wwdenu.ads, s-wwdwch.adb, + s-wwdwch.ads, scans.adb, scans.ads, scn-nlit.adb, + scn-slit.adb, scn.adb, scn.ads, sdefault.ads, + sem.adb, sem.ads, sem_aggr.adb, sem_aggr.ads, + sem_attr.adb, sem_attr.ads, sem_case.adb, sem_case.ads, + sem_cat.adb, sem_cat.ads, sem_ch10.adb, sem_ch10.ads, + sem_ch11.adb, sem_ch11.ads, sem_ch12.adb, sem_ch12.ads, + sem_ch13.adb, sem_ch13.ads, sem_ch2.adb, sem_ch2.ads, + sem_ch3.adb, sem_ch3.ads, sem_ch4.adb, sem_ch4.ads, + sem_ch5.adb, sem_ch5.ads, sem_ch6.adb, sem_ch6.ads, + sem_ch7.adb, sem_ch7.ads, sem_ch8.adb, sem_ch8.ads, + sem_ch9.adb, sem_ch9.ads, sem_disp.adb, sem_disp.ads, + sem_dist.adb, sem_dist.ads, sem_elab.adb, sem_elab.ads, + sem_elim.adb, sem_elim.ads, sem_eval.adb, sem_eval.ads, + sem_intr.adb, sem_intr.ads, sem_maps.adb, sem_maps.ads, + sem_mech.adb, sem_mech.ads, sem_prag.adb, sem_prag.ads, + sem_res.adb, sem_res.ads, sem_smem.adb, sem_smem.ads, + sem_type.adb, sem_type.ads, sem_util.adb, sem_util.ads, + sem_vfpt.adb, sem_vfpt.ads, sem_warn.adb, sem_warn.ads, + sequenio.ads, sfn_scan.adb, sfn_scan.ads, sinfo-cn.adb, + sinfo-cn.ads, sinfo.adb, sinfo.ads, sinput-d.adb, + sinput-d.ads, sinput-l.adb, sinput-l.ads, sinput-p.adb, + sinput-p.ads, sinput.adb, sinput.ads, snames.adb, + snames.ads, sprint.adb, sprint.ads, stand.adb, + stand.ads, stringt.adb, stringt.ads, style.adb, + style.ads, stylesw.adb, stylesw.ads, switch-b.adb, + switch-b.ads, switch-c.adb, switch-c.ads, switch-m.adb, + switch-m.ads, switch.adb, switch.ads, system.ads, + table.adb, table.ads, targparm.adb, targparm.ads, + tbuild.adb, tbuild.ads, text_io.ads, trans.c, + tree_gen.adb, tree_gen.ads, tree_in.adb, tree_in.ads, + tree_io.adb, tree_io.ads, treepr.adb, treepr.ads, + ttypef.ads, ttypes.ads, types.adb, types.ads, + uintp.adb, uintp.ads, uname.adb, uname.ads, + unchconv.ads, unchdeal.ads, urealp.adb, urealp.ads, + usage.adb, usage.ads, validsw.adb, validsw.ads, + widechar.adb, widechar.ads, xeinfo.adb, xnmake.adb, + xr_tabls.adb, xr_tabls.ads, xref_lib.adb, xref_lib.ads, + xsinfo.adb, xsnames.adb, xtreeprs.adb : Merge header, + formatting and other trivial changes from ACT. + 2003-04-12 Zack Weinberg * gigi.h, utils2.c (build_constructor): diff --git a/gcc/ada/a-astaco.adb b/gcc/ada/a-astaco.adb index cd184e8909ec..e7dd42143564 100644 --- a/gcc/ada/a-astaco.adb +++ b/gcc/ada/a-astaco.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992,1993,1994,1995 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-astaco.ads b/gcc/ada/a-astaco.ads index bf5371be0047..784953b3f58b 100644 --- a/gcc/ada/a-astaco.ads +++ b/gcc/ada/a-astaco.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- This specification is adapted from the Ada Reference Manual for use with -- -- GNAT. In accordance with the copyright of that document, you can freely -- -- copy and modify this specification, provided that if you redistribute a -- diff --git a/gcc/ada/a-caldel.adb b/gcc/ada/a-caldel.adb index 04d63cf10e47..ee9903a2558b 100644 --- a/gcc/ada/a-caldel.adb +++ b/gcc/ada/a-caldel.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1991-2001 Florida State University -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-caldel.ads b/gcc/ada/a-caldel.ads index 5fd368b42091..541e6af423fa 100644 --- a/gcc/ada/a-caldel.ads +++ b/gcc/ada/a-caldel.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1998, Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-calend.adb b/gcc/ada/a-calend.adb index 078e05c7d32f..1715d7f0ecbf 100644 --- a/gcc/ada/a-calend.adb +++ b/gcc/ada/a-calend.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-calend.ads b/gcc/ada/a-calend.ads index 055c3f74d29b..00d453210375 100644 --- a/gcc/ada/a-calend.ads +++ b/gcc/ada/a-calend.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1997 Free Software Foundation, Inc. -- -- -- -- This specification is derived from the Ada Reference Manual for use with -- diff --git a/gcc/ada/a-chahan.adb b/gcc/ada/a-chahan.adb index ceb66b73dd94..117334011373 100644 --- a/gcc/ada/a-chahan.adb +++ b/gcc/ada/a-chahan.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-chahan.ads b/gcc/ada/a-chahan.ads index 22ceb038baa0..0a0162d1d67c 100644 --- a/gcc/ada/a-chahan.ads +++ b/gcc/ada/a-chahan.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1997 Free Software Foundation, Inc. -- -- -- -- This specification is derived from the Ada Reference Manual for use with -- diff --git a/gcc/ada/a-charac.ads b/gcc/ada/a-charac.ads index 86a0741392f1..ef378895425e 100644 --- a/gcc/ada/a-charac.ads +++ b/gcc/ada/a-charac.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- This specification is adapted from the Ada Reference Manual for use with -- -- GNAT. In accordance with the copyright of that document, you can freely -- -- copy and modify this specification, provided that if you redistribute a -- diff --git a/gcc/ada/a-chlat1.ads b/gcc/ada/a-chlat1.ads index a914a3fbbca6..c60ec205efca 100644 --- a/gcc/ada/a-chlat1.ads +++ b/gcc/ada/a-chlat1.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- This specification is adapted from the Ada Reference Manual for use with -- -- GNAT. In accordance with the copyright of that document, you can freely -- -- copy and modify this specification, provided that if you redistribute a -- diff --git a/gcc/ada/a-chlat9.ads b/gcc/ada/a-chlat9.ads index f446d7a2e6c6..682bac1a7621 100644 --- a/gcc/ada/a-chlat9.ads +++ b/gcc/ada/a-chlat9.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 2002 Free Software Foundation, Inc. -- -- -- -- This specification is derived from the Ada Reference Manual for use with -- diff --git a/gcc/ada/a-colien.adb b/gcc/ada/a-colien.adb index e916524bc23f..6ef118abf4e2 100644 --- a/gcc/ada/a-colien.adb +++ b/gcc/ada/a-colien.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1996-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-colien.ads b/gcc/ada/a-colien.ads index 3ef0c1e90c5d..21247953ef9f 100644 --- a/gcc/ada/a-colien.ads +++ b/gcc/ada/a-colien.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1996-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-colire.adb b/gcc/ada/a-colire.adb index 27e276b0d79a..c1de7b1fe76f 100644 --- a/gcc/ada/a-colire.adb +++ b/gcc/ada/a-colire.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-colire.ads b/gcc/ada/a-colire.ads index 35e3dc8d7aa2..46bb8704be31 100644 --- a/gcc/ada/a-colire.ads +++ b/gcc/ada/a-colire.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-comlin.adb b/gcc/ada/a-comlin.adb index 8d9bfe2bf667..b3a31ce3747f 100644 --- a/gcc/ada/a-comlin.adb +++ b/gcc/ada/a-comlin.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-comlin.ads b/gcc/ada/a-comlin.ads index bb92ec47cdb4..e4c0529d387d 100644 --- a/gcc/ada/a-comlin.ads +++ b/gcc/ada/a-comlin.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- -- -- -- This specification is derived from the Ada Reference Manual for use with -- diff --git a/gcc/ada/a-cwila1.ads b/gcc/ada/a-cwila1.ads index 6048672077fc..4cc2a215d40e 100644 --- a/gcc/ada/a-cwila1.ads +++ b/gcc/ada/a-cwila1.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2000 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-cwila9.ads b/gcc/ada/a-cwila9.ads index 239794ae7d64..7ada98cc948c 100644 --- a/gcc/ada/a-cwila9.ads +++ b/gcc/ada/a-cwila9.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-decima.adb b/gcc/ada/a-decima.adb index 85404743c6cb..cb7afc104a7e 100644 --- a/gcc/ada/a-decima.adb +++ b/gcc/ada/a-decima.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992,1993,1994 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-decima.ads b/gcc/ada/a-decima.ads index b46175cd82fb..0a55dd65c24b 100644 --- a/gcc/ada/a-decima.ads +++ b/gcc/ada/a-decima.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1997 Free Software Foundation, Inc. -- -- -- -- This specification is derived from the Ada Reference Manual for use with -- diff --git a/gcc/ada/a-diocst.adb b/gcc/ada/a-diocst.adb index 0e256a664ec9..fabaf689475b 100644 --- a/gcc/ada/a-diocst.adb +++ b/gcc/ada/a-diocst.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1998 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-diocst.ads b/gcc/ada/a-diocst.ads index 6613ab60bfe0..e9679065879a 100644 --- a/gcc/ada/a-diocst.ads +++ b/gcc/ada/a-diocst.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992,1993,1994,1995 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-direio.adb b/gcc/ada/a-direio.adb index aef68f323ee7..20d44df0eba4 100644 --- a/gcc/ada/a-direio.adb +++ b/gcc/ada/a-direio.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1998 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-direio.ads b/gcc/ada/a-direio.ads index fd89d7121d3d..6137c336610d 100644 --- a/gcc/ada/a-direio.ads +++ b/gcc/ada/a-direio.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- This specification is derived from the Ada Reference Manual for use with -- diff --git a/gcc/ada/a-dynpri.adb b/gcc/ada/a-dynpri.adb index 1a878155ef5d..f4468adcd48f 100644 --- a/gcc/ada/a-dynpri.adb +++ b/gcc/ada/a-dynpri.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001, Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-dynpri.ads b/gcc/ada/a-dynpri.ads index 4531cd0b1b87..fd5b9fe1485d 100644 --- a/gcc/ada/a-dynpri.ads +++ b/gcc/ada/a-dynpri.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- This specification is adapted from the Ada Reference Manual for use with -- -- GNAT. In accordance with the copyright of that document, you can freely -- -- copy and modify this specification, provided that if you redistribute a -- diff --git a/gcc/ada/a-einuoc.adb b/gcc/ada/a-einuoc.adb index 3b53098f7662..e4c4d4f1eb27 100644 --- a/gcc/ada/a-einuoc.adb +++ b/gcc/ada/a-einuoc.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 2000 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-einuoc.ads b/gcc/ada/a-einuoc.ads index d24b7f9712e9..9aba91f7a924 100644 --- a/gcc/ada/a-einuoc.ads +++ b/gcc/ada/a-einuoc.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 2000 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-except.adb b/gcc/ada/a-except.adb index 979f11e41c91..30393145309d 100644 --- a/gcc/ada/a-except.adb +++ b/gcc/ada/a-except.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-except.ads b/gcc/ada/a-except.ads index a928a6351688..c9a0b11e1f8a 100644 --- a/gcc/ada/a-except.ads +++ b/gcc/ada/a-except.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- -- -- -- This specification is derived from the Ada Reference Manual for use with -- diff --git a/gcc/ada/a-excpol.adb b/gcc/ada/a-excpol.adb index b1cf91738a6f..4eab88272d0d 100644 --- a/gcc/ada/a-excpol.adb +++ b/gcc/ada/a-excpol.adb @@ -7,7 +7,6 @@ -- B o d y -- -- (dummy version where polling is not used) -- -- -- --- -- -- Copyright (C) 1992-1998, Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-exctra.adb b/gcc/ada/a-exctra.adb index 42bc70c7befd..00a3092e9a32 100644 --- a/gcc/ada/a-exctra.adb +++ b/gcc/ada/a-exctra.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1999-2001 Free Software Foundation, Inc. -- -- -- -- This specification is derived from the Ada Reference Manual for use with -- diff --git a/gcc/ada/a-exctra.ads b/gcc/ada/a-exctra.ads index 474d7b762755..622db08c7787 100644 --- a/gcc/ada/a-exctra.ads +++ b/gcc/ada/a-exctra.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1999-2001 Free Software Foundation, Inc. -- -- -- -- This specification is derived from the Ada Reference Manual for use with -- diff --git a/gcc/ada/a-filico.adb b/gcc/ada/a-filico.adb index aeca7f7ad70a..745ba8475b25 100644 --- a/gcc/ada/a-filico.adb +++ b/gcc/ada/a-filico.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-filico.ads b/gcc/ada/a-filico.ads index 98921d5edee4..4263b260cd39 100644 --- a/gcc/ada/a-filico.ads +++ b/gcc/ada/a-filico.ads @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1997 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-finali.adb b/gcc/ada/a-finali.adb index 3d1e432d992a..a9095e2a43fa 100644 --- a/gcc/ada/a-finali.adb +++ b/gcc/ada/a-finali.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-finali.ads b/gcc/ada/a-finali.ads index b8401126592a..03ea2816d6b0 100644 --- a/gcc/ada/a-finali.ads +++ b/gcc/ada/a-finali.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1997 Free Software Foundation, Inc. -- -- -- -- This specification is derived from the Ada Reference Manual for use with -- diff --git a/gcc/ada/a-flteio.ads b/gcc/ada/a-flteio.ads index f72cd5ff518c..b1defdf27496 100644 --- a/gcc/ada/a-flteio.ads +++ b/gcc/ada/a-flteio.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- This specification is adapted from the Ada Reference Manual for use with -- -- GNAT. In accordance with the copyright of that document, you can freely -- -- copy and modify this specification, provided that if you redistribute a -- diff --git a/gcc/ada/a-fwteio.ads b/gcc/ada/a-fwteio.ads index 342df6d441b0..a60672dda402 100644 --- a/gcc/ada/a-fwteio.ads +++ b/gcc/ada/a-fwteio.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- This specification is adapted from the Ada Reference Manual for use with -- -- GNAT. In accordance with the copyright of that document, you can freely -- -- copy and modify this specification, provided that if you redistribute a -- diff --git a/gcc/ada/a-inteio.ads b/gcc/ada/a-inteio.ads index 94d9a6873b12..125e14404fea 100644 --- a/gcc/ada/a-inteio.ads +++ b/gcc/ada/a-inteio.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- This specification is adapted from the Ada Reference Manual for use with -- -- GNAT. In accordance with the copyright of that document, you can freely -- -- copy and modify this specification, provided that if you redistribute a -- diff --git a/gcc/ada/a-interr.adb b/gcc/ada/a-interr.adb index edc9500734bc..5ab89c18b674 100644 --- a/gcc/ada/a-interr.adb +++ b/gcc/ada/a-interr.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1991-2001 Florida State University -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-interr.ads b/gcc/ada/a-interr.ads index 8a5ad8ec4adc..0475deec568d 100644 --- a/gcc/ada/a-interr.ads +++ b/gcc/ada/a-interr.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- This specification is derived from the Ada Reference Manual for use with -- diff --git a/gcc/ada/a-intnam.ads b/gcc/ada/a-intnam.ads index 1535adb3a6ff..e493261bc56d 100644 --- a/gcc/ada/a-intnam.ads +++ b/gcc/ada/a-intnam.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- This specification is adapted from the Ada Reference Manual for use with -- -- GNAT. In accordance with the copyright of that document, you can freely -- -- copy and modify this specification, provided that if you redistribute a -- diff --git a/gcc/ada/a-intsig.adb b/gcc/ada/a-intsig.adb index b6199dec3e35..a2451afe6e20 100644 --- a/gcc/ada/a-intsig.adb +++ b/gcc/ada/a-intsig.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 2000 Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-intsig.ads b/gcc/ada/a-intsig.ads index 2168e7c9a8a4..5340da13345a 100644 --- a/gcc/ada/a-intsig.ads +++ b/gcc/ada/a-intsig.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 2000 Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-ioexce.ads b/gcc/ada/a-ioexce.ads index 901a5f517c45..462b46f98276 100644 --- a/gcc/ada/a-ioexce.ads +++ b/gcc/ada/a-ioexce.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- This specification is adapted from the Ada Reference Manual for use with -- -- GNAT. In accordance with the copyright of that document, you can freely -- -- copy and modify this specification, provided that if you redistribute a -- diff --git a/gcc/ada/a-iwteio.ads b/gcc/ada/a-iwteio.ads index 70ea60a36714..31a79eaefa3f 100644 --- a/gcc/ada/a-iwteio.ads +++ b/gcc/ada/a-iwteio.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- This specification is adapted from the Ada Reference Manual for use with -- -- GNAT. In accordance with the copyright of that document, you can freely -- -- copy and modify this specification, provided that if you redistribute a -- diff --git a/gcc/ada/a-lfteio.ads b/gcc/ada/a-lfteio.ads index 3c8b434e7eab..24867305630f 100644 --- a/gcc/ada/a-lfteio.ads +++ b/gcc/ada/a-lfteio.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- This specification is adapted from the Ada Reference Manual for use with -- -- GNAT. In accordance with the copyright of that document, you can freely -- -- copy and modify this specification, provided that if you redistribute a -- diff --git a/gcc/ada/a-lfwtio.ads b/gcc/ada/a-lfwtio.ads index 63fbf58cdce9..61b670427516 100644 --- a/gcc/ada/a-lfwtio.ads +++ b/gcc/ada/a-lfwtio.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- This specification is adapted from the Ada Reference Manual for use with -- -- GNAT. In accordance with the copyright of that document, you can freely -- -- copy and modify this specification, provided that if you redistribute a -- diff --git a/gcc/ada/a-liteio.ads b/gcc/ada/a-liteio.ads index e659910a7166..c4f7a489402f 100644 --- a/gcc/ada/a-liteio.ads +++ b/gcc/ada/a-liteio.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- This specification is adapted from the Ada Reference Manual for use with -- -- GNAT. In accordance with the copyright of that document, you can freely -- -- copy and modify this specification, provided that if you redistribute a -- diff --git a/gcc/ada/a-liwtio.ads b/gcc/ada/a-liwtio.ads index 8b2259c4ee0b..1c95dbce5058 100644 --- a/gcc/ada/a-liwtio.ads +++ b/gcc/ada/a-liwtio.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- This specification is adapted from the Ada Reference Manual for use with -- -- GNAT. In accordance with the copyright of that document, you can freely -- -- copy and modify this specification, provided that if you redistribute a -- diff --git a/gcc/ada/a-llftio.ads b/gcc/ada/a-llftio.ads index ca17f2caa3d8..bd428d0e4643 100644 --- a/gcc/ada/a-llftio.ads +++ b/gcc/ada/a-llftio.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- This specification is adapted from the Ada Reference Manual for use with -- -- GNAT. In accordance with the copyright of that document, you can freely -- -- copy and modify this specification, provided that if you redistribute a -- diff --git a/gcc/ada/a-llfwti.ads b/gcc/ada/a-llfwti.ads index 1aeec0ca0aca..0ce5d80dd477 100644 --- a/gcc/ada/a-llfwti.ads +++ b/gcc/ada/a-llfwti.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- This specification is adapted from the Ada Reference Manual for use with -- -- GNAT. In accordance with the copyright of that document, you can freely -- -- copy and modify this specification, provided that if you redistribute a -- diff --git a/gcc/ada/a-llitio.ads b/gcc/ada/a-llitio.ads index 069181081c0b..19e77d0e4f40 100644 --- a/gcc/ada/a-llitio.ads +++ b/gcc/ada/a-llitio.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- This specification is adapted from the Ada Reference Manual for use with -- -- GNAT. In accordance with the copyright of that document, you can freely -- -- copy and modify this specification, provided that if you redistribute a -- diff --git a/gcc/ada/a-lliwti.ads b/gcc/ada/a-lliwti.ads index e18d04837d9a..842765f204c8 100644 --- a/gcc/ada/a-lliwti.ads +++ b/gcc/ada/a-lliwti.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- This specification is adapted from the Ada Reference Manual for use with -- -- GNAT. In accordance with the copyright of that document, you can freely -- -- copy and modify this specification, provided that if you redistribute a -- diff --git a/gcc/ada/a-ncelfu.ads b/gcc/ada/a-ncelfu.ads index 0416edffe239..5f8e6c9cf579 100644 --- a/gcc/ada/a-ncelfu.ads +++ b/gcc/ada/a-ncelfu.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- This specification is adapted from the Ada Reference Manual for use with -- -- GNAT. In accordance with the copyright of that document, you can freely -- -- copy and modify this specification, provided that if you redistribute a -- diff --git a/gcc/ada/a-ngcefu.adb b/gcc/ada/a-ngcefu.adb index d6cde0cd564c..6dbf9be98971 100644 --- a/gcc/ada/a-ngcefu.adb +++ b/gcc/ada/a-ngcefu.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-ngcefu.ads b/gcc/ada/a-ngcefu.ads index 202bfeb9837f..feef9cc8ccf5 100644 --- a/gcc/ada/a-ngcefu.ads +++ b/gcc/ada/a-ngcefu.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- This specification is adapted from the Ada Reference Manual for use with -- -- GNAT. In accordance with the copyright of that document, you can freely -- -- copy and modify this specification, provided that if you redistribute a -- diff --git a/gcc/ada/a-ngcoty.adb b/gcc/ada/a-ngcoty.adb index 47773db0e1a7..88969061317b 100644 --- a/gcc/ada/a-ngcoty.adb +++ b/gcc/ada/a-ngcoty.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-ngcoty.ads b/gcc/ada/a-ngcoty.ads index 5c582fbce11d..fc19f0c5cdfd 100644 --- a/gcc/ada/a-ngcoty.ads +++ b/gcc/ada/a-ngcoty.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1997 Free Software Foundation, Inc. -- -- -- -- This specification is derived from the Ada Reference Manual for use with -- diff --git a/gcc/ada/a-ngelfu.adb b/gcc/ada/a-ngelfu.adb index 56ae57d8c545..d7ae2c8dc2ec 100644 --- a/gcc/ada/a-ngelfu.adb +++ b/gcc/ada/a-ngelfu.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-ngelfu.ads b/gcc/ada/a-ngelfu.ads index 864f1c49f8fa..320ce8ccbe57 100644 --- a/gcc/ada/a-ngelfu.ads +++ b/gcc/ada/a-ngelfu.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- This specification is adapted from the Ada Reference Manual for use with -- -- GNAT. In accordance with the copyright of that document, you can freely -- -- copy and modify this specification, provided that if you redistribute a -- diff --git a/gcc/ada/a-nlcefu.ads b/gcc/ada/a-nlcefu.ads index df7139bfd9e3..87290611a595 100644 --- a/gcc/ada/a-nlcefu.ads +++ b/gcc/ada/a-nlcefu.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- This specification is adapted from the Ada Reference Manual for use with -- -- GNAT. In accordance with the copyright of that document, you can freely -- -- copy and modify this specification, provided that if you redistribute a -- diff --git a/gcc/ada/a-nlcoty.ads b/gcc/ada/a-nlcoty.ads index 033f81eff75e..9305836e4c54 100644 --- a/gcc/ada/a-nlcoty.ads +++ b/gcc/ada/a-nlcoty.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- This specification is adapted from the Ada Reference Manual for use with -- -- GNAT. In accordance with the copyright of that document, you can freely -- -- copy and modify this specification, provided that if you redistribute a -- diff --git a/gcc/ada/a-nlelfu.ads b/gcc/ada/a-nlelfu.ads index 285ddde3811e..c7eebb51cef3 100644 --- a/gcc/ada/a-nlelfu.ads +++ b/gcc/ada/a-nlelfu.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- This specification is adapted from the Ada Reference Manual for use with -- -- GNAT. In accordance with the copyright of that document, you can freely -- -- copy and modify this specification, provided that if you redistribute a -- diff --git a/gcc/ada/a-nllcef.ads b/gcc/ada/a-nllcef.ads index 7156b8d96222..a7f7dc1787a6 100644 --- a/gcc/ada/a-nllcef.ads +++ b/gcc/ada/a-nllcef.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- This specification is adapted from the Ada Reference Manual for use with -- -- GNAT. In accordance with the copyright of that document, you can freely -- -- copy and modify this specification, provided that if you redistribute a -- diff --git a/gcc/ada/a-nllcty.ads b/gcc/ada/a-nllcty.ads index 6d3e1843d9af..5a93e8716b23 100644 --- a/gcc/ada/a-nllcty.ads +++ b/gcc/ada/a-nllcty.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- This specification is adapted from the Ada Reference Manual for use with -- -- GNAT. In accordance with the copyright of that document, you can freely -- -- copy and modify this specification, provided that if you redistribute a -- diff --git a/gcc/ada/a-nllefu.ads b/gcc/ada/a-nllefu.ads index c9d614f3c5f0..fbc9a1e2e1ce 100644 --- a/gcc/ada/a-nllefu.ads +++ b/gcc/ada/a-nllefu.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- This specification is adapted from the Ada Reference Manual for use with -- -- GNAT. In accordance with the copyright of that document, you can freely -- -- copy and modify this specification, provided that if you redistribute a -- diff --git a/gcc/ada/a-nscefu.ads b/gcc/ada/a-nscefu.ads index 0ade1a8b5f2b..5e8c43c7698e 100644 --- a/gcc/ada/a-nscefu.ads +++ b/gcc/ada/a-nscefu.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- This specification is adapted from the Ada Reference Manual for use with -- -- GNAT. In accordance with the copyright of that document, you can freely -- -- copy and modify this specification, provided that if you redistribute a -- diff --git a/gcc/ada/a-nscoty.ads b/gcc/ada/a-nscoty.ads index de851c01c59c..30e9dad79945 100644 --- a/gcc/ada/a-nscoty.ads +++ b/gcc/ada/a-nscoty.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- This specification is adapted from the Ada Reference Manual for use with -- -- GNAT. In accordance with the copyright of that document, you can freely -- -- copy and modify this specification, provided that if you redistribute a -- diff --git a/gcc/ada/a-nselfu.ads b/gcc/ada/a-nselfu.ads index fae755c4e579..b039bca630dd 100644 --- a/gcc/ada/a-nselfu.ads +++ b/gcc/ada/a-nselfu.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- This specification is adapted from the Ada Reference Manual for use with -- -- GNAT. In accordance with the copyright of that document, you can freely -- -- copy and modify this specification, provided that if you redistribute a -- diff --git a/gcc/ada/a-nucoty.ads b/gcc/ada/a-nucoty.ads index 4a22af18112f..7c0b07ee2387 100644 --- a/gcc/ada/a-nucoty.ads +++ b/gcc/ada/a-nucoty.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- This specification is adapted from the Ada Reference Manual for use with -- -- GNAT. In accordance with the copyright of that document, you can freely -- -- copy and modify this specification, provided that if you redistribute a -- diff --git a/gcc/ada/a-nudira.adb b/gcc/ada/a-nudira.adb index 45bfc1cc84aa..298aecc986c8 100644 --- a/gcc/ada/a-nudira.adb +++ b/gcc/ada/a-nudira.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-nudira.ads b/gcc/ada/a-nudira.ads index 5a685c672870..291d8457ef98 100644 --- a/gcc/ada/a-nudira.ads +++ b/gcc/ada/a-nudira.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- This specification is derived from the Ada Reference Manual for use with -- diff --git a/gcc/ada/a-nuelfu.ads b/gcc/ada/a-nuelfu.ads index 3e8bc0bd1563..ca878f0aae22 100644 --- a/gcc/ada/a-nuelfu.ads +++ b/gcc/ada/a-nuelfu.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- This specification is adapted from the Ada Reference Manual for use with -- -- GNAT. In accordance with the copyright of that document, you can freely -- -- copy and modify this specification, provided that if you redistribute a -- diff --git a/gcc/ada/a-nuflra.adb b/gcc/ada/a-nuflra.adb index 942258f5aab0..e637e5d30429 100644 --- a/gcc/ada/a-nuflra.adb +++ b/gcc/ada/a-nuflra.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1998, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-nuflra.ads b/gcc/ada/a-nuflra.ads index 331ece7ff8d7..3ebb822e5c6a 100644 --- a/gcc/ada/a-nuflra.ads +++ b/gcc/ada/a-nuflra.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1998 Free Software Foundation, Inc. -- -- -- -- This specification is derived from the Ada Reference Manual for use with -- diff --git a/gcc/ada/a-numaux.ads b/gcc/ada/a-numaux.ads index 67995519508b..5d75217a94de 100644 --- a/gcc/ada/a-numaux.ads +++ b/gcc/ada/a-numaux.ads @@ -7,7 +7,6 @@ -- S p e c -- -- (C Library Version, non-x86) -- -- -- --- -- -- Copyright (C) 1992-1998 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-numeri.ads b/gcc/ada/a-numeri.ads index 3bf8901c6e33..35efcc2b6af9 100644 --- a/gcc/ada/a-numeri.ads +++ b/gcc/ada/a-numeri.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- This specification is adapted from the Ada Reference Manual for use with -- -- GNAT. In accordance with the copyright of that document, you can freely -- -- copy and modify this specification, provided that if you redistribute a -- diff --git a/gcc/ada/a-reatim.adb b/gcc/ada/a-reatim.adb index a915165c752e..15969d7d4565 100644 --- a/gcc/ada/a-reatim.adb +++ b/gcc/ada/a-reatim.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1991-2002, Florida State University -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-reatim.ads b/gcc/ada/a-reatim.ads index 5f04f1e0a316..43203481d513 100644 --- a/gcc/ada/a-reatim.ads +++ b/gcc/ada/a-reatim.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- This specification is derived from the Ada Reference Manual for use with -- diff --git a/gcc/ada/a-retide.adb b/gcc/ada/a-retide.adb index 9e934243105d..ca747a166099 100644 --- a/gcc/ada/a-retide.adb +++ b/gcc/ada/a-retide.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001, Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-retide.ads b/gcc/ada/a-retide.ads index 4247f57f36c8..ecee2546283c 100644 --- a/gcc/ada/a-retide.ads +++ b/gcc/ada/a-retide.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1999, Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-sequio.adb b/gcc/ada/a-sequio.adb index 237f752380e0..eedcbaad685d 100644 --- a/gcc/ada/a-sequio.adb +++ b/gcc/ada/a-sequio.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1999, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-sequio.ads b/gcc/ada/a-sequio.ads index b14dffc11b2c..56753685951a 100644 --- a/gcc/ada/a-sequio.ads +++ b/gcc/ada/a-sequio.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1997 Free Software Foundation, Inc. -- -- -- -- This specification is derived from the Ada Reference Manual for use with -- diff --git a/gcc/ada/a-sfteio.ads b/gcc/ada/a-sfteio.ads index 1c6ea63226cf..615b0193b659 100644 --- a/gcc/ada/a-sfteio.ads +++ b/gcc/ada/a-sfteio.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- This specification is adapted from the Ada Reference Manual for use with -- -- GNAT. In accordance with the copyright of that document, you can freely -- -- copy and modify this specification, provided that if you redistribute a -- diff --git a/gcc/ada/a-sfwtio.ads b/gcc/ada/a-sfwtio.ads index 7335ca1812fb..cfd297fb74c4 100644 --- a/gcc/ada/a-sfwtio.ads +++ b/gcc/ada/a-sfwtio.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- This specification is adapted from the Ada Reference Manual for use with -- -- GNAT. In accordance with the copyright of that document, you can freely -- -- copy and modify this specification, provided that if you redistribute a -- diff --git a/gcc/ada/a-siocst.adb b/gcc/ada/a-siocst.adb index 49b03fd21d18..23a73c628598 100644 --- a/gcc/ada/a-siocst.adb +++ b/gcc/ada/a-siocst.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1998 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-siocst.ads b/gcc/ada/a-siocst.ads index c282afe6b8a9..bd1a9601f7b6 100644 --- a/gcc/ada/a-siocst.ads +++ b/gcc/ada/a-siocst.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992,1993,1994,1995 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-siteio.ads b/gcc/ada/a-siteio.ads index d0062ed4a643..b434593eac15 100644 --- a/gcc/ada/a-siteio.ads +++ b/gcc/ada/a-siteio.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- This specification is adapted from the Ada Reference Manual for use with -- -- GNAT. In accordance with the copyright of that document, you can freely -- -- copy and modify this specification, provided that if you redistribute a -- diff --git a/gcc/ada/a-siwtio.ads b/gcc/ada/a-siwtio.ads index 6fab6d29f716..3e9a08f3a72e 100644 --- a/gcc/ada/a-siwtio.ads +++ b/gcc/ada/a-siwtio.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- This specification is adapted from the Ada Reference Manual for use with -- -- GNAT. In accordance with the copyright of that document, you can freely -- -- copy and modify this specification, provided that if you redistribute a -- diff --git a/gcc/ada/a-ssicst.adb b/gcc/ada/a-ssicst.adb index 0298a1ec81d6..e9cefcf0426a 100644 --- a/gcc/ada/a-ssicst.adb +++ b/gcc/ada/a-ssicst.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1998 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-ssicst.ads b/gcc/ada/a-ssicst.ads index 6997e195f098..198597e1ca53 100644 --- a/gcc/ada/a-ssicst.ads +++ b/gcc/ada/a-ssicst.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992,1993,1994,1995 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-ssitio.ads b/gcc/ada/a-ssitio.ads index 9d69f58562c0..9762a5ded9e5 100644 --- a/gcc/ada/a-ssitio.ads +++ b/gcc/ada/a-ssitio.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- This specification is adapted from the Ada Reference Manual for use with -- -- GNAT. In accordance with the copyright of that document, you can freely -- -- copy and modify this specification, provided that if you redistribute a -- diff --git a/gcc/ada/a-ssiwti.ads b/gcc/ada/a-ssiwti.ads index af2f590692ef..645df96c8e8f 100644 --- a/gcc/ada/a-ssiwti.ads +++ b/gcc/ada/a-ssiwti.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- This specification is adapted from the Ada Reference Manual for use with -- -- GNAT. In accordance with the copyright of that document, you can freely -- -- copy and modify this specification, provided that if you redistribute a -- diff --git a/gcc/ada/a-stmaco.ads b/gcc/ada/a-stmaco.ads index 1038dc214871..08e36a9fb2e1 100644 --- a/gcc/ada/a-stmaco.ads +++ b/gcc/ada/a-stmaco.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- This specification is derived from the Ada Reference Manual for use with -- diff --git a/gcc/ada/a-storio.adb b/gcc/ada/a-storio.adb index 94eabcbcdfe0..689a22a1d0be 100644 --- a/gcc/ada/a-storio.adb +++ b/gcc/ada/a-storio.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992,1993,1994 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-storio.ads b/gcc/ada/a-storio.ads index f63b2b323a00..f32c97d0cd02 100644 --- a/gcc/ada/a-storio.ads +++ b/gcc/ada/a-storio.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- This specification is adapted from the Ada Reference Manual for use with -- -- GNAT. In accordance with the copyright of that document, you can freely -- -- copy and modify this specification, provided that if you redistribute a -- diff --git a/gcc/ada/a-strbou.adb b/gcc/ada/a-strbou.adb index 55df0150f7a4..68351dc445de 100644 --- a/gcc/ada/a-strbou.adb +++ b/gcc/ada/a-strbou.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-strbou.ads b/gcc/ada/a-strbou.ads index 2212aa88911b..2f414f6e0eb3 100644 --- a/gcc/ada/a-strbou.ads +++ b/gcc/ada/a-strbou.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2000 Free Software Foundation, Inc. -- -- -- -- This specification is derived from the Ada Reference Manual for use with -- diff --git a/gcc/ada/a-stream.ads b/gcc/ada/a-stream.ads index 0ca2a652c226..8f0732632f1a 100644 --- a/gcc/ada/a-stream.ads +++ b/gcc/ada/a-stream.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- This specification is derived from the Ada Reference Manual for use with -- diff --git a/gcc/ada/a-strfix.adb b/gcc/ada/a-strfix.adb index 3cdb806617ca..1513a21c3509 100644 --- a/gcc/ada/a-strfix.adb +++ b/gcc/ada/a-strfix.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-strfix.ads b/gcc/ada/a-strfix.ads index c80b5112bb7d..6b0c147e1edc 100644 --- a/gcc/ada/a-strfix.ads +++ b/gcc/ada/a-strfix.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1997 Free Software Foundation, Inc. -- -- -- -- This specification is derived from the Ada Reference Manual for use with -- diff --git a/gcc/ada/a-string.ads b/gcc/ada/a-string.ads index efaa77d97ba2..e8ec5ac3690f 100644 --- a/gcc/ada/a-string.ads +++ b/gcc/ada/a-string.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- This specification is adapted from the Ada Reference Manual for use with -- -- GNAT. In accordance with the copyright of that document, you can freely -- -- copy and modify this specification, provided that if you redistribute a -- diff --git a/gcc/ada/a-strmap.adb b/gcc/ada/a-strmap.adb index 0e9974eec053..7ffe6eee76c9 100644 --- a/gcc/ada/a-strmap.adb +++ b/gcc/ada/a-strmap.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-strmap.ads b/gcc/ada/a-strmap.ads index 2d1595bae5f0..31a966cb7971 100644 --- a/gcc/ada/a-strmap.ads +++ b/gcc/ada/a-strmap.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- This specification is derived from the Ada Reference Manual for use with -- diff --git a/gcc/ada/a-strsea.adb b/gcc/ada/a-strsea.adb index 3a60883c470f..29db92a87c99 100644 --- a/gcc/ada/a-strsea.adb +++ b/gcc/ada/a-strsea.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992,1993,1994,1995,1996 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-strsea.ads b/gcc/ada/a-strsea.ads index f3521f9a57b1..8dba572f6e08 100644 --- a/gcc/ada/a-strsea.ads +++ b/gcc/ada/a-strsea.ads @@ -6,10 +6,8 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1997 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- -- -- ware Foundation; either version 2, or (at your option) any later ver- -- diff --git a/gcc/ada/a-strunb.adb b/gcc/ada/a-strunb.adb index 4cf7e484efb3..13422c973849 100644 --- a/gcc/ada/a-strunb.adb +++ b/gcc/ada/a-strunb.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-strunb.ads b/gcc/ada/a-strunb.ads index 25b2d441a813..fe909009e123 100644 --- a/gcc/ada/a-strunb.ads +++ b/gcc/ada/a-strunb.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1998 Free Software Foundation, Inc. -- -- -- -- This specification is derived from the Ada Reference Manual for use with -- diff --git a/gcc/ada/a-ststio.adb b/gcc/ada/a-ststio.adb index f57ee4f0f534..74c9be2da3cf 100644 --- a/gcc/ada/a-ststio.adb +++ b/gcc/ada/a-ststio.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-ststio.ads b/gcc/ada/a-ststio.ads index 4e525e88a6e9..6a3ff556f087 100644 --- a/gcc/ada/a-ststio.ads +++ b/gcc/ada/a-ststio.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- This specification is derived from the Ada Reference Manual for use with -- diff --git a/gcc/ada/a-stunau.adb b/gcc/ada/a-stunau.adb index 0169a4693ce5..148bd3f74b1d 100644 --- a/gcc/ada/a-stunau.adb +++ b/gcc/ada/a-stunau.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1998, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-stunau.ads b/gcc/ada/a-stunau.ads index bcabc5f299aa..c5b1eeafdbee 100644 --- a/gcc/ada/a-stunau.ads +++ b/gcc/ada/a-stunau.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1998, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-stwibo.adb b/gcc/ada/a-stwibo.adb index 75666ae841b2..982ca638c717 100644 --- a/gcc/ada/a-stwibo.adb +++ b/gcc/ada/a-stwibo.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-stwibo.ads b/gcc/ada/a-stwibo.ads index d54061afb2f8..3da44797543f 100644 --- a/gcc/ada/a-stwibo.ads +++ b/gcc/ada/a-stwibo.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1997 Free Software Foundation, Inc. -- -- -- -- This specification is derived from the Ada Reference Manual for use with -- diff --git a/gcc/ada/a-stwifi.adb b/gcc/ada/a-stwifi.adb index 268ed4a0785c..dc71f1b878af 100644 --- a/gcc/ada/a-stwifi.adb +++ b/gcc/ada/a-stwifi.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-stwifi.ads b/gcc/ada/a-stwifi.ads index f2f74de3c670..7331db5f543b 100644 --- a/gcc/ada/a-stwifi.ads +++ b/gcc/ada/a-stwifi.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- This specification is adapted from the Ada Reference Manual for use with -- -- GNAT. In accordance with the copyright of that document, you can freely -- -- copy and modify this specification, provided that if you redistribute a -- diff --git a/gcc/ada/a-stwima.adb b/gcc/ada/a-stwima.adb index ad41e4a08d79..23bfc0b3ee27 100644 --- a/gcc/ada/a-stwima.adb +++ b/gcc/ada/a-stwima.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-stwima.ads b/gcc/ada/a-stwima.ads index bf1bcef40897..079336e0ea12 100644 --- a/gcc/ada/a-stwima.ads +++ b/gcc/ada/a-stwima.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1998 Free Software Foundation, Inc. -- -- -- -- This specification is derived from the Ada Reference Manual for use with -- diff --git a/gcc/ada/a-stwise.adb b/gcc/ada/a-stwise.adb index 97ee6650c760..a8b8ae910f34 100644 --- a/gcc/ada/a-stwise.adb +++ b/gcc/ada/a-stwise.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992,1993,1994 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-stwise.ads b/gcc/ada/a-stwise.ads index b5c0c55ddb82..01f216606953 100644 --- a/gcc/ada/a-stwise.ads +++ b/gcc/ada/a-stwise.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1997 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-stwiun.adb b/gcc/ada/a-stwiun.adb index e950a33f2d81..113957e918b2 100644 --- a/gcc/ada/a-stwiun.adb +++ b/gcc/ada/a-stwiun.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-stwiun.ads b/gcc/ada/a-stwiun.ads index 91f1d938a945..d2cf86ef6a10 100644 --- a/gcc/ada/a-stwiun.ads +++ b/gcc/ada/a-stwiun.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2000 Free Software Foundation, Inc. -- -- -- -- This specification is derived from the Ada Reference Manual for use with -- diff --git a/gcc/ada/a-suteio.adb b/gcc/ada/a-suteio.adb index 01475bda3838..737f3c7b35db 100644 --- a/gcc/ada/a-suteio.adb +++ b/gcc/ada/a-suteio.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1997-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-suteio.ads b/gcc/ada/a-suteio.ads index 8dc7c2ca27c3..c98f453f64b0 100644 --- a/gcc/ada/a-suteio.ads +++ b/gcc/ada/a-suteio.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1997-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-swmwco.ads b/gcc/ada/a-swmwco.ads index 25b0efe2cdbf..200d90099a38 100644 --- a/gcc/ada/a-swmwco.ads +++ b/gcc/ada/a-swmwco.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- This specification is derived from the Ada Reference Manual for use with -- diff --git a/gcc/ada/a-swuwti.adb b/gcc/ada/a-swuwti.adb index 53f4d0dd4264..adf4ba7f05cb 100644 --- a/gcc/ada/a-swuwti.adb +++ b/gcc/ada/a-swuwti.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1997-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-swuwti.ads b/gcc/ada/a-swuwti.ads index a5c3c7db8324..fca6211b00d4 100644 --- a/gcc/ada/a-swuwti.ads +++ b/gcc/ada/a-swuwti.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1997-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-sytaco.adb b/gcc/ada/a-sytaco.adb index 49bf2e1229a4..2b2fb2712910 100644 --- a/gcc/ada/a-sytaco.adb +++ b/gcc/ada/a-sytaco.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-sytaco.ads b/gcc/ada/a-sytaco.ads index 71fc67d7eca3..b3a6a480a656 100644 --- a/gcc/ada/a-sytaco.ads +++ b/gcc/ada/a-sytaco.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1998 Free Software Foundation, Inc. -- -- -- -- This specification is derived from the Ada Reference Manual for use with -- diff --git a/gcc/ada/a-tags.adb b/gcc/ada/a-tags.adb index 5ebb2703100c..9da303d73d8c 100644 --- a/gcc/ada/a-tags.adb +++ b/gcc/ada/a-tags.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-tags.ads b/gcc/ada/a-tags.ads index 69186ef46bd5..b4ab29a1ba14 100644 --- a/gcc/ada/a-tags.ads +++ b/gcc/ada/a-tags.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- This specification is derived from the Ada Reference Manual for use with -- diff --git a/gcc/ada/a-tasatt.adb b/gcc/ada/a-tasatt.adb index 101fc84c1562..6d9d114d7f46 100644 --- a/gcc/ada/a-tasatt.adb +++ b/gcc/ada/a-tasatt.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1991-2002 Florida State University -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-tasatt.ads b/gcc/ada/a-tasatt.ads index a946b4ccd101..9cd80711b81a 100644 --- a/gcc/ada/a-tasatt.ads +++ b/gcc/ada/a-tasatt.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1997 Free Software Foundation, Inc. -- -- -- -- This specification is derived from the Ada Reference Manual for use with -- diff --git a/gcc/ada/a-taside.adb b/gcc/ada/a-taside.adb index 7506e66d5037..6bc3b018a124 100644 --- a/gcc/ada/a-taside.adb +++ b/gcc/ada/a-taside.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-taside.ads b/gcc/ada/a-taside.ads index 3045330aab3d..e0c93830155a 100644 --- a/gcc/ada/a-taside.ads +++ b/gcc/ada/a-taside.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2000 Free Software Foundation, Inc. -- -- -- -- This specification is derived from the Ada Reference Manual for use with -- diff --git a/gcc/ada/a-teioed.adb b/gcc/ada/a-teioed.adb index 5f29707a086e..f273a246b677 100644 --- a/gcc/ada/a-teioed.adb +++ b/gcc/ada/a-teioed.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-teioed.ads b/gcc/ada/a-teioed.ads index 59d4a7ed3019..37ad4a0d2ac2 100644 --- a/gcc/ada/a-teioed.ads +++ b/gcc/ada/a-teioed.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1997 Free Software Foundation, Inc. -- -- -- -- This specification is derived from the Ada Reference Manual for use with -- diff --git a/gcc/ada/a-textio.adb b/gcc/ada/a-textio.adb index d20ed44678f9..c133865c339a 100644 --- a/gcc/ada/a-textio.adb +++ b/gcc/ada/a-textio.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-textio.ads b/gcc/ada/a-textio.ads index 8dcc36b8b56e..42c74ee065a5 100644 --- a/gcc/ada/a-textio.ads +++ b/gcc/ada/a-textio.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2000 Free Software Foundation, Inc. -- -- -- -- This specification is derived from the Ada Reference Manual for use with -- diff --git a/gcc/ada/a-ticoau.adb b/gcc/ada/a-ticoau.adb index 6e9073d4b01c..75795da29f0a 100644 --- a/gcc/ada/a-ticoau.adb +++ b/gcc/ada/a-ticoau.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992,1993,1994,1995,1996 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-ticoau.ads b/gcc/ada/a-ticoau.ads index 6888eb9dd7ee..bf7982df2312 100644 --- a/gcc/ada/a-ticoau.ads +++ b/gcc/ada/a-ticoau.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992,1993,1994,1995 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-ticoio.adb b/gcc/ada/a-ticoio.adb index 6f8ab836ef15..0f8b959822a5 100644 --- a/gcc/ada/a-ticoio.adb +++ b/gcc/ada/a-ticoio.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992,1993,1994,1995,1996 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-ticoio.ads b/gcc/ada/a-ticoio.ads index 1f75196e1d9c..ec87284991f3 100644 --- a/gcc/ada/a-ticoio.ads +++ b/gcc/ada/a-ticoio.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1997 Free Software Foundation, Inc. -- -- -- -- This specification is derived from the Ada Reference Manual for use with -- diff --git a/gcc/ada/a-tideau.adb b/gcc/ada/a-tideau.adb index 4c0759d1c34e..56d40508c950 100644 --- a/gcc/ada/a-tideau.adb +++ b/gcc/ada/a-tideau.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-tideau.ads b/gcc/ada/a-tideau.ads index b1f8f79ede3a..d0c79ae7e34b 100644 --- a/gcc/ada/a-tideau.ads +++ b/gcc/ada/a-tideau.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1997 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-tideio.adb b/gcc/ada/a-tideio.adb index 05c228dfde20..71e44a3eef1b 100644 --- a/gcc/ada/a-tideio.adb +++ b/gcc/ada/a-tideio.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-tideio.ads b/gcc/ada/a-tideio.ads index 0e9cbc83f721..44099add8856 100644 --- a/gcc/ada/a-tideio.ads +++ b/gcc/ada/a-tideio.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1997 Free Software Foundation, Inc. -- -- -- -- This specification is derived from the Ada Reference Manual for use with -- diff --git a/gcc/ada/a-tienau.adb b/gcc/ada/a-tienau.adb index 2162b66dcd98..f420f76b21c0 100644 --- a/gcc/ada/a-tienau.adb +++ b/gcc/ada/a-tienau.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-tienau.ads b/gcc/ada/a-tienau.ads index c3188da19b00..2f3f9d678181 100644 --- a/gcc/ada/a-tienau.ads +++ b/gcc/ada/a-tienau.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1997 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-tienio.adb b/gcc/ada/a-tienio.adb index 090b72dce66e..869ca8b47a1b 100644 --- a/gcc/ada/a-tienio.adb +++ b/gcc/ada/a-tienio.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-tienio.ads b/gcc/ada/a-tienio.ads index ce713a644f10..4a926733c4a1 100644 --- a/gcc/ada/a-tienio.ads +++ b/gcc/ada/a-tienio.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2000 Free Software Foundation, Inc. -- -- -- -- This specification is derived from the Ada Reference Manual for use with -- diff --git a/gcc/ada/a-tifiio.adb b/gcc/ada/a-tifiio.adb index ca1c46e28fe3..a1b3badd96b7 100644 --- a/gcc/ada/a-tifiio.adb +++ b/gcc/ada/a-tifiio.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-tifiio.ads b/gcc/ada/a-tifiio.ads index a2a2dcdc3753..283cfa39975c 100644 --- a/gcc/ada/a-tifiio.ads +++ b/gcc/ada/a-tifiio.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1997 Free Software Foundation, Inc. -- -- -- -- This specification is derived from the Ada Reference Manual for use with -- diff --git a/gcc/ada/a-tiflau.adb b/gcc/ada/a-tiflau.adb index 935a51404eab..7953fef4b274 100644 --- a/gcc/ada/a-tiflau.adb +++ b/gcc/ada/a-tiflau.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-tiflau.ads b/gcc/ada/a-tiflau.ads index f0027ab9642f..d40f153a8421 100644 --- a/gcc/ada/a-tiflau.ads +++ b/gcc/ada/a-tiflau.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1997 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-tiflio.adb b/gcc/ada/a-tiflio.adb index 4c92a5c38d73..f528c1f060d4 100644 --- a/gcc/ada/a-tiflio.adb +++ b/gcc/ada/a-tiflio.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-tiflio.ads b/gcc/ada/a-tiflio.ads index 6e98d57f1b33..cef84b4615db 100644 --- a/gcc/ada/a-tiflio.ads +++ b/gcc/ada/a-tiflio.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1997 Free Software Foundation, Inc. -- -- -- -- This specification is derived from the Ada Reference Manual for use with -- diff --git a/gcc/ada/a-tigeau.adb b/gcc/ada/a-tigeau.adb index 82a7e7b9c2d8..527f12a8a844 100644 --- a/gcc/ada/a-tigeau.adb +++ b/gcc/ada/a-tigeau.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-tigeau.ads b/gcc/ada/a-tigeau.ads index f2f07c87345b..2f73ee0735be 100644 --- a/gcc/ada/a-tigeau.ads +++ b/gcc/ada/a-tigeau.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-tiinau.adb b/gcc/ada/a-tiinau.adb index c5ae4b2418ad..c043570f14ea 100644 --- a/gcc/ada/a-tiinau.adb +++ b/gcc/ada/a-tiinau.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-tiinau.ads b/gcc/ada/a-tiinau.ads index c4bd046d9556..fa4d4bc669c2 100644 --- a/gcc/ada/a-tiinau.ads +++ b/gcc/ada/a-tiinau.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1997 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-tiinio.adb b/gcc/ada/a-tiinio.adb index 677db9888334..ef03f1ee2d15 100644 --- a/gcc/ada/a-tiinio.adb +++ b/gcc/ada/a-tiinio.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-tiinio.ads b/gcc/ada/a-tiinio.ads index 645eb15c3e57..7b0258b13880 100644 --- a/gcc/ada/a-tiinio.ads +++ b/gcc/ada/a-tiinio.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1997 Free Software Foundation, Inc. -- -- -- -- This specification is derived from the Ada Reference Manual for use with -- diff --git a/gcc/ada/a-timoau.adb b/gcc/ada/a-timoau.adb index 4de3bf3185d5..98725fd05d3b 100644 --- a/gcc/ada/a-timoau.adb +++ b/gcc/ada/a-timoau.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-timoau.ads b/gcc/ada/a-timoau.ads index 005f47623bf4..ba709e00f5a7 100644 --- a/gcc/ada/a-timoau.ads +++ b/gcc/ada/a-timoau.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-timoio.adb b/gcc/ada/a-timoio.adb index b0b456ab2de6..049d97e3649c 100644 --- a/gcc/ada/a-timoio.adb +++ b/gcc/ada/a-timoio.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992,1993,1994,1995,1996 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-timoio.ads b/gcc/ada/a-timoio.ads index d3cbae32bd9c..30324a03ab17 100644 --- a/gcc/ada/a-timoio.ads +++ b/gcc/ada/a-timoio.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1993-2000 Free Software Foundation, Inc. -- -- -- -- This specification is derived from the Ada Reference Manual for use with -- diff --git a/gcc/ada/a-tiocst.adb b/gcc/ada/a-tiocst.adb index 78d2c10119aa..79bbbeaf0e89 100644 --- a/gcc/ada/a-tiocst.adb +++ b/gcc/ada/a-tiocst.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1998 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-tiocst.ads b/gcc/ada/a-tiocst.ads index 7bad7e50230e..c7dafd68a9ec 100644 --- a/gcc/ada/a-tiocst.ads +++ b/gcc/ada/a-tiocst.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992,1993,1994,1995 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-titest.adb b/gcc/ada/a-titest.adb index afd29303da7e..6e5a8ffb7dae 100644 --- a/gcc/ada/a-titest.adb +++ b/gcc/ada/a-titest.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992,1993,1994,1995,1996 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-titest.ads b/gcc/ada/a-titest.ads index 34afe1620694..69a3114d01e5 100644 --- a/gcc/ada/a-titest.ads +++ b/gcc/ada/a-titest.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- This specification is adapted from the Ada Reference Manual for use with -- -- GNAT. In accordance with the copyright of that document, you can freely -- -- copy and modify this specification, provided that if you redistribute a -- diff --git a/gcc/ada/a-unccon.ads b/gcc/ada/a-unccon.ads index c5e4f38e9687..3306c3bbca9f 100644 --- a/gcc/ada/a-unccon.ads +++ b/gcc/ada/a-unccon.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- This specification is adapted from the Ada Reference Manual for use with -- -- GNAT. In accordance with the copyright of that document, you can freely -- -- copy and modify this specification, provided that if you redistribute a -- diff --git a/gcc/ada/a-uncdea.ads b/gcc/ada/a-uncdea.ads index 460ba68b742d..66b64dd1590f 100644 --- a/gcc/ada/a-uncdea.ads +++ b/gcc/ada/a-uncdea.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- This specification is adapted from the Ada Reference Manual for use with -- -- GNAT. In accordance with the copyright of that document, you can freely -- -- copy and modify this specification, provided that if you redistribute a -- diff --git a/gcc/ada/a-witeio.adb b/gcc/ada/a-witeio.adb index 01701788e47b..4a986301971f 100644 --- a/gcc/ada/a-witeio.adb +++ b/gcc/ada/a-witeio.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-witeio.ads b/gcc/ada/a-witeio.ads index 744083d5434f..dae0cbac71fc 100644 --- a/gcc/ada/a-witeio.ads +++ b/gcc/ada/a-witeio.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2000 Free Software Foundation, Inc. -- -- -- -- This specification is derived from the Ada Reference Manual for use with -- diff --git a/gcc/ada/a-wtcoau.adb b/gcc/ada/a-wtcoau.adb index c93ee8674a39..12d75dc685d8 100644 --- a/gcc/ada/a-wtcoau.adb +++ b/gcc/ada/a-wtcoau.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992,1993,1994,1995,1996 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-wtcoau.ads b/gcc/ada/a-wtcoau.ads index b747bfa3550a..b6fc12152aa6 100644 --- a/gcc/ada/a-wtcoau.ads +++ b/gcc/ada/a-wtcoau.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992,1993,1994,1995,1996 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-wtcoio.adb b/gcc/ada/a-wtcoio.adb index 942adab58b0b..024006445e00 100644 --- a/gcc/ada/a-wtcoio.adb +++ b/gcc/ada/a-wtcoio.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992,1993,1994,1995,1996 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-wtcoio.ads b/gcc/ada/a-wtcoio.ads index 9da51f3207e4..96c0a2a5b00a 100644 --- a/gcc/ada/a-wtcoio.ads +++ b/gcc/ada/a-wtcoio.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- This specification is adapted from the Ada Reference Manual for use with -- -- GNAT. In accordance with the copyright of that document, you can freely -- -- copy and modify this specification, provided that if you redistribute a -- diff --git a/gcc/ada/a-wtcstr.adb b/gcc/ada/a-wtcstr.adb index 827e0b2e248d..ff463104c7df 100644 --- a/gcc/ada/a-wtcstr.adb +++ b/gcc/ada/a-wtcstr.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1998 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-wtcstr.ads b/gcc/ada/a-wtcstr.ads index 9d5873167108..0053eb5c75d5 100644 --- a/gcc/ada/a-wtcstr.ads +++ b/gcc/ada/a-wtcstr.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992,1993,1994,1995,1996 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-wtdeau.adb b/gcc/ada/a-wtdeau.adb index ff5c50c7110f..34bacd8066a4 100644 --- a/gcc/ada/a-wtdeau.adb +++ b/gcc/ada/a-wtdeau.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-wtdeau.ads b/gcc/ada/a-wtdeau.ads index deefdaab82d4..59c9585bf6cb 100644 --- a/gcc/ada/a-wtdeau.ads +++ b/gcc/ada/a-wtdeau.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-wtdeio.adb b/gcc/ada/a-wtdeio.adb index 1359b951855f..e96791022b5c 100644 --- a/gcc/ada/a-wtdeio.adb +++ b/gcc/ada/a-wtdeio.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2000 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-wtdeio.ads b/gcc/ada/a-wtdeio.ads index 393323d27446..e982e1ae339f 100644 --- a/gcc/ada/a-wtdeio.ads +++ b/gcc/ada/a-wtdeio.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1997 Free Software Foundation, Inc. -- -- -- -- This specification is derived from the Ada Reference Manual for use with -- diff --git a/gcc/ada/a-wtedit.adb b/gcc/ada/a-wtedit.adb index b1da5ef3f88c..78ce23603323 100644 --- a/gcc/ada/a-wtedit.adb +++ b/gcc/ada/a-wtedit.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-wtedit.ads b/gcc/ada/a-wtedit.ads index 9b5119c1033c..06e30a75eb0e 100644 --- a/gcc/ada/a-wtedit.ads +++ b/gcc/ada/a-wtedit.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1997 Free Software Foundation, Inc. -- -- -- -- This specification is derived from the Ada Reference Manual for use with -- diff --git a/gcc/ada/a-wtenau.adb b/gcc/ada/a-wtenau.adb index 6b3b7b77835a..4019f4c61564 100644 --- a/gcc/ada/a-wtenau.adb +++ b/gcc/ada/a-wtenau.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2002, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-wtenau.ads b/gcc/ada/a-wtenau.ads index 61293069c0a9..fe86b4ef1ffa 100644 --- a/gcc/ada/a-wtenau.ads +++ b/gcc/ada/a-wtenau.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1997 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-wtenio.adb b/gcc/ada/a-wtenio.adb index bb3ba3f7ac9f..3fe96f1015f6 100644 --- a/gcc/ada/a-wtenio.adb +++ b/gcc/ada/a-wtenio.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2000, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-wtenio.ads b/gcc/ada/a-wtenio.ads index 9713818e94fd..44ac35fc9d58 100644 --- a/gcc/ada/a-wtenio.ads +++ b/gcc/ada/a-wtenio.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2000 Free Software Foundation, Inc. -- -- -- -- This specification is derived from the Ada Reference Manual for use with -- diff --git a/gcc/ada/a-wtfiio.adb b/gcc/ada/a-wtfiio.adb index fb82a9bcb4dd..6621c742d555 100644 --- a/gcc/ada/a-wtfiio.adb +++ b/gcc/ada/a-wtfiio.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2000 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-wtfiio.ads b/gcc/ada/a-wtfiio.ads index 6567d3ea9008..8749f4947737 100644 --- a/gcc/ada/a-wtfiio.ads +++ b/gcc/ada/a-wtfiio.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1997 Free Software Foundation, Inc. -- -- -- -- This specification is derived from the Ada Reference Manual for use with -- diff --git a/gcc/ada/a-wtflau.adb b/gcc/ada/a-wtflau.adb index 41f15f37fa9a..c7c6741d1b90 100644 --- a/gcc/ada/a-wtflau.adb +++ b/gcc/ada/a-wtflau.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-wtflau.ads b/gcc/ada/a-wtflau.ads index 37f1ee3f8ccc..d9923924cf44 100644 --- a/gcc/ada/a-wtflau.ads +++ b/gcc/ada/a-wtflau.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1997 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-wtflio.adb b/gcc/ada/a-wtflio.adb index dda3dc8af0ee..35f1763c2266 100644 --- a/gcc/ada/a-wtflio.adb +++ b/gcc/ada/a-wtflio.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2000 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-wtflio.ads b/gcc/ada/a-wtflio.ads index de7c1855e0da..3ad82b331465 100644 --- a/gcc/ada/a-wtflio.ads +++ b/gcc/ada/a-wtflio.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1997 Free Software Foundation, Inc. -- -- -- -- This specification is derived from the Ada Reference Manual for use with -- diff --git a/gcc/ada/a-wtgeau.adb b/gcc/ada/a-wtgeau.adb index 98788bef55b2..44aebec81365 100644 --- a/gcc/ada/a-wtgeau.adb +++ b/gcc/ada/a-wtgeau.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-wtgeau.ads b/gcc/ada/a-wtgeau.ads index 6e4b319152cf..c72f2f02a152 100644 --- a/gcc/ada/a-wtgeau.ads +++ b/gcc/ada/a-wtgeau.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-wtinau.adb b/gcc/ada/a-wtinau.adb index 54396a5e6e6c..28618c87d657 100644 --- a/gcc/ada/a-wtinau.adb +++ b/gcc/ada/a-wtinau.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-wtinau.ads b/gcc/ada/a-wtinau.ads index 08eda7e8929f..bc7ac5d21aef 100644 --- a/gcc/ada/a-wtinau.ads +++ b/gcc/ada/a-wtinau.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1997 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-wtinio.adb b/gcc/ada/a-wtinio.adb index 8f0fd53ad134..6696f25a66df 100644 --- a/gcc/ada/a-wtinio.adb +++ b/gcc/ada/a-wtinio.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2000 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-wtinio.ads b/gcc/ada/a-wtinio.ads index b8eacefa3221..0045f01fc388 100644 --- a/gcc/ada/a-wtinio.ads +++ b/gcc/ada/a-wtinio.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- This specification is adapted from the Ada Reference Manual for use with -- -- GNAT. In accordance with the copyright of that document, you can freely -- -- copy and modify this specification, provided that if you redistribute a -- diff --git a/gcc/ada/a-wtmoau.adb b/gcc/ada/a-wtmoau.adb index 9324b7fed87a..cdd48051b4ef 100644 --- a/gcc/ada/a-wtmoau.adb +++ b/gcc/ada/a-wtmoau.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-wtmoau.ads b/gcc/ada/a-wtmoau.ads index 48bd1756148f..5083c0b94402 100644 --- a/gcc/ada/a-wtmoau.ads +++ b/gcc/ada/a-wtmoau.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1997 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-wtmoio.adb b/gcc/ada/a-wtmoio.adb index 18402c27a558..5602d0c4bb22 100644 --- a/gcc/ada/a-wtmoio.adb +++ b/gcc/ada/a-wtmoio.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992,1993,1994,1995,1996 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-wtmoio.ads b/gcc/ada/a-wtmoio.ads index b877f3216109..b123223e0da0 100644 --- a/gcc/ada/a-wtmoio.ads +++ b/gcc/ada/a-wtmoio.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1997 Free Software Foundation, Inc. -- -- -- -- This specification is derived from the Ada Reference Manual for use with -- diff --git a/gcc/ada/a-wttest.adb b/gcc/ada/a-wttest.adb index db38b931bd49..af0db6cf13fc 100644 --- a/gcc/ada/a-wttest.adb +++ b/gcc/ada/a-wttest.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992,1993,1994,1995,1996 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/a-wttest.ads b/gcc/ada/a-wttest.ads index 22b6c51831d5..be43e0aac406 100644 --- a/gcc/ada/a-wttest.ads +++ b/gcc/ada/a-wttest.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- This specification is adapted from the Ada Reference Manual for use with -- -- GNAT. In accordance with the copyright of that document, you can freely -- -- copy and modify this specification, provided that if you redistribute a -- diff --git a/gcc/ada/ada-tree.h b/gcc/ada/ada-tree.h index eaebe7b456af..9f1675a2c237 100644 --- a/gcc/ada/ada-tree.h +++ b/gcc/ada/ada-tree.h @@ -6,8 +6,7 @@ * * * C Header File * * * - * * - * Copyright (C) 1992-2001 Free Software Foundation, Inc. * + * Copyright (C) 1992-2003 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- * @@ -234,7 +233,7 @@ struct lang_type GTY(()) /* Nonzero if this decl is a PARM_DECL for an Ada array being passed to a foreign convention subprogram. */ -#define DECL_BY_COMPONENT_PTR_P(NODE) DECL_LANG_FLAG_2 (NODE) +#define DECL_BY_COMPONENT_PTR_P(NODE) DECL_LANG_FLAG_2 (PARM_DECL_CHECK (NODE)) /* Nonzero in a FIELD_DECL that is a dummy built for some internal reason. */ #define DECL_INTERNAL_P(NODE) DECL_LANG_FLAG_3 (FIELD_DECL_CHECK (NODE)) diff --git a/gcc/ada/ada.ads b/gcc/ada/ada.ads index 9cbe8b2de3a8..bbb590506941 100644 --- a/gcc/ada/ada.ads +++ b/gcc/ada/ada.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- This specification is adapted from the Ada Reference Manual for use with -- -- GNAT. In accordance with the copyright of that document, you can freely -- -- copy and modify this specification, provided that if you redistribute a -- diff --git a/gcc/ada/ada.h b/gcc/ada/ada.h index 5c9f18262cf4..58de6075d451 100644 --- a/gcc/ada/ada.h +++ b/gcc/ada/ada.h @@ -6,8 +6,7 @@ * * * C Header File * * * - * * - * Copyright (C) 1992-2002 Free Software Foundation, Inc. * + * Copyright (C) 1992-2003 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- * @@ -75,7 +74,7 @@ SUBTYPE macro defined above. */ #define IN(VALUE,SUBTYPE) \ - (((VALUE) >= (SUBTYPE) CAT (SUBTYPE,__First)) && \ - ((VALUE) <= (SUBTYPE) CAT (SUBTYPE,__Last))) + (((VALUE) >= (SUBTYPE) CAT (SUBTYPE,__First)) \ + && ((VALUE) <= (SUBTYPE) CAT (SUBTYPE,__Last))) #endif diff --git a/gcc/ada/adadecode.c b/gcc/ada/adadecode.c index 4e795138094d..87eb3c3dabc3 100644 --- a/gcc/ada/adadecode.c +++ b/gcc/ada/adadecode.c @@ -4,7 +4,6 @@ * * * G N A T D E C O * * * - * * * C Implementation File * * * * Copyright (C) 2001-2002, Free Software Foundation, Inc. * diff --git a/gcc/ada/adadecode.h b/gcc/ada/adadecode.h index cc631496abd1..9ba49fa8ee6a 100644 --- a/gcc/ada/adadecode.h +++ b/gcc/ada/adadecode.h @@ -4,7 +4,6 @@ * * * G N A T D E C O * * * - * * * C Header File * * * * Copyright (C) 2001-2002, Free Software Foundation, Inc. * diff --git a/gcc/ada/ali-util.adb b/gcc/ada/ali-util.adb index 290ad00a4ba2..e81edd7f6946 100644 --- a/gcc/ada/ali-util.adb +++ b/gcc/ada/ali-util.adb @@ -6,8 +6,7 @@ -- -- -- B o d y -- -- -- --- -- --- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- +-- Copyright (C) 1992-2003 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- -- diff --git a/gcc/ada/ali-util.ads b/gcc/ada/ali-util.ads index e786a0f31bd2..1684e5184882 100644 --- a/gcc/ada/ali-util.ads +++ b/gcc/ada/ali-util.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/ali.adb b/gcc/ada/ali.adb index 66f4676e0514..919bc87a144f 100644 --- a/gcc/ada/ali.adb +++ b/gcc/ada/ali.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/ali.ads b/gcc/ada/ali.ads index 04d13c4f9dc8..1de7b4582e87 100644 --- a/gcc/ada/ali.ads +++ b/gcc/ada/ali.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/alloc.ads b/gcc/ada/alloc.ads index d7917cfcfda3..15729d6d520f 100644 --- a/gcc/ada/alloc.ads +++ b/gcc/ada/alloc.ads @@ -6,8 +6,7 @@ -- -- -- S p e c -- -- -- --- -- --- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- +-- Copyright (C) 1992-2003 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- -- diff --git a/gcc/ada/argv.c b/gcc/ada/argv.c index c9c2216e5583..d0ba12d9ee57 100644 --- a/gcc/ada/argv.c +++ b/gcc/ada/argv.c @@ -6,8 +6,7 @@ * * * C Implementation 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- * @@ -62,6 +61,15 @@ int gnat_argc = 0; const char **gnat_argv = (const char **) 0; const char **gnat_envp = (const char **) 0; +#ifdef _WIN32 +/* Note that on Windows environment the environ point to a buffer that could + be reallocated if needed. It means that gnat_envp needs to be updated + before using gnat_envp to point to the right environment space */ +#include +/* for the environ variable definition */ +#define gnat_envp (environ) +#endif + int __gnat_arg_count () { diff --git a/gcc/ada/atree.adb b/gcc/ada/atree.adb index a07f365c7018..8cabfd136db0 100644 --- a/gcc/ada/atree.adb +++ b/gcc/ada/atree.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/atree.ads b/gcc/ada/atree.ads index e7e23587c137..b9d2b9b26f14 100644 --- a/gcc/ada/atree.ads +++ b/gcc/ada/atree.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2001, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/atree.h b/gcc/ada/atree.h index c707988a0da1..c13ffbd51734 100644 --- a/gcc/ada/atree.h +++ b/gcc/ada/atree.h @@ -6,7 +6,6 @@ * * * C Header File * * * - * * * Copyright (C) 1992-2001, Free Software Foundation, Inc. * * * * GNAT is free software; you can redistribute it and/or modify it under * diff --git a/gcc/ada/aux-io.c b/gcc/ada/aux-io.c index 89f06ace5ca4..8185f2e033ba 100644 --- a/gcc/ada/aux-io.c +++ b/gcc/ada/aux-io.c @@ -6,7 +6,6 @@ * * * C Implementation File * * * - * * * Copyright (C) 1992-2001 Free Software Foundation, Inc. * * * * GNAT is free software; you can redistribute it and/or modify it under * diff --git a/gcc/ada/back_end.adb b/gcc/ada/back_end.adb index 6c63a793596f..5725f9eca212 100644 --- a/gcc/ada/back_end.adb +++ b/gcc/ada/back_end.adb @@ -6,8 +6,7 @@ -- -- -- B o d y -- -- -- --- -- --- 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- -- @@ -241,9 +240,9 @@ package body Back_End is while Next_Arg < save_argc loop Look_At_Arg : declare - Argv_Ptr : constant BSP := save_argv (Next_Arg); - Argv_Len : constant Nat := Len_Arg (Next_Arg); - Argv : String := Argv_Ptr (1 .. Natural (Argv_Len)); + Argv_Ptr : constant BSP := save_argv (Next_Arg); + Argv_Len : constant Nat := Len_Arg (Next_Arg); + Argv : constant String := Argv_Ptr (1 .. Natural (Argv_Len)); begin -- If the previous switch has set the Output_File_Name_Present diff --git a/gcc/ada/back_end.ads b/gcc/ada/back_end.ads index 0b9822a2dafc..fd8c30c4ed8f 100644 --- a/gcc/ada/back_end.ads +++ b/gcc/ada/back_end.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/bcheck.adb b/gcc/ada/bcheck.adb index 50942ed890cf..85cabaeaf0cf 100644 --- a/gcc/ada/bcheck.adb +++ b/gcc/ada/bcheck.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/bcheck.ads b/gcc/ada/bcheck.ads index bcc0c67fb435..d670d341cdb8 100644 --- a/gcc/ada/bcheck.ads +++ b/gcc/ada/bcheck.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/binde.adb b/gcc/ada/binde.adb index bdfaaf54af36..9f6e2082f9ed 100644 --- a/gcc/ada/binde.adb +++ b/gcc/ada/binde.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/binde.ads b/gcc/ada/binde.ads index 1e5b81b3ed66..74fc12282b61 100644 --- a/gcc/ada/binde.ads +++ b/gcc/ada/binde.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1997 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/binderr.adb b/gcc/ada/binderr.adb index ffa8b3cec799..a0b12a84085b 100644 --- a/gcc/ada/binderr.adb +++ b/gcc/ada/binderr.adb @@ -6,8 +6,7 @@ -- -- -- B o d y -- -- -- --- -- --- Copyright (C) 1992-2000 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- -- @@ -97,6 +96,7 @@ package body Binderr is procedure Error_Msg_Output (Msg : String; Info : Boolean) is Use_Second_Name : Boolean := False; + Use_Second_Nat : Boolean := False; begin if Warnings_Detected + Errors_Detected > Maximum_Errors then @@ -115,8 +115,8 @@ package body Binderr is Write_Str ("error: "); end if; - for I in Msg'Range loop - if Msg (I) = '%' then + for J in Msg'Range loop + if Msg (J) = '%' then if Use_Second_Name then Get_Name_String (Error_Msg_Name_2); @@ -129,7 +129,7 @@ package body Binderr is Write_Str (Name_Buffer (1 .. Name_Len)); Write_Char ('"'); - elsif Msg (I) = '&' then + elsif Msg (J) = '&' then Write_Char ('"'); if Use_Second_Name then @@ -141,8 +141,16 @@ package body Binderr is Write_Char ('"'); - elsif Msg (I) /= '?' then - Write_Char (Msg (I)); + elsif Msg (J) = '#' then + if Use_Second_Nat then + Write_Int (Error_Msg_Nat_2); + else + Use_Second_Nat := True; + Write_Int (Error_Msg_Nat_1); + end if; + + elsif Msg (J) /= '?' then + Write_Char (Msg (J)); end if; end loop; diff --git a/gcc/ada/binderr.ads b/gcc/ada/binderr.ads index 840862eacf26..6e49ac055462 100644 --- a/gcc/ada/binderr.ads +++ b/gcc/ada/binderr.ads @@ -6,8 +6,7 @@ -- -- -- S p e c -- -- -- --- -- --- Copyright (C) 1992-2000 Free Software Foundation, Inc. -- +-- Copyright (C) 1992-2003 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- -- @@ -66,6 +65,12 @@ package Binderr is -- which case it is similarly replaced by the name which is specified -- by the Name_Id value stored in Error_Msg_Name_2. + -- Insertion character # (Pound: insert non-negative number in decimal) + -- The character # is replaced by the contents of Error_Msg_Nat_1 + -- converted into an unsigned decimal string. A second # may appear + -- in a single message, in which case it is similarly replaced by + -- the value stored in Error_Msg_Nat_2. + -- Insertion character ? (Question mark: warning message) -- The character ?, which must be the first character in the message -- string, signals a warning message instead of an error message. @@ -84,6 +89,10 @@ package Binderr is Error_Msg_Name_2 : Name_Id; -- Name_Id values for % insertion characters in message + Error_Msg_Nat_1 : Nat; + Error_Msg_Nat_2 : Nat; + -- Integer values for # insertion characters in message + ------------------------------ -- Error Output Subprograms -- ------------------------------ diff --git a/gcc/ada/bindgen.adb b/gcc/ada/bindgen.adb index ace6c2fbcaa1..c6b888c745cc 100644 --- a/gcc/ada/bindgen.adb +++ b/gcc/ada/bindgen.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/bindgen.ads b/gcc/ada/bindgen.ads index 7aae981cf20a..846f98620d9a 100644 --- a/gcc/ada/bindgen.ads +++ b/gcc/ada/bindgen.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992,1993,1994,1995,1996 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/bindusg.adb b/gcc/ada/bindusg.adb index 95e0e9c91d12..163f92ed1cbd 100644 --- a/gcc/ada/bindusg.adb +++ b/gcc/ada/bindusg.adb @@ -6,8 +6,7 @@ -- -- -- B o d y -- -- -- --- -- --- 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- -- @@ -195,7 +194,7 @@ begin -- Line for -T switch - Write_Str (" -Tn Set time slice value to n microseconds (n >= 0)"); + Write_Str (" -Tn Set time slice value to n milliseconds (n >= 0)"); Write_Eol; -- Line for -v switch diff --git a/gcc/ada/bindusg.ads b/gcc/ada/bindusg.ads index 9a4af308f6b4..20d1103e2ec8 100644 --- a/gcc/ada/bindusg.ads +++ b/gcc/ada/bindusg.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992,1993,1994 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/butil.adb b/gcc/ada/butil.adb index 110b50df5044..3ef72e41b11d 100644 --- a/gcc/ada/butil.adb +++ b/gcc/ada/butil.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/butil.ads b/gcc/ada/butil.ads index 1fc730a2f44f..79d5ebd94aa5 100644 --- a/gcc/ada/butil.ads +++ b/gcc/ada/butil.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/cal.c b/gcc/ada/cal.c index 72e4f080a421..31d39834afc4 100644 --- a/gcc/ada/cal.c +++ b/gcc/ada/cal.c @@ -6,8 +6,7 @@ * * * C Implementation 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- * @@ -59,6 +58,13 @@ __gnat_duration_to_timeval (long sec, long usec, void *t) #include #endif +#ifdef __MINGW32__ +#include "mingw32.h" +#if STD_MINGW +#include +#endif +#endif + void __gnat_timeval_to_duration (struct timeval *t, long *sec, long *usec) { diff --git a/gcc/ada/calendar.ads b/gcc/ada/calendar.ads index b4829d595970..85618aa2a646 100644 --- a/gcc/ada/calendar.ads +++ b/gcc/ada/calendar.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- This specification is adapted from the Ada Reference Manual for use with -- -- GNAT. In accordance with the copyright of that document, you can freely -- -- copy and modify this specification, provided that if you redistribute a -- diff --git a/gcc/ada/casing.adb b/gcc/ada/casing.adb index 589cc52b1568..e2f9a485e5f5 100644 --- a/gcc/ada/casing.adb +++ b/gcc/ada/casing.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/casing.ads b/gcc/ada/casing.ads index 281dc2e6894d..55f88077c88b 100644 --- a/gcc/ada/casing.ads +++ b/gcc/ada/casing.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2000 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/ceinfo.adb b/gcc/ada/ceinfo.adb index d95d669e9a4a..6cd68db939c8 100644 --- a/gcc/ada/ceinfo.adb +++ b/gcc/ada/ceinfo.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1998 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/checks.adb b/gcc/ada/checks.adb index 05b94c861a13..597c439a6a4f 100644 --- a/gcc/ada/checks.adb +++ b/gcc/ada/checks.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/checks.ads b/gcc/ada/checks.ads index b6304a3940f3..8ccafdea7c00 100644 --- a/gcc/ada/checks.ads +++ b/gcc/ada/checks.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/cio.c b/gcc/ada/cio.c index 86c6b44bda49..50452bc1eff9 100644 --- a/gcc/ada/cio.c +++ b/gcc/ada/cio.c @@ -6,8 +6,7 @@ * * * C Implementation File * * * - * * - * Copyright (C) 1992-2001 Free Software Foundation, Inc. * + * Copyright (C) 1992-2003 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,40 +41,6 @@ #include "adaint.h" -#ifdef __RT__ - -/* Linux kernel modules don't have inputs, so don't define get_int. - Simple output can be done via printk. */ - -void -put_char (c) - int c; -{ - printk ("%c", c); -} - -void -put_char_stderr (c) - int c; -{ - put_char (c); -} - -void -put_int (x) - int x; -{ - printk ("%d", x); -} - -void -put_int_stderr (int x) -{ - put_int (x); -} - -#else - /* Don't use macros on GNU/Linux since they cause incompatible changes between glibc 2.0 and 2.1 */ #ifdef linux @@ -131,7 +96,6 @@ put_char_stderr (c) { fputc (c, stderr); } -#endif #ifdef __vxworks diff --git a/gcc/ada/comperr.adb b/gcc/ada/comperr.adb index 71368e68fa72..284ed47d9c95 100644 --- a/gcc/ada/comperr.adb +++ b/gcc/ada/comperr.adb @@ -6,8 +6,7 @@ -- -- -- B o d y -- -- -- --- -- --- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- +-- Copyright (C) 1992-2003 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- -- @@ -110,7 +109,7 @@ package body Comperr is -- Debug flag K disables this behavior (useful for debugging) - if Total_Errors_Detected /= 0 and then not Debug_Flag_K then + if Serious_Errors_Detected /= 0 and then not Debug_Flag_K then Errout.Finalize; Set_Standard_Error; @@ -278,7 +277,7 @@ package body Comperr is End_Line; Write_Str - ("| concatenated together with no headers between files."); + ("| (concatenated together with no headers between files)."); End_Line; end if; @@ -300,6 +299,9 @@ package body Comperr is Write_Eol; Write_Line ("Please include these source files with error report"); + Write_Line ("Note that list may not be accurate in some cases, "); + Write_Line ("so please double check that the problem can still "); + Write_Line ("be reproduced with the set of files listed."); Write_Eol; for U in Main_Unit .. Last_Unit loop diff --git a/gcc/ada/comperr.ads b/gcc/ada/comperr.ads index e235f01ff622..ea4703ac42e9 100644 --- a/gcc/ada/comperr.ads +++ b/gcc/ada/comperr.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/config-lang.in b/gcc/ada/config-lang.in index 8c5a883a73ab..3875992c6d15 100644 --- a/gcc/ada/config-lang.in +++ b/gcc/ada/config-lang.in @@ -1,5 +1,5 @@ # Top level configure fragment for GNU Ada (GNAT). -# Copyright (C) 1994-2001 Free Software Foundation, Inc. +# Copyright (C) 1994-2003 Free Software Foundation, Inc. #This file is part of GCC. diff --git a/gcc/ada/csets.adb b/gcc/ada/csets.adb index 02166dbccf29..4bd2ef733d43 100644 --- a/gcc/ada/csets.adb +++ b/gcc/ada/csets.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2002, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/csets.ads b/gcc/ada/csets.ads index b91ad3611273..cccf32426d69 100644 --- a/gcc/ada/csets.ads +++ b/gcc/ada/csets.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/csinfo.adb b/gcc/ada/csinfo.adb index 176cb4ac6f8d..e13676c3b6ce 100644 --- a/gcc/ada/csinfo.adb +++ b/gcc/ada/csinfo.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/cstand.adb b/gcc/ada/cstand.adb index ceb5433bcf36..a3a5a327c8cb 100644 --- a/gcc/ada/cstand.adb +++ b/gcc/ada/cstand.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/cstand.ads b/gcc/ada/cstand.ads index 4b7900932fd4..1fe2e40f091d 100644 --- a/gcc/ada/cstand.ads +++ b/gcc/ada/cstand.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2000 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/cuintp.c b/gcc/ada/cuintp.c index d5eeb2d2ce18..80ed5b588bf3 100644 --- a/gcc/ada/cuintp.c +++ b/gcc/ada/cuintp.c @@ -6,8 +6,7 @@ * * * C Implementation File * * * - * * - * Copyright (C) 1992-2001 Free Software Foundation, Inc. * + * Copyright (C) 1992-2003 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- * diff --git a/gcc/ada/debug.adb b/gcc/ada/debug.adb index d883e2d0251e..e2040d2e4f1e 100644 --- a/gcc/ada/debug.adb +++ b/gcc/ada/debug.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/debug.ads b/gcc/ada/debug.ads index 85623408f08d..feb5d5a19d02 100644 --- a/gcc/ada/debug.ads +++ b/gcc/ada/debug.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/debug_a.adb b/gcc/ada/debug_a.adb index 7de1534fa072..c066314b04d8 100644 --- a/gcc/ada/debug_a.adb +++ b/gcc/ada/debug_a.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1998 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/debug_a.ads b/gcc/ada/debug_a.ads index 09b1e77f8f74..c0fa7e51ce6c 100644 --- a/gcc/ada/debug_a.ads +++ b/gcc/ada/debug_a.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1998 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/dec-io.adb b/gcc/ada/dec-io.adb index 283c40bfecce..5a06dd4123eb 100644 --- a/gcc/ada/dec-io.adb +++ b/gcc/ada/dec-io.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/dec-io.ads b/gcc/ada/dec-io.ads index efed4235035c..c65d7632cff7 100644 --- a/gcc/ada/dec-io.ads +++ b/gcc/ada/dec-io.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1996-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/dec.ads b/gcc/ada/dec.ads index 221a33cf5fa9..18bf57df715f 100644 --- a/gcc/ada/dec.ads +++ b/gcc/ada/dec.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1996-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/deftarg.c b/gcc/ada/deftarg.c index d69ce2271881..2e144ec48fa1 100644 --- a/gcc/ada/deftarg.c +++ b/gcc/ada/deftarg.c @@ -6,8 +6,7 @@ * * * Body * * * - * * - * Copyright (C) 1992-2001 Free Software Foundation, Inc. * + * Copyright (C) 1992-2003 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- * diff --git a/gcc/ada/directio.ads b/gcc/ada/directio.ads index e0db56893123..a1e2080a8092 100644 --- a/gcc/ada/directio.ads +++ b/gcc/ada/directio.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- This specification is adapted from the Ada Reference Manual for use with -- -- GNAT. In accordance with the copyright of that document, you can freely -- -- copy and modify this specification, provided that if you redistribute a -- diff --git a/gcc/ada/einfo.adb b/gcc/ada/einfo.adb index ac0369b0ff91..11a14fbc1ad8 100644 --- a/gcc/ada/einfo.adb +++ b/gcc/ada/einfo.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/einfo.ads b/gcc/ada/einfo.ads index ea34b12465f6..fce8aee1fc76 100644 --- a/gcc/ada/einfo.ads +++ b/gcc/ada/einfo.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/elists.adb b/gcc/ada/elists.adb index e3a6098ee5f6..6d1b8ca4b291 100644 --- a/gcc/ada/elists.adb +++ b/gcc/ada/elists.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/elists.ads b/gcc/ada/elists.ads index 67c53c856976..7715c0a23424 100644 --- a/gcc/ada/elists.ads +++ b/gcc/ada/elists.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1998 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/elists.h b/gcc/ada/elists.h index dcfae8c80e5c..0a1ad06b1ee4 100644 --- a/gcc/ada/elists.h +++ b/gcc/ada/elists.h @@ -6,7 +6,6 @@ * * * C Header File * * * - * * * Copyright (C) 1992-2001 Free Software Foundation, Inc. * * * * GNAT is free software; you can redistribute it and/or modify it under * diff --git a/gcc/ada/errno.c b/gcc/ada/errno.c index 90687c4f7b58..c1b8ec9485a3 100644 --- a/gcc/ada/errno.c +++ b/gcc/ada/errno.c @@ -6,7 +6,6 @@ * * * C Implementation File * * * - * * * Copyright (C) 1992-2001 Free Software Foundation, Inc. * * * * GNAT is free software; you can redistribute it and/or modify it under * diff --git a/gcc/ada/errout.adb b/gcc/ada/errout.adb index 6aa3f22b8e5a..7935a63473ff 100644 --- a/gcc/ada/errout.adb +++ b/gcc/ada/errout.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/errout.ads b/gcc/ada/errout.ads index bd9f398a5bb6..442204819f4b 100644 --- a/gcc/ada/errout.ads +++ b/gcc/ada/errout.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/eval_fat.adb b/gcc/ada/eval_fat.adb index 1547251d5b2d..fbda4a6611c3 100644 --- a/gcc/ada/eval_fat.adb +++ b/gcc/ada/eval_fat.adb @@ -6,8 +6,7 @@ -- -- -- B o d y -- -- -- --- -- --- 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- -- @@ -73,6 +72,7 @@ package body Eval_Fat is -- using biased rounding (halfway cases round away from zero), round to -- even, a floor operation or a ceiling operation depending on the setting -- of Mode (see corresponding descriptions in Urealp). + -- -- In case rounding was specified, Rounding_Was_Biased is set True -- if the input was indeed halfway between to machine numbers and -- got rounded away from zero to an odd number. @@ -444,7 +444,6 @@ package body Eval_Fat is Release_And_Save (Uintp_Mark, Fraction, Exponent); end Calculate_Fraction_And_Exponent; - end Decompose_Int; ---------------- @@ -619,7 +618,6 @@ package body Eval_Fat is Z := Scaling (RT, Y, L); return Z; end if; - end Leading_Part; ------------- @@ -712,7 +710,9 @@ package body Eval_Fat is return X - Eps_Denorm (RT); elsif X > Ureal_0 then + -- Target does not support denorms, so predecessor is 0.0 + return Ureal_0; else @@ -806,7 +806,6 @@ package body Eval_Fat is end if; return Sign_X * IEEE_Rem; - end Remainder; -------------- @@ -830,7 +829,6 @@ package body Eval_Fat is else return Result; end if; - end Rounding; ------------- @@ -933,7 +931,6 @@ package body Eval_Fat is else return X; end if; - end Unbiased_Rounding; end Eval_Fat; diff --git a/gcc/ada/eval_fat.ads b/gcc/ada/eval_fat.ads index e72a122b7479..30a9fe35dfa3 100644 --- a/gcc/ada/eval_fat.ads +++ b/gcc/ada/eval_fat.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/exit.c b/gcc/ada/exit.c index 906e6904703e..dbb54a1a9192 100644 --- a/gcc/ada/exit.c +++ b/gcc/ada/exit.c @@ -6,7 +6,6 @@ * * * C Implementation File * * * - * * * Copyright (C) 1992-2001 Free Software Foundation, Inc. * * * * GNAT is free software; you can redistribute it and/or modify it under * diff --git a/gcc/ada/exp_aggr.adb b/gcc/ada/exp_aggr.adb index a83b3b20fa81..b63cc53c993e 100644 --- a/gcc/ada/exp_aggr.adb +++ b/gcc/ada/exp_aggr.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/exp_aggr.ads b/gcc/ada/exp_aggr.ads index d6acdf284a4b..0af8c9d69073 100644 --- a/gcc/ada/exp_aggr.ads +++ b/gcc/ada/exp_aggr.ads @@ -6,8 +6,7 @@ -- -- -- S p e c -- -- -- --- -- --- Copyright (C) 1992-2000 Free Software Foundation, Inc. -- +-- Copyright (C) 1992-2003 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- -- @@ -52,5 +51,4 @@ package Exp_Aggr is -- of an allocator. This procedure perform in-place aggregate -- assignent in the newly allocated object. - end Exp_Aggr; diff --git a/gcc/ada/exp_attr.adb b/gcc/ada/exp_attr.adb index 46cad4770942..bf65d8837208 100644 --- a/gcc/ada/exp_attr.adb +++ b/gcc/ada/exp_attr.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/exp_attr.ads b/gcc/ada/exp_attr.ads index 5d3b7c64e41a..b0c66e45cefb 100644 --- a/gcc/ada/exp_attr.ads +++ b/gcc/ada/exp_attr.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992,1993,1994 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/exp_ch10.ads b/gcc/ada/exp_ch10.ads index 9d92c4123285..8b9ecc15f74f 100644 --- a/gcc/ada/exp_ch10.ads +++ b/gcc/ada/exp_ch10.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992,1993,1994 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/exp_ch11.adb b/gcc/ada/exp_ch11.adb index 039d6c54f2ba..d99d07ef284b 100644 --- a/gcc/ada/exp_ch11.adb +++ b/gcc/ada/exp_ch11.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/exp_ch11.ads b/gcc/ada/exp_ch11.ads index 357972a313ef..080d91532af1 100644 --- a/gcc/ada/exp_ch11.ads +++ b/gcc/ada/exp_ch11.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2000 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/exp_ch12.adb b/gcc/ada/exp_ch12.adb index 49b157e0a6c3..c6af2eb3acac 100644 --- a/gcc/ada/exp_ch12.adb +++ b/gcc/ada/exp_ch12.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1997-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/exp_ch12.ads b/gcc/ada/exp_ch12.ads index b8b99ce8cabf..85b151521b90 100644 --- a/gcc/ada/exp_ch12.ads +++ b/gcc/ada/exp_ch12.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1997 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/exp_ch13.adb b/gcc/ada/exp_ch13.adb index 513e30314057..908ebd64e624 100644 --- a/gcc/ada/exp_ch13.adb +++ b/gcc/ada/exp_ch13.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2002, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/exp_ch13.ads b/gcc/ada/exp_ch13.ads index 3229fc6b7011..23374381d2d2 100644 --- a/gcc/ada/exp_ch13.ads +++ b/gcc/ada/exp_ch13.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992,1993,1994 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/exp_ch2.adb b/gcc/ada/exp_ch2.adb index a2bfaf760580..669ced7f0314 100644 --- a/gcc/ada/exp_ch2.adb +++ b/gcc/ada/exp_ch2.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/exp_ch2.ads b/gcc/ada/exp_ch2.ads index 5d9ece947385..e7d838bd9aff 100644 --- a/gcc/ada/exp_ch2.ads +++ b/gcc/ada/exp_ch2.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1997 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/exp_ch3.adb b/gcc/ada/exp_ch3.adb index 3676b71c03b6..8037eb56bfc9 100644 --- a/gcc/ada/exp_ch3.adb +++ b/gcc/ada/exp_ch3.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/exp_ch3.ads b/gcc/ada/exp_ch3.ads index c5cf0a957907..2c15e1e9552e 100644 --- a/gcc/ada/exp_ch3.ads +++ b/gcc/ada/exp_ch3.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/exp_ch4.adb b/gcc/ada/exp_ch4.adb index 29098ee78bb2..ba8c00219b2a 100644 --- a/gcc/ada/exp_ch4.adb +++ b/gcc/ada/exp_ch4.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2002, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/exp_ch4.ads b/gcc/ada/exp_ch4.ads index 5ea67eecf00e..021f5049cbba 100644 --- a/gcc/ada/exp_ch4.ads +++ b/gcc/ada/exp_ch4.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/exp_ch5.adb b/gcc/ada/exp_ch5.adb index ad6351ff7716..b0b71b4507b6 100644 --- a/gcc/ada/exp_ch5.adb +++ b/gcc/ada/exp_ch5.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2002, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/exp_ch5.ads b/gcc/ada/exp_ch5.ads index 6660f0a4a670..8237f1f803a1 100644 --- a/gcc/ada/exp_ch5.ads +++ b/gcc/ada/exp_ch5.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1999, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/exp_ch6.adb b/gcc/ada/exp_ch6.adb index 168992d768ef..f4a33e06bca6 100644 --- a/gcc/ada/exp_ch6.adb +++ b/gcc/ada/exp_ch6.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2002, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/exp_ch6.ads b/gcc/ada/exp_ch6.ads index 5f7c2d227eae..2d20d95194fa 100644 --- a/gcc/ada/exp_ch6.ads +++ b/gcc/ada/exp_ch6.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992,1993,1994,1995 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/exp_ch7.adb b/gcc/ada/exp_ch7.adb index 70c3f5f49314..a05d36f5a561 100644 --- a/gcc/ada/exp_ch7.adb +++ b/gcc/ada/exp_ch7.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2002, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/exp_ch7.ads b/gcc/ada/exp_ch7.ads index 4c227505b0c6..d2b486e55805 100644 --- a/gcc/ada/exp_ch7.ads +++ b/gcc/ada/exp_ch7.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/exp_ch8.adb b/gcc/ada/exp_ch8.adb index 575feffdfbd7..8f26a4a3f7f5 100644 --- a/gcc/ada/exp_ch8.adb +++ b/gcc/ada/exp_ch8.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/exp_ch8.ads b/gcc/ada/exp_ch8.ads index acdc0f6981db..b118ab371ba0 100644 --- a/gcc/ada/exp_ch8.ads +++ b/gcc/ada/exp_ch8.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2000 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/exp_ch9.adb b/gcc/ada/exp_ch9.adb index a456107c57e6..7fadd373690b 100644 --- a/gcc/ada/exp_ch9.adb +++ b/gcc/ada/exp_ch9.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2002, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/exp_ch9.ads b/gcc/ada/exp_ch9.ads index 91a9e69d5489..76a888ed6d73 100644 --- a/gcc/ada/exp_ch9.ads +++ b/gcc/ada/exp_ch9.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/exp_code.adb b/gcc/ada/exp_code.adb index f84cb4bf99dc..421fa5d05c10 100644 --- a/gcc/ada/exp_code.adb +++ b/gcc/ada/exp_code.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1996-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- @@ -270,7 +269,7 @@ package body Exp_Code is -- know the type is right, it is sufficient to see if the -- referenced entity is in a runtime routine. - if Nkind (N) = N_Identifier + if Is_Entity_Name (N) and then Is_Predefined_File_Name (Unit_File_Name (Get_Source_Unit (Entity (N)))) diff --git a/gcc/ada/exp_code.ads b/gcc/ada/exp_code.ads index 184fdc5b6d81..cddaf532bf1e 100644 --- a/gcc/ada/exp_code.ads +++ b/gcc/ada/exp_code.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1996 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/exp_dbug.adb b/gcc/ada/exp_dbug.adb index 489b6396f535..251ee5fb4646 100644 --- a/gcc/ada/exp_dbug.adb +++ b/gcc/ada/exp_dbug.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1996-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/exp_dbug.ads b/gcc/ada/exp_dbug.ads index 3e84023090d9..951ccc33a307 100644 --- a/gcc/ada/exp_dbug.ads +++ b/gcc/ada/exp_dbug.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1996-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/exp_disp.adb b/gcc/ada/exp_disp.adb index 41b75b497f8a..d1d161e92e06 100644 --- a/gcc/ada/exp_disp.adb +++ b/gcc/ada/exp_disp.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/exp_disp.ads b/gcc/ada/exp_disp.ads index 1f9c73b358cd..aedda2d7d014 100644 --- a/gcc/ada/exp_disp.ads +++ b/gcc/ada/exp_disp.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/exp_dist.adb b/gcc/ada/exp_dist.adb index 66c413fe0431..4dff14e076e6 100644 --- a/gcc/ada/exp_dist.adb +++ b/gcc/ada/exp_dist.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/exp_dist.ads b/gcc/ada/exp_dist.ads index 4015a927e92f..648803c70b86 100644 --- a/gcc/ada/exp_dist.ads +++ b/gcc/ada/exp_dist.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1998 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/exp_fixd.adb b/gcc/ada/exp_fixd.adb index 862180aec3bb..79f43b102a69 100644 --- a/gcc/ada/exp_fixd.adb +++ b/gcc/ada/exp_fixd.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/exp_fixd.ads b/gcc/ada/exp_fixd.ads index a5ac55cf543b..7b8eaded2d01 100644 --- a/gcc/ada/exp_fixd.ads +++ b/gcc/ada/exp_fixd.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992,1993,1994 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/exp_imgv.adb b/gcc/ada/exp_imgv.adb index 064c40e5e685..0e75acfab95a 100644 --- a/gcc/ada/exp_imgv.adb +++ b/gcc/ada/exp_imgv.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/exp_imgv.ads b/gcc/ada/exp_imgv.ads index 17ee723a1d3f..7df2692a76ff 100644 --- a/gcc/ada/exp_imgv.ads +++ b/gcc/ada/exp_imgv.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 2000 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/exp_intr.adb b/gcc/ada/exp_intr.adb index 44f8193d9a43..1070138347d6 100644 --- a/gcc/ada/exp_intr.adb +++ b/gcc/ada/exp_intr.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/exp_intr.ads b/gcc/ada/exp_intr.ads index e48211cf351d..2343205b7c43 100644 --- a/gcc/ada/exp_intr.ads +++ b/gcc/ada/exp_intr.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992,1993,1994 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/exp_pakd.adb b/gcc/ada/exp_pakd.adb index 8794ef253f68..e8c607adda5f 100644 --- a/gcc/ada/exp_pakd.adb +++ b/gcc/ada/exp_pakd.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/exp_pakd.ads b/gcc/ada/exp_pakd.ads index fc7dfedfd993..9c3044bddff8 100644 --- a/gcc/ada/exp_pakd.ads +++ b/gcc/ada/exp_pakd.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/exp_prag.adb b/gcc/ada/exp_prag.adb index b02b0dd8062b..7ef21dce758c 100644 --- a/gcc/ada/exp_prag.adb +++ b/gcc/ada/exp_prag.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/exp_prag.ads b/gcc/ada/exp_prag.ads index 00f98ed8c890..613e411853f9 100644 --- a/gcc/ada/exp_prag.ads +++ b/gcc/ada/exp_prag.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992,1993,1994 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/exp_smem.adb b/gcc/ada/exp_smem.adb index be5d52170ef2..65ed01e4a57e 100644 --- a/gcc/ada/exp_smem.adb +++ b/gcc/ada/exp_smem.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1998-2000 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/exp_smem.ads b/gcc/ada/exp_smem.ads index 76f069f22282..f12b800a9730 100644 --- a/gcc/ada/exp_smem.ads +++ b/gcc/ada/exp_smem.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1998-2000, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/exp_strm.adb b/gcc/ada/exp_strm.adb index 006b107749e3..6cc2e7f23ec7 100644 --- a/gcc/ada/exp_strm.adb +++ b/gcc/ada/exp_strm.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2002, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/exp_strm.ads b/gcc/ada/exp_strm.ads index 0ed39b7bd836..1e089ca881da 100644 --- a/gcc/ada/exp_strm.ads +++ b/gcc/ada/exp_strm.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/exp_tss.adb b/gcc/ada/exp_tss.adb index 16b126469e35..e714a082c1e6 100644 --- a/gcc/ada/exp_tss.adb +++ b/gcc/ada/exp_tss.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/exp_tss.ads b/gcc/ada/exp_tss.ads index ccc7ae7bd56d..2901dbb6b952 100644 --- a/gcc/ada/exp_tss.ads +++ b/gcc/ada/exp_tss.ads @@ -6,8 +6,7 @@ -- -- -- S p e c -- -- -- --- -- --- 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- -- @@ -86,7 +85,7 @@ package Exp_Tss is -- objects are always initialized using the initialization procedure for -- the corresponding base type (see Base_Init_Proc function). A special -- case arises for concurrent types. Such types do not themselves have an - -- _init TSR, but initialization is required. The initialization procedure + -- _init TSS, but initialization is required. The initialization procedure -- used is the one fot the corresponding record type (see Base_Init_Proc). function Base_Init_Proc (Typ : Entity_Id) return Entity_Id; diff --git a/gcc/ada/exp_util.adb b/gcc/ada/exp_util.adb index e1ed9be3075f..1da64c40e399 100644 --- a/gcc/ada/exp_util.adb +++ b/gcc/ada/exp_util.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2002, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/exp_util.ads b/gcc/ada/exp_util.ads index 15d35994adf3..bc3e6f75f88d 100644 --- a/gcc/ada/exp_util.ads +++ b/gcc/ada/exp_util.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/exp_vfpt.adb b/gcc/ada/exp_vfpt.adb index 448864497fb8..0f03e8743933 100644 --- a/gcc/ada/exp_vfpt.adb +++ b/gcc/ada/exp_vfpt.adb @@ -6,8 +6,7 @@ -- -- -- B o d y -- -- -- --- -- --- Copyright (C) 1997-2001 Free Software Foundation, Inc. -- +-- Copyright (C) 1997-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- -- @@ -310,7 +309,6 @@ package body Exp_VFpt is end if; end Equivalent_Integer_Type; - -- Start of processing for Expand_Vax_Conversion; begin @@ -323,7 +321,6 @@ package body Exp_VFpt is Rewrite (N, Unchecked_Convert_To (T_Typ, Expr)); - elsif Is_Fixed_Point_Type (S_Typ) then -- convert the scaled integer value to the target type, and multiply diff --git a/gcc/ada/exp_vfpt.ads b/gcc/ada/exp_vfpt.ads index 3c5b586539b7..1e57b418b843 100644 --- a/gcc/ada/exp_vfpt.ads +++ b/gcc/ada/exp_vfpt.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1997 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/expander.adb b/gcc/ada/expander.adb index 3738477bbbf7..83a04a280144 100644 --- a/gcc/ada/expander.adb +++ b/gcc/ada/expander.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/expander.ads b/gcc/ada/expander.ads index 73782309b773..28fef078c3cb 100644 --- a/gcc/ada/expander.ads +++ b/gcc/ada/expander.ads @@ -6,8 +6,7 @@ -- -- -- S p e c -- -- -- --- -- --- Copyright (C) 1992-2000 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- -- @@ -51,7 +50,8 @@ -- subtree with an expression. Once the substitution is completed, the -- Expand routine must call Analyze on the resulting node to do any -- required semantic analysis. Note that references to children copied --- from the old tree won't be reanalyzed, since their Analyze flag is set. +-- from the old tree won't be reanalyzed, since their Analyzed flag +-- is set. -- Nodes that are subexpressions (Nkind in N_Subexpr) diff --git a/gcc/ada/fmap.adb b/gcc/ada/fmap.adb index 80e98f89dc8e..9fdfda04b016 100644 --- a/gcc/ada/fmap.adb +++ b/gcc/ada/fmap.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 2001, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/fmap.ads b/gcc/ada/fmap.ads index 91bbf62a0973..5b1d51e606d0 100644 --- a/gcc/ada/fmap.ads +++ b/gcc/ada/fmap.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 2001, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/fname-sf.adb b/gcc/ada/fname-sf.adb index 2ebf9089d68c..962b335747d0 100644 --- a/gcc/ada/fname-sf.adb +++ b/gcc/ada/fname-sf.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2000 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/fname-sf.ads b/gcc/ada/fname-sf.ads index 058e442b7588..b18c3dc25ff3 100644 --- a/gcc/ada/fname-sf.ads +++ b/gcc/ada/fname-sf.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/fname-uf.adb b/gcc/ada/fname-uf.adb index 108f60a9984c..bd545950d6a9 100644 --- a/gcc/ada/fname-uf.adb +++ b/gcc/ada/fname-uf.adb @@ -6,8 +6,7 @@ -- -- -- B o d y -- -- -- --- -- --- Copyright (C) 1992-2001, Free Software Foundation, Inc. -- +-- Copyright (C) 1992-2003, 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- -- diff --git a/gcc/ada/fname-uf.ads b/gcc/ada/fname-uf.ads index 2ec910d49b79..6eef86e9ee7a 100644 --- a/gcc/ada/fname-uf.ads +++ b/gcc/ada/fname-uf.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2000 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/fname.adb b/gcc/ada/fname.adb index c9ebd23c2b72..195010b072d5 100644 --- a/gcc/ada/fname.adb +++ b/gcc/ada/fname.adb @@ -6,8 +6,7 @@ -- -- -- B o d y -- -- -- --- -- --- 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- -- @@ -138,7 +137,7 @@ package body Fname is is subtype Str8 is String (1 .. 8); - Predef_Names : array (1 .. 11) of Str8 := + Predef_Names : constant array (1 .. 11) of Str8 := ("ada ", -- Ada "calendar", -- Calendar "interfac", -- Interfaces diff --git a/gcc/ada/fname.ads b/gcc/ada/fname.ads index d06e282fd9c9..d4bf4cf3cd48 100644 --- a/gcc/ada/fname.ads +++ b/gcc/ada/fname.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2000 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/freeze.adb b/gcc/ada/freeze.adb index 9d49e248b0b3..579c5ff50902 100644 --- a/gcc/ada/freeze.adb +++ b/gcc/ada/freeze.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2002, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/freeze.ads b/gcc/ada/freeze.ads index c628d7c8b218..247fbc4e9cb7 100644 --- a/gcc/ada/freeze.ads +++ b/gcc/ada/freeze.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2001, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/frontend.adb b/gcc/ada/frontend.adb index 27adcaae4515..758513eb180e 100644 --- a/gcc/ada/frontend.adb +++ b/gcc/ada/frontend.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/frontend.ads b/gcc/ada/frontend.ads index 845f8968e322..3d7c3cee3887 100644 --- a/gcc/ada/frontend.ads +++ b/gcc/ada/frontend.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992,1993,1994 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/g-awk.adb b/gcc/ada/g-awk.adb index a8854b63b543..40de600ffd74 100644 --- a/gcc/ada/g-awk.adb +++ b/gcc/ada/g-awk.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 2000-2001 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/g-awk.ads b/gcc/ada/g-awk.ads index 27a58951c38a..7af1cb3ec5e1 100644 --- a/gcc/ada/g-awk.ads +++ b/gcc/ada/g-awk.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 2000-2001 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/g-busora.adb b/gcc/ada/g-busora.adb index fa19f7a8b61e..9a4691927853 100644 --- a/gcc/ada/g-busora.adb +++ b/gcc/ada/g-busora.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1995-1998 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/g-busora.ads b/gcc/ada/g-busora.ads index a38dd156a412..7fbc6fc8d6ec 100644 --- a/gcc/ada/g-busora.ads +++ b/gcc/ada/g-busora.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1995-2000 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/g-busorg.adb b/gcc/ada/g-busorg.adb index 67b3d745b584..62cbd4275ddd 100644 --- a/gcc/ada/g-busorg.adb +++ b/gcc/ada/g-busorg.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1995-1998 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/g-busorg.ads b/gcc/ada/g-busorg.ads index 7b39168f4cf4..76ccda751229 100644 --- a/gcc/ada/g-busorg.ads +++ b/gcc/ada/g-busorg.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1995-2000 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/g-calend.adb b/gcc/ada/g-calend.adb index 3b7da7d62ce4..18c74ace13be 100644 --- a/gcc/ada/g-calend.adb +++ b/gcc/ada/g-calend.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1999-2001 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- @@ -28,7 +27,7 @@ -- covered by the GNU Public License. -- -- -- -- GNAT was originally developed by the GNAT team at New York University. -- --- It is now maintained by Ada Core Technologies Inc (http://www.gnat.com). -- +-- Extensive contributions were provided by Ada Core Technologies Inc. -- -- -- ------------------------------------------------------------------------------ diff --git a/gcc/ada/g-calend.ads b/gcc/ada/g-calend.ads index 7cfbe9b14eaf..94f95a18e210 100644 --- a/gcc/ada/g-calend.ads +++ b/gcc/ada/g-calend.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1999-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/g-casuti.adb b/gcc/ada/g-casuti.adb index b5eb09f876c0..a86249157992 100644 --- a/gcc/ada/g-casuti.adb +++ b/gcc/ada/g-casuti.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1995-1999 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/g-casuti.ads b/gcc/ada/g-casuti.ads index 08e04520fcda..db22ec52df6b 100644 --- a/gcc/ada/g-casuti.ads +++ b/gcc/ada/g-casuti.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1995-1998 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/g-catiio.adb b/gcc/ada/g-catiio.adb index d9bf171281fd..e3f45f815feb 100644 --- a/gcc/ada/g-catiio.adb +++ b/gcc/ada/g-catiio.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1999-2001 Ada Core Technologies, Inc. -- -- -- -- This specification is derived from the Ada Reference Manual for use with -- diff --git a/gcc/ada/g-catiio.ads b/gcc/ada/g-catiio.ads index 0485757a9c77..9f3188cdf1b2 100644 --- a/gcc/ada/g-catiio.ads +++ b/gcc/ada/g-catiio.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1999-2001 Ada Core Technologies, Inc. -- -- -- -- This specification is derived from the Ada Reference Manual for use with -- @@ -32,7 +31,7 @@ -- covered by the GNU Public License. -- -- -- -- GNAT was originally developed by the GNAT team at New York University. -- --- It is now maintained by Ada Core Technologies Inc (http://www.gnat.com). -- +-- Extensive contributions were provided by Ada Core Technologies Inc. -- -- -- ------------------------------------------------------------------------------ diff --git a/gcc/ada/g-cgi.adb b/gcc/ada/g-cgi.adb index db2a5355644b..3d5970dbe221 100644 --- a/gcc/ada/g-cgi.adb +++ b/gcc/ada/g-cgi.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 2001 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/g-cgi.ads b/gcc/ada/g-cgi.ads index bd1b74af1543..4929989b2c1f 100644 --- a/gcc/ada/g-cgi.ads +++ b/gcc/ada/g-cgi.ads @@ -6,8 +6,7 @@ -- -- -- S p e c -- -- -- --- -- --- Copyright (C) 2000 Ada Core Technologies, Inc. -- +-- Copyright (C) 2000-2003 Ada Core Technologies, 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- -- diff --git a/gcc/ada/g-cgicoo.adb b/gcc/ada/g-cgicoo.adb index 597e6138a311..6827a9e45cb9 100644 --- a/gcc/ada/g-cgicoo.adb +++ b/gcc/ada/g-cgicoo.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 2000-2001 Ada Core Technologies, Inc. -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/g-cgicoo.ads b/gcc/ada/g-cgicoo.ads index ec0e57444941..3af1fd8188fd 100644 --- a/gcc/ada/g-cgicoo.ads +++ b/gcc/ada/g-cgicoo.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 2000-2001 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/g-cgideb.adb b/gcc/ada/g-cgideb.adb index 321407822616..0f913fc46d03 100644 --- a/gcc/ada/g-cgideb.adb +++ b/gcc/ada/g-cgideb.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 2000-2001 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/g-cgideb.ads b/gcc/ada/g-cgideb.ads index a53e6458aef1..082cebeeaac7 100644 --- a/gcc/ada/g-cgideb.ads +++ b/gcc/ada/g-cgideb.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 2000 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/g-comlin.adb b/gcc/ada/g-comlin.adb index 7aa01e8f6abf..abaa24cd53b4 100644 --- a/gcc/ada/g-comlin.adb +++ b/gcc/ada/g-comlin.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1999-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- @@ -27,7 +26,7 @@ -- however invalidate any other reasons why the executable file might be -- -- covered by the GNU Public License. -- -- -- --- Extensive contributions were provided by Ada Core Technologies Inc. -- +-- GNAT is maintained by Ada Core Technologies Inc (http://www.gnat.com). -- -- -- ------------------------------------------------------------------------------ @@ -248,7 +247,7 @@ package body GNAT.Command_Line is begin if In_Expansion then declare - S : String := Expansion (Expansion_It); + S : constant String := Expansion (Expansion_It); begin if S'Length /= 0 then @@ -767,11 +766,12 @@ package body GNAT.Command_Line is GNAT.Directory_Operations.Open (Iterator.Levels (1).Dir, Iterator.Dir_Name (1 .. Iterator.Start - 1)); - -- If in the current directory and the pattern starts with "./", - -- drop the "./" from the pattern. + -- If in the current directory and the pattern starts with "./" or ".\", + -- drop the "./" or ".\" from the pattern. if Directory = "" and then Pat'Length > 2 - and then Pat (Pat'First .. Pat'First + 1) = "./" + and then Pat (Pat'First) = '.' + and then Pat (Pat'First + 1) = Directory_Separator then First := Pat'First + 2; end if; diff --git a/gcc/ada/g-comlin.ads b/gcc/ada/g-comlin.ads index 668c461d94f3..1e421e4cd3ec 100644 --- a/gcc/ada/g-comlin.ads +++ b/gcc/ada/g-comlin.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1999-2002 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/g-crc32.adb b/gcc/ada/g-crc32.adb index 255e2f4ae82b..18ae76dc0b40 100644 --- a/gcc/ada/g-crc32.adb +++ b/gcc/ada/g-crc32.adb @@ -6,8 +6,7 @@ -- -- -- B o d y -- -- -- --- -- --- Copyright (C) 2001 Ada Core Technologies, Inc. -- +-- Copyright (C) 2001-2002 Ada Core Technologies, 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- -- @@ -74,7 +73,7 @@ package body GNAT.CRC32 is subtype S2 is String (1 .. 2); function To_S2 is new Unchecked_Conversion (Wide_Character, S2); - VS : S2 := To_S2 (Value); + VS : constant S2 := To_S2 (Value); begin Update (C, VS (1)); diff --git a/gcc/ada/g-crc32.ads b/gcc/ada/g-crc32.ads index 73df9511db64..00f050ef471b 100644 --- a/gcc/ada/g-crc32.ads +++ b/gcc/ada/g-crc32.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 2001 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/g-curexc.ads b/gcc/ada/g-curexc.ads index b09787c1c0c0..9b552b1ab481 100644 --- a/gcc/ada/g-curexc.ads +++ b/gcc/ada/g-curexc.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1996-2000 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- @@ -28,7 +27,7 @@ -- covered by the GNU Public License. -- -- -- -- GNAT was originally developed by the GNAT team at New York University. -- --- It is now maintained by Ada Core Technologies Inc (http://www.gnat.com). -- +-- Extensive contributions were provided by Ada Core Technologies Inc. -- -- -- ------------------------------------------------------------------------------ diff --git a/gcc/ada/g-debpoo.adb b/gcc/ada/g-debpoo.adb index f7bec400f66e..83c8ba54785c 100644 --- a/gcc/ada/g-debpoo.adb +++ b/gcc/ada/g-debpoo.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/g-debpoo.ads b/gcc/ada/g-debpoo.ads index 33c0dd9bedb7..0da981d8b779 100644 --- a/gcc/ada/g-debpoo.ads +++ b/gcc/ada/g-debpoo.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/g-debuti.adb b/gcc/ada/g-debuti.adb index 4e956387f127..9266c0cf1cc3 100644 --- a/gcc/ada/g-debuti.adb +++ b/gcc/ada/g-debuti.adb @@ -6,8 +6,7 @@ -- -- -- B o d y -- -- -- --- -- --- Copyright (C) 1997-1998 Ada Core Technologies, Inc. -- +-- Copyright (C) 1997-2002 Ada Core Technologies, 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- -- @@ -46,7 +45,8 @@ package body GNAT.Debug_Utilities is N : Integer_Address := To_Integer (A); U : Natural := 0; - H : array (Integer range 0 .. 15) of Character := "0123456789ABCDEF"; + H : constant array (Integer range 0 .. 15) of Character := + "0123456789ABCDEF"; begin S (S'Last) := '#'; diff --git a/gcc/ada/g-debuti.ads b/gcc/ada/g-debuti.ads index a8992840f7c8..334b103d43f7 100644 --- a/gcc/ada/g-debuti.ads +++ b/gcc/ada/g-debuti.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1995-1998 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/g-diopit.adb b/gcc/ada/g-diopit.adb index 20bd22e285c1..ed1aafa27b85 100644 --- a/gcc/ada/g-diopit.adb +++ b/gcc/ada/g-diopit.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 2001 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/g-diopit.ads b/gcc/ada/g-diopit.ads index 0cfdb890e1f5..62b691a09c3c 100644 --- a/gcc/ada/g-diopit.ads +++ b/gcc/ada/g-diopit.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 2001 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/g-dirope.adb b/gcc/ada/g-dirope.adb index 892684357c5a..1967d236d637 100644 --- a/gcc/ada/g-dirope.adb +++ b/gcc/ada/g-dirope.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1998-2001 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/g-dirope.ads b/gcc/ada/g-dirope.ads index 81fe92f916a6..e5d03b12616f 100644 --- a/gcc/ada/g-dirope.ads +++ b/gcc/ada/g-dirope.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1998-2001 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/g-dyntab.adb b/gcc/ada/g-dyntab.adb index da447c64e503..40417ed31799 100644 --- a/gcc/ada/g-dyntab.adb +++ b/gcc/ada/g-dyntab.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 2000-2001 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/g-dyntab.ads b/gcc/ada/g-dyntab.ads index 0fc04e699000..6adf4ee5573f 100644 --- a/gcc/ada/g-dyntab.ads +++ b/gcc/ada/g-dyntab.ads @@ -6,8 +6,7 @@ -- -- -- S p e c -- -- -- --- -- --- Copyright (C) 2000-2001 Ada Core Technologies, Inc. -- +-- Copyright (C) 2000-2002 Ada Core Technologies, 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- -- diff --git a/gcc/ada/g-enblsp.adb b/gcc/ada/g-enblsp.adb index 98b2ef2b7fc1..8c583291e294 100644 --- a/gcc/ada/g-enblsp.adb +++ b/gcc/ada/g-enblsp.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 2002 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/g-except.ads b/gcc/ada/g-except.ads index b12e663f5827..79118d92efac 100644 --- a/gcc/ada/g-except.ads +++ b/gcc/ada/g-except.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 2000-2001 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/g-exctra.adb b/gcc/ada/g-exctra.adb index 179f39438697..76a380f524d6 100644 --- a/gcc/ada/g-exctra.adb +++ b/gcc/ada/g-exctra.adb @@ -6,8 +6,7 @@ -- -- -- B o d y -- -- -- --- -- --- Copyright (C) 2000-2001 Ada Core Technologies, Inc. -- +-- Copyright (C) 2000-2002 Ada Core Technologies, 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- -- @@ -114,7 +113,7 @@ package body GNAT.Exception_Traces is -- Trace_On -- -------------- - procedure Trace_On (Kind : in Trace_Kind) is + procedure Trace_On (Kind : Trace_Kind) is begin case Kind is when Every_Raise => diff --git a/gcc/ada/g-exctra.ads b/gcc/ada/g-exctra.ads index cde6203cd5db..7ccbf652c2c3 100644 --- a/gcc/ada/g-exctra.ads +++ b/gcc/ada/g-exctra.ads @@ -6,8 +6,7 @@ -- -- -- S p e c -- -- -- --- -- --- Copyright (C) 2000 Ada Core Technologies, Inc. -- +-- Copyright (C) 2000-2003 Ada Core Technologies, 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- -- @@ -71,7 +70,7 @@ package GNAT.Exception_Traces is -- The following procedures can be used to activate and deactivate -- traces identified by the above trace kind values. - procedure Trace_On (Kind : in Trace_Kind); + procedure Trace_On (Kind : Trace_Kind); -- Activate the traces denoted by Kind. procedure Trace_Off; diff --git a/gcc/ada/g-expect.adb b/gcc/ada/g-expect.adb index 432e17bfe52d..32ed1c1e8fc6 100644 --- a/gcc/ada/g-expect.adb +++ b/gcc/ada/g-expect.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 2000-2002 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/g-expect.ads b/gcc/ada/g-expect.ads index 36490288aff3..07a3b1c50802 100644 --- a/gcc/ada/g-expect.ads +++ b/gcc/ada/g-expect.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 2000-2002 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/g-flocon.ads b/gcc/ada/g-flocon.ads index a421f260e290..5454730c9bea 100644 --- a/gcc/ada/g-flocon.ads +++ b/gcc/ada/g-flocon.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 2000 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- @@ -28,7 +27,7 @@ -- covered by the GNU Public License. -- -- -- -- GNAT was originally developed by the GNAT team at New York University. -- --- It is now maintained by Ada Core Technologies Inc (http://www.gnat.com). -- +-- Extensive contributions were provided by Ada Core Technologies Inc. -- -- -- ------------------------------------------------------------------------------ diff --git a/gcc/ada/g-hesora.adb b/gcc/ada/g-hesora.adb index fce06b0ebf0f..71fab90d2a2d 100644 --- a/gcc/ada/g-hesora.adb +++ b/gcc/ada/g-hesora.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1995-1999 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/g-hesora.ads b/gcc/ada/g-hesora.ads index 1834f3d39a7e..019da3951418 100644 --- a/gcc/ada/g-hesora.ads +++ b/gcc/ada/g-hesora.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1995-2000 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/g-hesorg.adb b/gcc/ada/g-hesorg.adb index fcceb57d6f8c..229a1e382e8b 100644 --- a/gcc/ada/g-hesorg.adb +++ b/gcc/ada/g-hesorg.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1995-1999 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/g-hesorg.ads b/gcc/ada/g-hesorg.ads index 01fe58d76293..ada7ca1cbc77 100644 --- a/gcc/ada/g-hesorg.ads +++ b/gcc/ada/g-hesorg.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1995-2000 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/g-htable.adb b/gcc/ada/g-htable.adb index 2d639872b97f..5db9df2d7cab 100644 --- a/gcc/ada/g-htable.adb +++ b/gcc/ada/g-htable.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1995-1999 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/g-htable.ads b/gcc/ada/g-htable.ads index 116e8775ff6f..114c65702617 100644 --- a/gcc/ada/g-htable.ads +++ b/gcc/ada/g-htable.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1995-2001 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/g-io.adb b/gcc/ada/g-io.adb index e20c5a841b6b..c4f191b9c0ea 100644 --- a/gcc/ada/g-io.adb +++ b/gcc/ada/g-io.adb @@ -6,8 +6,7 @@ -- -- -- B o d y -- -- -- --- -- --- Copyright (C) 1995-2001 Ada Core Technologies, Inc. -- +-- Copyright (C) 1995-2002 Ada Core Technologies, 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- -- @@ -63,7 +62,7 @@ package body GNAT.IO is -- Get_Line -- -------------- - procedure Get_Line (Item : in out String; Last : out Natural) is + procedure Get_Line (Item : out String; Last : out Natural) is C : Character; begin diff --git a/gcc/ada/g-io.ads b/gcc/ada/g-io.ads index 90803814ab4a..526f1927a297 100644 --- a/gcc/ada/g-io.ads +++ b/gcc/ada/g-io.ads @@ -6,8 +6,7 @@ -- -- -- S p e c -- -- -- --- -- --- Copyright (C) 1995-2001 Ada Core Technologies, Inc. -- +-- Copyright (C) 1995-2002 Ada Core Technologies, 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- -- @@ -54,7 +53,7 @@ pragma Preelaborate (IO); procedure Get (X : out Integer); procedure Get (C : out Character); - procedure Get_Line (Item : in out String; Last : out Natural); + procedure Get_Line (Item : out String; Last : out Natural); -- These routines always read from Standard_Input procedure Put (File : File_Type; X : Integer); diff --git a/gcc/ada/g-io_aux.adb b/gcc/ada/g-io_aux.adb index dabffb9bd391..295ad84053c3 100644 --- a/gcc/ada/g-io_aux.adb +++ b/gcc/ada/g-io_aux.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1995-2002 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/g-io_aux.ads b/gcc/ada/g-io_aux.ads index bda3a4c81b96..b22f0a189c70 100644 --- a/gcc/ada/g-io_aux.ads +++ b/gcc/ada/g-io_aux.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1995-2002 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/g-locfil.ads b/gcc/ada/g-locfil.ads index 4b672eb0ab63..55e65aa79dc9 100644 --- a/gcc/ada/g-locfil.ads +++ b/gcc/ada/g-locfil.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1995-2001 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/g-md5.adb b/gcc/ada/g-md5.adb index 693203af21b0..492531f35e53 100644 --- a/gcc/ada/g-md5.adb +++ b/gcc/ada/g-md5.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 2002 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/g-md5.ads b/gcc/ada/g-md5.ads index 2e0f27cb9c3b..127422ae500f 100644 --- a/gcc/ada/g-md5.ads +++ b/gcc/ada/g-md5.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 2002 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/g-moreex.adb b/gcc/ada/g-moreex.adb index d3013590d532..c91c45a308c2 100644 --- a/gcc/ada/g-moreex.adb +++ b/gcc/ada/g-moreex.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 2000 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- @@ -28,7 +27,7 @@ -- covered by the GNU Public License. -- -- -- -- GNAT was originally developed by the GNAT team at New York University. -- --- It is now maintained by Ada Core Technologies Inc (http://www.gnat.com). -- +-- Extensive contributions were provided by Ada Core Technologies Inc. -- -- -- ------------------------------------------------------------------------------ diff --git a/gcc/ada/g-moreex.ads b/gcc/ada/g-moreex.ads index f73bcd9c2f3c..21983ea1dc0d 100644 --- a/gcc/ada/g-moreex.ads +++ b/gcc/ada/g-moreex.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 2000 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- @@ -28,7 +27,7 @@ -- covered by the GNU Public License. -- -- -- -- GNAT was originally developed by the GNAT team at New York University. -- --- It is now maintained by Ada Core Technologies Inc (http://www.gnat.com). -- +-- Extensive contributions were provided by Ada Core Technologies Inc. -- -- -- ------------------------------------------------------------------------------ diff --git a/gcc/ada/g-os_lib.adb b/gcc/ada/g-os_lib.adb index 524c3d42892c..b92037b9d0da 100644 --- a/gcc/ada/g-os_lib.adb +++ b/gcc/ada/g-os_lib.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1995-2002 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/g-os_lib.ads b/gcc/ada/g-os_lib.ads index e46f1e78b9d0..c6dfede2021f 100644 --- a/gcc/ada/g-os_lib.ads +++ b/gcc/ada/g-os_lib.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1995-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/g-regexp.adb b/gcc/ada/g-regexp.adb index 81b60c9c08e9..18852c362fed 100644 --- a/gcc/ada/g-regexp.adb +++ b/gcc/ada/g-regexp.adb @@ -6,8 +6,7 @@ -- -- -- B o d y -- -- -- --- -- --- Copyright (C) 1999-2001 Ada Core Technologies, Inc. -- +-- Copyright (C) 1999-2002 Ada Core Technologies, 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- -- @@ -534,7 +533,7 @@ package body GNAT.Regexp is case S (J) is when Open_Paren => declare - J_Start : Integer := J + 1; + J_Start : constant Integer := J + 1; Next_Start : State_Index; Next_End : State_Index; @@ -568,11 +567,11 @@ package body GNAT.Regexp is when '|' => declare - Start_Prev : State_Index := Start_State; - End_Prev : State_Index := End_State; + Start_Prev : constant State_Index := Start_State; + End_Prev : constant State_Index := End_State; + Start_J : constant Integer := J + 1; Start_Next : State_Index := 0; End_Next : State_Index := 0; - Start_J : Integer := J + 1; begin J := Next_Sub_Expression (J, End_Index); @@ -1235,6 +1234,19 @@ package body GNAT.Regexp is -- Start of processing for Compile begin + -- Special case for the empty string: it always matches, and the + -- following processing would fail on it. + if S = "" then + return (Ada.Finalization.Controlled with + R => new Regexp_Value' + (Alphabet_Size => 0, + Num_States => 1, + Map => (others => 0), + States => (others => (others => 1)), + Is_Final => (others => True), + Case_Sensitive => True)); + end if; + if not Case_Sensitive then GNAT.Case_Util.To_Lower (S); end if; diff --git a/gcc/ada/g-regexp.ads b/gcc/ada/g-regexp.ads index 86893ae675c6..357923c982e1 100644 --- a/gcc/ada/g-regexp.ads +++ b/gcc/ada/g-regexp.ads @@ -6,8 +6,7 @@ -- -- -- S p e c -- -- -- --- -- --- Copyright (C) 1998-1999 Ada Core Technologies, Inc. -- +-- Copyright (C) 1998-2003 Ada Core Technologies, 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- -- @@ -136,7 +135,9 @@ package GNAT.Regexp is -- Compiles a regular expression S. If the syntax of the given -- expression is invalid (does not match above grammar, Error_In_Regexp -- is raised. If Glob is True, the pattern is considered as a 'globbing - -- pattern', that is a pattern as given by the second grammar above + -- pattern', that is a pattern as given by the second grammar above. + -- As a special case, if Pattern is the empty string it will always + -- match. function Match (S : String; R : Regexp) return Boolean; -- True if S matches R, otherwise False. Raises Constraint_Error if diff --git a/gcc/ada/g-regist.ads b/gcc/ada/g-regist.ads index 0c7973a3351b..a41686dc73ef 100644 --- a/gcc/ada/g-regist.ads +++ b/gcc/ada/g-regist.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/g-regpat.adb b/gcc/ada/g-regpat.adb index 3e569ff1a91a..1949a8a55405 100644 --- a/gcc/ada/g-regpat.adb +++ b/gcc/ada/g-regpat.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1986 by University of Toronto. -- -- Copyright (C) 1996-2002 Ada Core Technologies, Inc. -- -- -- diff --git a/gcc/ada/g-regpat.ads b/gcc/ada/g-regpat.ads index 5489f0f362dc..b3af0d826185 100644 --- a/gcc/ada/g-regpat.ads +++ b/gcc/ada/g-regpat.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1986 by University of Toronto. -- -- Copyright (C) 1996-2001 Ada Core Technologies, Inc. -- -- -- diff --git a/gcc/ada/g-soccon.ads b/gcc/ada/g-soccon.ads index b5c0f2241f49..8f55fc189e4e 100644 --- a/gcc/ada/g-soccon.ads +++ b/gcc/ada/g-soccon.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 2001 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/g-socket.adb b/gcc/ada/g-socket.adb index ad77ff7c17e7..27ebe1c366d8 100644 --- a/gcc/ada/g-socket.adb +++ b/gcc/ada/g-socket.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 2001-2002 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/g-socket.ads b/gcc/ada/g-socket.ads index 9e7b378eb4f1..213de119c027 100644 --- a/gcc/ada/g-socket.ads +++ b/gcc/ada/g-socket.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 2001-2002 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/g-socthi.adb b/gcc/ada/g-socthi.adb index c9455c9e4997..d39d8389cd18 100644 --- a/gcc/ada/g-socthi.adb +++ b/gcc/ada/g-socthi.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 2001 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/g-socthi.ads b/gcc/ada/g-socthi.ads index 7a4d7e4aaff7..a0236ecdeed8 100644 --- a/gcc/ada/g-socthi.ads +++ b/gcc/ada/g-socthi.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 2001 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/g-soliop.ads b/gcc/ada/g-soliop.ads index 5d27ae045175..6f40df91042c 100644 --- a/gcc/ada/g-soliop.ads +++ b/gcc/ada/g-soliop.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 2001 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/g-souinf.ads b/gcc/ada/g-souinf.ads index 91130e9b92f0..0d52b023c3a8 100644 --- a/gcc/ada/g-souinf.ads +++ b/gcc/ada/g-souinf.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 2000 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/g-speche.adb b/gcc/ada/g-speche.adb index 7b3c3739c3e2..48dd4ab91082 100644 --- a/gcc/ada/g-speche.adb +++ b/gcc/ada/g-speche.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1998-2001 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/g-speche.ads b/gcc/ada/g-speche.ads index 928d1f8e6151..c89e515c7120 100644 --- a/gcc/ada/g-speche.ads +++ b/gcc/ada/g-speche.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1998 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/g-spipat.adb b/gcc/ada/g-spipat.adb index ff6da0c1ce03..e0fa74a41fa6 100644 --- a/gcc/ada/g-spipat.adb +++ b/gcc/ada/g-spipat.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1998-2002, Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/g-spipat.ads b/gcc/ada/g-spipat.ads index 2d1d91e86ced..3d08f0be8523 100644 --- a/gcc/ada/g-spipat.ads +++ b/gcc/ada/g-spipat.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1997-1999 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/g-spitbo.adb b/gcc/ada/g-spitbo.adb index d5b23a75c969..626a6332b4fe 100644 --- a/gcc/ada/g-spitbo.adb +++ b/gcc/ada/g-spitbo.adb @@ -6,8 +6,7 @@ -- -- -- B o d y -- -- -- --- -- --- Copyright (C) 1998 Ada Core Technologies, Inc. -- +-- Copyright (C) 1998-2002 Ada Core Technologies, 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- -- @@ -144,9 +143,9 @@ package body GNAT.Spitbol is -------------------- function Reverse_String (Str : VString) return VString is - Len : constant Natural := Length (Str); + Len : constant Natural := Length (Str); + Chars : constant String_Access := Get_String (Str); Result : String (1 .. Len); - Chars : String_Access := Get_String (Str); begin for J in 1 .. Len loop diff --git a/gcc/ada/g-spitbo.ads b/gcc/ada/g-spitbo.ads index 7b547f282320..d0688e3ce1c2 100644 --- a/gcc/ada/g-spitbo.ads +++ b/gcc/ada/g-spitbo.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1997-1999 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/g-sptabo.ads b/gcc/ada/g-sptabo.ads index 271b2fa52086..9beb7a4aa762 100644 --- a/gcc/ada/g-sptabo.ads +++ b/gcc/ada/g-sptabo.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1997-1998 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/g-sptain.ads b/gcc/ada/g-sptain.ads index 5a8dbaf00c63..01e08fa49193 100644 --- a/gcc/ada/g-sptain.ads +++ b/gcc/ada/g-sptain.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1997-1998 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/g-sptavs.ads b/gcc/ada/g-sptavs.ads index 6d39c48dceb5..7601506c9bbd 100644 --- a/gcc/ada/g-sptavs.ads +++ b/gcc/ada/g-sptavs.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1997-1998 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/g-table.adb b/gcc/ada/g-table.adb index fe4ebd1c8420..a1e5ef9aa738 100644 --- a/gcc/ada/g-table.adb +++ b/gcc/ada/g-table.adb @@ -6,8 +6,7 @@ -- -- -- B o d y -- -- -- --- -- --- Copyright (C) 1998-2001 Ada Core Technologies, Inc. -- +-- Copyright (C) 1998-2002 Ada Core Technologies, 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- -- @@ -33,7 +32,8 @@ with System; use System; with System.Memory; use System.Memory; -with System.Address_To_Access_Conversions; + +with Unchecked_Conversion; package body GNAT.Table is @@ -59,17 +59,8 @@ package body GNAT.Table is -- in Max. Works correctly to do an initial allocation if the table -- is currently null. - package Table_Conversions is - new System.Address_To_Access_Conversions (Big_Table_Type); - -- Address and Access conversions for a Table object. - - function To_Address (Table : Table_Ptr) return Address; - pragma Inline (To_Address); - -- Returns the Address for the Table object. - - function To_Pointer (Table : Address) return Table_Ptr; - pragma Inline (To_Pointer); - -- Returns the Access pointer for the Table object. + function To_Address is new Unchecked_Conversion (Table_Ptr, Address); + function To_Pointer is new Unchecked_Conversion (Address, Table_Ptr); -------------- -- Allocate -- @@ -136,7 +127,7 @@ package body GNAT.Table is ---------- procedure Init is - Old_Length : Integer := Length; + Old_Length : constant Integer := Length; begin Last_Val := Min - 1; @@ -256,25 +247,6 @@ package body GNAT.Table is end if; end Set_Last; - ---------------- - -- To_Address -- - ---------------- - - function To_Address (Table : Table_Ptr) return Address is - begin - return Table_Conversions.To_Address - (Table_Conversions.Object_Pointer (Table)); - end To_Address; - - ---------------- - -- To_Pointer -- - ---------------- - - function To_Pointer (Table : Address) return Table_Ptr is - begin - return Table_Ptr (Table_Conversions.To_Pointer (Table)); - end To_Pointer; - begin Init; end GNAT.Table; diff --git a/gcc/ada/g-table.ads b/gcc/ada/g-table.ads index 7392582c45c5..0e671f561a77 100644 --- a/gcc/ada/g-table.ads +++ b/gcc/ada/g-table.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1998-2001 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/g-tasloc.adb b/gcc/ada/g-tasloc.adb index 0432206ae2af..c0b01450f537 100644 --- a/gcc/ada/g-tasloc.adb +++ b/gcc/ada/g-tasloc.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1997-1999 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/g-tasloc.ads b/gcc/ada/g-tasloc.ads index 7b09d45d5d5a..f2090b5ceb5d 100644 --- a/gcc/ada/g-tasloc.ads +++ b/gcc/ada/g-tasloc.ads @@ -6,8 +6,7 @@ -- -- -- S p e c -- -- -- --- -- --- Copyright (C) 1998-2001 Ada Core Technologies, Inc. -- +-- Copyright (C) 1998-2002 Ada Core Technologies, 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- -- @@ -53,10 +52,10 @@ pragma Elaborate_Body (Task_Lock); pragma Inline (Unlock); -- Releases the global lock, allowing another task to successfully -- complete a Lock operation. Terminates the critical region. - + -- -- The recommended protocol for using these two procedures is as -- follows: - + -- -- Locked_Processing : begin -- Lock; -- ... @@ -67,26 +66,30 @@ pragma Elaborate_Body (Task_Lock); -- Unlock; -- raise; -- end Locked_Processing; - + -- -- This ensures that the lock is not left set if an exception is raised -- explicitly or implicitly during the critical locked region. - + -- -- Note on multiple calls to Lock: It is permissible to call Lock -- more than once with no intervening Unlock from a single task, -- and the lock will not be released until the corresponding number -- of Unlock operations has been performed. For example: - + -- -- GNAT.Task_Lock.Lock; -- acquires lock -- GNAT.Task_Lock.Lock; -- no effect -- GNAT.Task_Lock.Lock; -- no effect -- GNAT.Task_Lock.Unlock; -- no effect -- GNAT.Task_Lock.Unlock; -- no effect -- GNAT.Task_Lock.Unlock; -- releases lock - + -- -- However, as previously noted, the Task_Lock facility should only -- be used for very local locks where the probability of conflict is -- low, so usually this kind of nesting is not a good idea in any case. -- In more complex locking situations, it is more appropriate to define -- an appropriate protected type to provide the required locking. + -- + -- It is an error to call Unlock when there has been no prior call to + -- Lock. The effect of such an erroneous call is undefined, and may + -- result in deadlock, or other malfunction of the run-time system. end GNAT.Task_Lock; diff --git a/gcc/ada/g-thread.adb b/gcc/ada/g-thread.adb index 12d86e3937cd..6208674d361f 100644 --- a/gcc/ada/g-thread.adb +++ b/gcc/ada/g-thread.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1998-2000 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/g-thread.ads b/gcc/ada/g-thread.ads index 52da0b0d8d6b..e39f896e25b1 100644 --- a/gcc/ada/g-thread.ads +++ b/gcc/ada/g-thread.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1998-2000 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/g-traceb.adb b/gcc/ada/g-traceb.adb index c374488175e1..14978dcc7713 100644 --- a/gcc/ada/g-traceb.adb +++ b/gcc/ada/g-traceb.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1999-2000 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/g-traceb.ads b/gcc/ada/g-traceb.ads index fb500311a6b2..30d5fc80a467 100644 --- a/gcc/ada/g-traceb.ads +++ b/gcc/ada/g-traceb.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1999-2001 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/g-trasym.adb b/gcc/ada/g-trasym.adb index 80ceaa2ef71e..cff8aca520fa 100644 --- a/gcc/ada/g-trasym.adb +++ b/gcc/ada/g-trasym.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1999-2002 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/g-trasym.ads b/gcc/ada/g-trasym.ads index 6039f70e2b4f..5c3255855e65 100644 --- a/gcc/ada/g-trasym.ads +++ b/gcc/ada/g-trasym.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1999-2002 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- @@ -41,8 +40,10 @@ -- is used to build a symbolic traceback. -- -- In order to retrieve symbolic information, functions in this package will --- read on disk all the debug information of the current executable and load --- them in memory, causing a significant cpu and memory overhead. +-- read on disk all the debug information of the executable file (found via +-- Argument (0), so any path information needed to read the executable file +-- need to be provided when launching the executable), and load then in +-- memory, causing a significant cpu and memory overhead. -- -- This package is not intended to be used within a shared library, -- symbolic tracebacks are only supported for the main executable diff --git a/gcc/ada/get_targ.adb b/gcc/ada/get_targ.adb index 83ef3d61dfb4..bdd68767a410 100644 --- a/gcc/ada/get_targ.adb +++ b/gcc/ada/get_targ.adb @@ -6,8 +6,7 @@ -- -- -- B o d y -- -- -- --- -- --- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- +-- Copyright (C) 1992-2003 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- -- @@ -58,4 +57,13 @@ package body Get_Targ is end if; end Width_From_Size; + ----------------------------- + -- Get_Max_Unaligned_Field -- + ----------------------------- + + function Get_Max_Unaligned_Field return Pos is + begin + return 64; -- Can be different on some targets (e.g., AAMP) + end Get_Max_Unaligned_Field; + end Get_Targ; diff --git a/gcc/ada/get_targ.ads b/gcc/ada/get_targ.ads index efa604fa621d..9d115f081d4d 100644 --- a/gcc/ada/get_targ.ads +++ b/gcc/ada/get_targ.ads @@ -6,8 +6,7 @@ -- -- -- S p e c -- -- -- --- -- --- Copyright (C) 1992-2000 Free Software Foundation, Inc. -- +-- Copyright (C) 1992-2003 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- -- @@ -26,10 +25,11 @@ ------------------------------------------------------------------------------ -- This package provides an Import to the C functions which provide --- values related to types on the target system. It is only needed for +-- values related to types on the target system. It is only needed for -- exp_dbug and the elaboration of ttypes. --- NOTE: Any changes in this package must be reflected in jgettarg.ads! +-- NOTE: Any changes in this package must be reflected in jgettarg.ads +-- and aa_getta.ads! -- Note that all these values return sizes of C types with corresponding -- names. This allows GNAT to define the corresponding Ada types to have @@ -99,6 +99,10 @@ pragma Preelaborate (Get_Targ); function Get_Strict_Alignment return Nat; pragma Import (C, Get_Strict_Alignment, "get_strict_alignment"); + function Get_Max_Unaligned_Field return Pos; + -- Returns the maximum supported size in bits for a field that is + -- not aligned on a storage unit boundary. + function Width_From_Size (Size : Pos) return Pos; function Digits_From_Size (Size : Pos) return Pos; -- Calculate values for 'Width or 'Digits from 'Size diff --git a/gcc/ada/gnat-style.texi b/gcc/ada/gnat-style.texi index e3b1dc629d43..16267ed610c8 100644 --- a/gcc/ada/gnat-style.texi +++ b/gcc/ada/gnat-style.texi @@ -1,5 +1,6 @@ \input texinfo @c -*-texinfo-*- @c %**start of header + @c oooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooo @c o @c GNAT DOCUMENTATION o @@ -25,7 +26,7 @@ @setfilename gnat-style.info @settitle GNAT Coding Style @dircategory Programming -@direntry +@direntry * gnat-style: (gnat-style). GNAT Coding Style @end direntry @@ -71,7 +72,7 @@ @noindent Most of GNAT is written in Ada using a consistent style to ensure readability of the code. This document has been written to help -maintain this consistent style, while having a large group of developers +maintain this consistent style, while having a large group of developers work on the compiler. @noindent @@ -79,8 +80,8 @@ For the coding style in the C parts of the compiler and run time, see the GNU Coding Guidelines. @noindent -This document is structured after the Ada Reference manual. -Those familiar with that document should be able to quickly +This document is structured after the Ada Reference manual. +Those familiar with that document should be able to quickly lookup style rules for particular constructs. @c ------------------------------------------------------------------------- @@ -94,11 +95,11 @@ lookup style rules for particular constructs. @itemize @bullet @item The character set used should be plain 7-bit ASCII@. -The only separators allowed are space and the end-of-line sequence. -No other control character or format effector (such as HT, VT, FF) +The only separators allowed are space and the end-of-line sequence. +No other control character or format effector (such as HT, VT, FF) should be used. The normal end-of-line sequence is used, which may be LF, CR/LF or CR, -depending on the host system. An optional SUB (16#1A#) may be present as the +depending on the host system. An optional SUB (16#1A#) may be present as the last character in the file on hosts using that character as file terminator. @item @@ -123,15 +124,15 @@ elements, see file @file{style.adb}. @itemize @bullet @item Identifiers will start with an upper case letter, and each letter following -an underscore will be upper case. Short acronyms may be all upper case. -All other letters are lower case. +an underscore will be upper case. Short acronyms may be all upper case. +All other letters are lower case. An exception is for identifiers matching a foreign language. In particular, we use all lower case where appropriate for C@. @item -Use underscores to separate words in an identifier. +Use underscores to separate words in an identifier. -@item Try to limit your use of abbreviations in identifiers. +@item Try to limit your use of abbreviations in identifiers. It is ok to make a few abbreviations, explain what they mean, and then use them frequently, but don't use lots of obscure abbreviations. An example is the @code{ALI} word which stands for Ada Library @@ -145,7 +146,7 @@ used in entity names. @item Don't use the variable @samp{I}, use @samp{J} instead, @samp{I} is too easily mixed up with @samp{1} in some fonts. Similarly don't use the -variable @samp{O}, which is too easily mixed up with @samp{0}. +variable @samp{O}, which is too easily mixed up with the number @samp{0}. @end itemize @subsection Numeric Literals @@ -185,8 +186,8 @@ capitalized when used as @syntax{attribute_designator}. Comment start with @samp{-- } (i.e.@: @samp{--} followed by two spaces). The only exception to this rule (i.e.@: one space is tolerated) is when the comment ends with @samp{ --}. -It also accepted to have only one space between @samp{--} and the start -of the comment when the comment is at the end of a line, +It also accepted to have only one space between @samp{--} and the start +of the comment when the comment is at the end of a line, after some Ada code. @item @@ -272,18 +273,18 @@ should be aligned. @end smallexample @item -Declarations should be grouped in a logical order. +Declarations should be grouped in a logical order. Related groups of declarations may be preceded by a header comment. @item All local subprograms in a subprogram or package body should be declared -before the first local subprogram body. +before the first local subprogram body. @item Don't declare local entities that hide global entities. @item -Don't declare multiple variables in one declaration that spans lines. +Don't declare multiple variables in one declaration that spans lines. Start a new declaration on each line, instead. @item @@ -292,7 +293,7 @@ comments of a sort. So don't choose terse names, but look for names that give useful information instead. @item -Local names can be shorter, because they are used only within +Local names can be shorter, because they are used only within one context, where comments explain their purpose. @end itemize @@ -306,7 +307,7 @@ one context, where comments explain their purpose. @itemize @bullet @item -Every operator must be surrounded by spaces, except for the +Every operator must be surrounded by spaces, except for the exponentiation operator. @smallexample @@ -317,7 +318,8 @@ exponentiation operator. When folding a long line, fold before an operator, not after. @item -Use parentheses where they make the intended order of evaluation clearer: +Use parentheses where they clarify the intended association of operands +with operators: @smallexample (A / B) * C @end smallexample @@ -392,7 +394,7 @@ following is allowed: @end smallexample @item -Conditions should use short-circuit forms (@samp{and then}, +Conditions should use short-circuit forms (@samp{and then}, @samp{or else}). @item @@ -552,7 +554,7 @@ format: begin @end smallexample -Note that the name in the header is preceded by a single space, +Note that the name in the header is preceded by a single space, not two spaces as for other comments. @item @@ -564,8 +566,8 @@ preceded by a blank line. @item If the declarations in a subprogram contain at least one nested -subprogram body, then just before the of the enclosing subprogram -@samp{begin}, there is a line: +subprogram body, then just before the @samp{begin} of the enclosing +subprogram, there is a line: @smallexample -- @r{Start of processing for @var{Enclosing_Subprogram}} @@ -636,8 +638,8 @@ Filenames should be 8 characters or less followed by the @samp{.adb} extension for a body or @samp{.ads} for a spec. @item -Unit names should be distinct when krunched to 8 characters -(see @file{krunch.ads}) and the filenames should match the unit name, +Unit names should be distinct when krunched to 8 characters +(see @file{krunch.ads}) and the filenames should match the unit name, except that they are all lower case. @end itemize diff --git a/gcc/ada/gnat.ads b/gcc/ada/gnat.ads index 285131ed1f9e..2026ecd704d7 100644 --- a/gcc/ada/gnat.ads +++ b/gcc/ada/gnat.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2000 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- @@ -28,7 +27,7 @@ -- covered by the GNU Public License. -- -- -- -- GNAT was originally developed by the GNAT team at New York University. -- --- It is now maintained by Ada Core Technologies Inc (http://www.gnat.com). -- +-- Extensive contributions were provided by Ada Core Technologies Inc. -- -- -- ------------------------------------------------------------------------------ diff --git a/gcc/ada/gnat1drv.adb b/gcc/ada/gnat1drv.adb index af1c68447d5d..09a34c6d8a20 100644 --- a/gcc/ada/gnat1drv.adb +++ b/gcc/ada/gnat1drv.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/gnat1drv.ads b/gcc/ada/gnat1drv.ads index 982a68badcfb..3399d0c9c1f1 100644 --- a/gcc/ada/gnat1drv.ads +++ b/gcc/ada/gnat1drv.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992,1993,1994,1995 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/gnatbind.adb b/gcc/ada/gnatbind.adb index 603a71455b05..3a3777731450 100644 --- a/gcc/ada/gnatbind.adb +++ b/gcc/ada/gnatbind.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/gnatbind.ads b/gcc/ada/gnatbind.ads index 135767d14909..6568e6780daf 100644 --- a/gcc/ada/gnatbind.ads +++ b/gcc/ada/gnatbind.ads @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992,1993,1994 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/gnatbl.c b/gcc/ada/gnatbl.c index ee46eb4cc7d3..72f85169fd8a 100644 --- a/gcc/ada/gnatbl.c +++ b/gcc/ada/gnatbl.c @@ -6,7 +6,6 @@ * * * C Implementation File * * * - * * * Copyright (C) 1992-2001 Free Software Foundation, Inc. * * * * GNAT is free software; you can redistribute it and/or modify it under * diff --git a/gcc/ada/gnatchop.adb b/gcc/ada/gnatchop.adb index 8db46ad75604..7a535d3d837b 100644 --- a/gcc/ada/gnatchop.adb +++ b/gcc/ada/gnatchop.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1998-2001 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/gnatcmd.adb b/gcc/ada/gnatcmd.adb index f138fe22950f..b754aff0245b 100644 --- a/gcc/ada/gnatcmd.adb +++ b/gcc/ada/gnatcmd.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1996-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/gnatcmd.ads b/gcc/ada/gnatcmd.ads index 9fc0cf6602fc..e7b9578f19a8 100644 --- a/gcc/ada/gnatcmd.ads +++ b/gcc/ada/gnatcmd.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1996 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/gnatdll.adb b/gcc/ada/gnatdll.adb index 5dc81541e636..74c004b5958a 100644 --- a/gcc/ada/gnatdll.adb +++ b/gcc/ada/gnatdll.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1997-2002, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/gnatfind.adb b/gcc/ada/gnatfind.adb index 11bc21795ed5..0b34519abe65 100644 --- a/gcc/ada/gnatfind.adb +++ b/gcc/ada/gnatfind.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1998-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/gnatkr.adb b/gcc/ada/gnatkr.adb index 94e15b8dd15d..f99b51ec6d63 100644 --- a/gcc/ada/gnatkr.adb +++ b/gcc/ada/gnatkr.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/gnatkr.ads b/gcc/ada/gnatkr.ads index 0ac9f03ffd3e..4d960ec4b281 100644 --- a/gcc/ada/gnatkr.ads +++ b/gcc/ada/gnatkr.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/gnatlbr.adb b/gcc/ada/gnatlbr.adb index 1cfb7cfd19a2..d5d0c8aaf5ef 100644 --- a/gcc/ada/gnatlbr.adb +++ b/gcc/ada/gnatlbr.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1997-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/gnatlink.adb b/gcc/ada/gnatlink.adb index f235958d6ca9..6fa413a19d97 100644 --- a/gcc/ada/gnatlink.adb +++ b/gcc/ada/gnatlink.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1996-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/gnatlink.ads b/gcc/ada/gnatlink.ads index 0efb15c4f557..8942a6ed4274 100644 --- a/gcc/ada/gnatlink.ads +++ b/gcc/ada/gnatlink.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1996 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/gnatls.adb b/gcc/ada/gnatls.adb index c69bd1ca9187..c14def5bda9f 100644 --- a/gcc/ada/gnatls.adb +++ b/gcc/ada/gnatls.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/gnatls.ads b/gcc/ada/gnatls.ads index eca83187ff45..347d79b9093f 100644 --- a/gcc/ada/gnatls.ads +++ b/gcc/ada/gnatls.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1997 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/gnatmake.adb b/gcc/ada/gnatmake.adb index e54a37346be4..34f51594f504 100644 --- a/gcc/ada/gnatmake.adb +++ b/gcc/ada/gnatmake.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1997 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/gnatmake.ads b/gcc/ada/gnatmake.ads index e6caaf80f753..fb5d82766f4b 100644 --- a/gcc/ada/gnatmake.ads +++ b/gcc/ada/gnatmake.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992,1993,1994 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/gnatmem.adb b/gcc/ada/gnatmem.adb index fce28f3effbb..2c5ffeb9de0e 100644 --- a/gcc/ada/gnatmem.adb +++ b/gcc/ada/gnatmem.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1997-2002, Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/gnatname.adb b/gcc/ada/gnatname.adb index a0e38774c79c..831edd50f172 100644 --- a/gcc/ada/gnatname.adb +++ b/gcc/ada/gnatname.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 2001-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/gnatname.ads b/gcc/ada/gnatname.ads index 406f2873efe8..3c69763a30c1 100644 --- a/gcc/ada/gnatname.ads +++ b/gcc/ada/gnatname.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/gnatprep.adb b/gcc/ada/gnatprep.adb index 2d88e5426666..2502db7cee24 100644 --- a/gcc/ada/gnatprep.adb +++ b/gcc/ada/gnatprep.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1996-2002, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/gnatprep.ads b/gcc/ada/gnatprep.ads index 0195f272f59c..0808d2cff9cb 100644 --- a/gcc/ada/gnatprep.ads +++ b/gcc/ada/gnatprep.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1998, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/gnatpsta.adb b/gcc/ada/gnatpsta.adb index a8d6195b59c9..12a38fcf6a83 100644 --- a/gcc/ada/gnatpsta.adb +++ b/gcc/ada/gnatpsta.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1997-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/gnatvsn.adb b/gcc/ada/gnatvsn.adb index 2555f7a570cd..ebada983ed8d 100644 --- a/gcc/ada/gnatvsn.adb +++ b/gcc/ada/gnatvsn.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/gnatvsn.ads b/gcc/ada/gnatvsn.ads index b15c10c403f6..a6b8371c31fe 100644 --- a/gcc/ada/gnatvsn.ads +++ b/gcc/ada/gnatvsn.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/gnatxref.adb b/gcc/ada/gnatxref.adb index 9e03e6cbd70b..3f688738fcb7 100644 --- a/gcc/ada/gnatxref.adb +++ b/gcc/ada/gnatxref.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1998-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/hlo.adb b/gcc/ada/hlo.adb index 35ae613a1f5b..ab9fda46dab7 100644 --- a/gcc/ada/hlo.adb +++ b/gcc/ada/hlo.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1998-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/hlo.ads b/gcc/ada/hlo.ads index 9daecfbe5e27..09a0c0f695b2 100644 --- a/gcc/ada/hlo.ads +++ b/gcc/ada/hlo.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1998 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/hostparm.ads b/gcc/ada/hostparm.ads index bfc030ffc34d..688dd0b6527a 100644 --- a/gcc/ada/hostparm.ads +++ b/gcc/ada/hostparm.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/i-c.adb b/gcc/ada/i-c.adb index 85f5f80b8221..65e40b297101 100644 --- a/gcc/ada/i-c.adb +++ b/gcc/ada/i-c.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/i-c.ads b/gcc/ada/i-c.ads index 509ad416705a..48b37656b727 100644 --- a/gcc/ada/i-c.ads +++ b/gcc/ada/i-c.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- This specification is adapted from the Ada Reference Manual for use with -- -- GNAT. In accordance with the copyright of that document, you can freely -- -- copy and modify this specification, provided that if you redistribute a -- diff --git a/gcc/ada/i-cexten.ads b/gcc/ada/i-cexten.ads index d3f40b65f9a3..e1203ff9c498 100644 --- a/gcc/ada/i-cexten.ads +++ b/gcc/ada/i-cexten.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992,1993,1994,1995 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/i-cobol.adb b/gcc/ada/i-cobol.adb index a542e427f498..b25028e9ec72 100644 --- a/gcc/ada/i-cobol.adb +++ b/gcc/ada/i-cobol.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/i-cobol.ads b/gcc/ada/i-cobol.ads index 47b734699b98..d6d7b1e58dc7 100644 --- a/gcc/ada/i-cobol.ads +++ b/gcc/ada/i-cobol.ads @@ -7,7 +7,6 @@ -- S p e c -- -- (ASCII Version) -- -- -- --- -- -- Copyright (C) 1993-2000 Free Software Foundation, Inc. -- -- -- -- This specification is derived from the Ada Reference Manual for use with -- diff --git a/gcc/ada/i-cpoint.adb b/gcc/ada/i-cpoint.adb index 1e0599df46f6..5f7891c13049 100644 --- a/gcc/ada/i-cpoint.adb +++ b/gcc/ada/i-cpoint.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/i-cpoint.ads b/gcc/ada/i-cpoint.ads index 70c8df2dfe2f..67c610c1bcd8 100644 --- a/gcc/ada/i-cpoint.ads +++ b/gcc/ada/i-cpoint.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1993-2000 Free Software Foundation, Inc. -- -- -- -- This specification is derived from the Ada Reference Manual for use with -- diff --git a/gcc/ada/i-cpp.adb b/gcc/ada/i-cpp.adb index 18a480824545..42ab384e18b3 100644 --- a/gcc/ada/i-cpp.adb +++ b/gcc/ada/i-cpp.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2002, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/i-cpp.ads b/gcc/ada/i-cpp.ads index fa6535d09c91..6372fb5db3ba 100644 --- a/gcc/ada/i-cpp.ads +++ b/gcc/ada/i-cpp.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2000, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/i-cstrea.adb b/gcc/ada/i-cstrea.adb index 2ad63890b96c..9d322d42906c 100644 --- a/gcc/ada/i-cstrea.adb +++ b/gcc/ada/i-cstrea.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1996-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/i-cstrea.ads b/gcc/ada/i-cstrea.ads index 66b289e2bf60..c62272983812 100644 --- a/gcc/ada/i-cstrea.ads +++ b/gcc/ada/i-cstrea.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1995-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/i-cstrin.adb b/gcc/ada/i-cstrin.adb index 0f1636182624..6849db2ee914 100644 --- a/gcc/ada/i-cstrin.adb +++ b/gcc/ada/i-cstrin.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/i-cstrin.ads b/gcc/ada/i-cstrin.ads index 163901cad375..9ec673c724af 100644 --- a/gcc/ada/i-cstrin.ads +++ b/gcc/ada/i-cstrin.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1993-2000 Free Software Foundation, Inc. -- -- -- -- This specification is derived from the Ada Reference Manual for use with -- diff --git a/gcc/ada/i-fortra.adb b/gcc/ada/i-fortra.adb index bbbfd360b2ba..fce1adbcdb2e 100644 --- a/gcc/ada/i-fortra.adb +++ b/gcc/ada/i-fortra.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992,1993,1994 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/i-fortra.ads b/gcc/ada/i-fortra.ads index 4b3dcc964855..817b5c749d2a 100644 --- a/gcc/ada/i-fortra.ads +++ b/gcc/ada/i-fortra.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- This specification is adapted from the Ada Reference Manual for use with -- -- GNAT. In accordance with the copyright of that document, you can freely -- -- copy and modify this specification, provided that if you redistribute a -- diff --git a/gcc/ada/i-os2err.ads b/gcc/ada/i-os2err.ads index d5aded39ab1c..ce3f70849a81 100644 --- a/gcc/ada/i-os2err.ads +++ b/gcc/ada/i-os2err.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1993,1994,1995 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/i-os2lib.adb b/gcc/ada/i-os2lib.adb index c123725a5b2d..c66a08e82ab3 100644 --- a/gcc/ada/i-os2lib.adb +++ b/gcc/ada/i-os2lib.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1993-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/i-os2lib.ads b/gcc/ada/i-os2lib.ads index 5a19a51c2232..302e0075e622 100644 --- a/gcc/ada/i-os2lib.ads +++ b/gcc/ada/i-os2lib.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1993-1997 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/i-os2syn.ads b/gcc/ada/i-os2syn.ads index 4c686d5da8ee..2f44c8916546 100644 --- a/gcc/ada/i-os2syn.ads +++ b/gcc/ada/i-os2syn.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1993-1998 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/i-os2thr.ads b/gcc/ada/i-os2thr.ads index c4f2eccf81f9..7958a394f63e 100644 --- a/gcc/ada/i-os2thr.ads +++ b/gcc/ada/i-os2thr.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1993-1997 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/i-pacdec.adb b/gcc/ada/i-pacdec.adb index c0afc390283d..9d69790bc6cf 100644 --- a/gcc/ada/i-pacdec.adb +++ b/gcc/ada/i-pacdec.adb @@ -7,7 +7,6 @@ -- B o d y -- -- (Version for IBM Mainframe Packed Decimal Format) -- -- -- --- -- -- Copyright (C) 1992-2001, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/i-pacdec.ads b/gcc/ada/i-pacdec.ads index 165dca827b30..0cf952889a85 100644 --- a/gcc/ada/i-pacdec.ads +++ b/gcc/ada/i-pacdec.ads @@ -7,7 +7,6 @@ -- S p e c -- -- (Version for IBM Mainframe Packed Decimal Format) -- -- -- --- -- -- Copyright (C) 1992,1993,1994,1995 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/i-vxwork.ads b/gcc/ada/i-vxwork.ads index 6a534a250653..1ab458558a89 100644 --- a/gcc/ada/i-vxwork.ads +++ b/gcc/ada/i-vxwork.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1999 - 2002 Ada Core Technologies, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/impunit.adb b/gcc/ada/impunit.adb index 1c30177425fc..248d3d3d55f2 100644 --- a/gcc/ada/impunit.adb +++ b/gcc/ada/impunit.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 2000-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/impunit.ads b/gcc/ada/impunit.ads index a3252ae08fc5..02917ccd8d8d 100644 --- a/gcc/ada/impunit.ads +++ b/gcc/ada/impunit.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 2000 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/inline.adb b/gcc/ada/inline.adb index cb589dba37d6..2b2769069eb6 100644 --- a/gcc/ada/inline.adb +++ b/gcc/ada/inline.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/inline.ads b/gcc/ada/inline.ads index 2240abeeda4d..b414582ec0bc 100644 --- a/gcc/ada/inline.ads +++ b/gcc/ada/inline.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/interfac.ads b/gcc/ada/interfac.ads index b4be0dd88124..10ade18b73e7 100644 --- a/gcc/ada/interfac.ads +++ b/gcc/ada/interfac.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- This specification is adapted from the Ada Reference Manual for use with -- -- GNAT. In accordance with the copyright of that document, you can freely -- -- copy and modify this specification, provided that if you redistribute a -- diff --git a/gcc/ada/ioexcept.ads b/gcc/ada/ioexcept.ads index 32c26048beac..b534679ecb27 100644 --- a/gcc/ada/ioexcept.ads +++ b/gcc/ada/ioexcept.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- This specification is adapted from the Ada Reference Manual for use with -- -- GNAT. In accordance with the copyright of that document, you can freely -- -- copy and modify this specification, provided that if you redistribute a -- diff --git a/gcc/ada/itypes.adb b/gcc/ada/itypes.adb index ff0f035b02f1..7c9733475384 100644 --- a/gcc/ada/itypes.adb +++ b/gcc/ada/itypes.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2000 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/itypes.ads b/gcc/ada/itypes.ads index 2dc7cacc8baf..a2e25ed53192 100644 --- a/gcc/ada/itypes.ads +++ b/gcc/ada/itypes.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992,1993,1994,1995,1996 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/krunch.adb b/gcc/ada/krunch.adb index b9d0627ca9c9..da0929c49d48 100644 --- a/gcc/ada/krunch.adb +++ b/gcc/ada/krunch.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2000 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/krunch.ads b/gcc/ada/krunch.ads index 893f0a076ace..2cf94360ceec 100644 --- a/gcc/ada/krunch.ads +++ b/gcc/ada/krunch.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1997 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/layout.adb b/gcc/ada/layout.adb index a08d02e32a3d..0128bf267d34 100644 --- a/gcc/ada/layout.adb +++ b/gcc/ada/layout.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 2001-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/layout.ads b/gcc/ada/layout.ads index e14ac6b15f62..02d2a1394775 100644 --- a/gcc/ada/layout.ads +++ b/gcc/ada/layout.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 2000-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/lib-list.adb b/gcc/ada/lib-list.adb index 803c13f0309f..ccc667ea4993 100644 --- a/gcc/ada/lib-list.adb +++ b/gcc/ada/lib-list.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/lib-load.adb b/gcc/ada/lib-load.adb index ab0fab91984b..5943ffe1b798 100644 --- a/gcc/ada/lib-load.adb +++ b/gcc/ada/lib-load.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/lib-load.ads b/gcc/ada/lib-load.ads index e676ed1d6a57..0d8c9d824b0b 100644 --- a/gcc/ada/lib-load.ads +++ b/gcc/ada/lib-load.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2001, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/lib-sort.adb b/gcc/ada/lib-sort.adb index 42352e04bfc2..d8b6d71a3b47 100644 --- a/gcc/ada/lib-sort.adb +++ b/gcc/ada/lib-sort.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992,1993,1994,1995,1996 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/lib-util.adb b/gcc/ada/lib-util.adb index baf23a635ee2..0ff2c1d123b7 100644 --- a/gcc/ada/lib-util.adb +++ b/gcc/ada/lib-util.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/lib-util.ads b/gcc/ada/lib-util.ads index cf24f5b99dc1..ecb690f72069 100644 --- a/gcc/ada/lib-util.ads +++ b/gcc/ada/lib-util.ads @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/lib-writ.adb b/gcc/ada/lib-writ.adb index 9c0b4ad250e5..254fa7111288 100644 --- a/gcc/ada/lib-writ.adb +++ b/gcc/ada/lib-writ.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/lib-writ.ads b/gcc/ada/lib-writ.ads index 6fd48528b34e..a2ec16a238a8 100644 --- a/gcc/ada/lib-writ.ads +++ b/gcc/ada/lib-writ.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/lib-xref.adb b/gcc/ada/lib-xref.adb index 1a27736ba4cf..dd1e61cbd3f9 100644 --- a/gcc/ada/lib-xref.adb +++ b/gcc/ada/lib-xref.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1998-2002, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/lib-xref.ads b/gcc/ada/lib-xref.ads index 222a7786e2cb..6f9ded363ffb 100644 --- a/gcc/ada/lib-xref.ads +++ b/gcc/ada/lib-xref.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1998-2002, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/lib.adb b/gcc/ada/lib.adb index abfeb362c0b7..b58fa7e78c93 100644 --- a/gcc/ada/lib.adb +++ b/gcc/ada/lib.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/lib.ads b/gcc/ada/lib.ads index 62d6796470aa..2811749fc031 100644 --- a/gcc/ada/lib.ads +++ b/gcc/ada/lib.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/live.adb b/gcc/ada/live.adb index 9d0dfbe2a9c2..51a58f635ab9 100644 --- a/gcc/ada/live.adb +++ b/gcc/ada/live.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 2000-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/live.ads b/gcc/ada/live.ads index b73cc637dbca..6dec6e3eb048 100644 --- a/gcc/ada/live.ads +++ b/gcc/ada/live.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 2000 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/machcode.ads b/gcc/ada/machcode.ads index 8a29920e6aad..b920d8196a3e 100644 --- a/gcc/ada/machcode.ads +++ b/gcc/ada/machcode.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- This specification is adapted from the Ada Reference Manual for use with -- -- GNAT. In accordance with the copyright of that document, you can freely -- -- copy and modify this specification, provided that if you redistribute a -- diff --git a/gcc/ada/make.adb b/gcc/ada/make.adb index 07791f447748..2408a8790124 100644 --- a/gcc/ada/make.adb +++ b/gcc/ada/make.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/make.ads b/gcc/ada/make.ads index 2ee06f435c53..ea586e2dcd22 100644 --- a/gcc/ada/make.ads +++ b/gcc/ada/make.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/makeusg.adb b/gcc/ada/makeusg.adb index 8ef255a36908..edacc2d508e6 100644 --- a/gcc/ada/makeusg.adb +++ b/gcc/ada/makeusg.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/makeusg.ads b/gcc/ada/makeusg.ads index 97e0b5330b08..b0209bbd6e9f 100644 --- a/gcc/ada/makeusg.ads +++ b/gcc/ada/makeusg.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1998 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/math_lib.adb b/gcc/ada/math_lib.adb index f6d01d8e017b..64fed359913e 100644 --- a/gcc/ada/math_lib.adb +++ b/gcc/ada/math_lib.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2000 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/mdll-fil.adb b/gcc/ada/mdll-fil.adb index b9c506a5b2f1..1c9c9ff23c80 100644 --- a/gcc/ada/mdll-fil.adb +++ b/gcc/ada/mdll-fil.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/mdll-fil.ads b/gcc/ada/mdll-fil.ads index 70a4f2bf7cda..06e6188b4c55 100644 --- a/gcc/ada/mdll-fil.ads +++ b/gcc/ada/mdll-fil.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/mdll-utl.adb b/gcc/ada/mdll-utl.adb index f680aefb39cd..c7fb1554866c 100644 --- a/gcc/ada/mdll-utl.adb +++ b/gcc/ada/mdll-utl.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/mdll-utl.ads b/gcc/ada/mdll-utl.ads index 24042f287496..55a70def4222 100644 --- a/gcc/ada/mdll-utl.ads +++ b/gcc/ada/mdll-utl.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/mdll.adb b/gcc/ada/mdll.adb index f33f49940d75..b542eeef2a94 100644 --- a/gcc/ada/mdll.adb +++ b/gcc/ada/mdll.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/mdll.ads b/gcc/ada/mdll.ads index 3c40b1f4d394..5ca9f01a70e1 100644 --- a/gcc/ada/mdll.ads +++ b/gcc/ada/mdll.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/memroot.adb b/gcc/ada/memroot.adb index 1fa7211e7673..2779476a1608 100644 --- a/gcc/ada/memroot.adb +++ b/gcc/ada/memroot.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1997-2002 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/memroot.ads b/gcc/ada/memroot.ads index 5df16ad55eb7..033991096576 100644 --- a/gcc/ada/memroot.ads +++ b/gcc/ada/memroot.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1997-2001 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/memtrack.adb b/gcc/ada/memtrack.adb index 4ab9d3a9c9e7..f23f76c3eeec 100644 --- a/gcc/ada/memtrack.adb +++ b/gcc/ada/memtrack.adb @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 2001 Free Software Foundation, Inc. -- -- -- -- This specification is derived from the Ada Reference Manual for use with -- diff --git a/gcc/ada/mlib-fil.adb b/gcc/ada/mlib-fil.adb index 1a232cab018a..83c59f25e90a 100644 --- a/gcc/ada/mlib-fil.adb +++ b/gcc/ada/mlib-fil.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 2001, Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/mlib-fil.ads b/gcc/ada/mlib-fil.ads index 12e946adc67a..04e529907e35 100644 --- a/gcc/ada/mlib-fil.ads +++ b/gcc/ada/mlib-fil.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 2001, Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/mlib-prj.adb b/gcc/ada/mlib-prj.adb index ea8dfb75da0d..92d93adb6e4f 100644 --- a/gcc/ada/mlib-prj.adb +++ b/gcc/ada/mlib-prj.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 2001, Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/mlib-prj.ads b/gcc/ada/mlib-prj.ads index 6db0ddc886bd..c6d8d8fddd32 100644 --- a/gcc/ada/mlib-prj.ads +++ b/gcc/ada/mlib-prj.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 2001, Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/mlib-tgt.adb b/gcc/ada/mlib-tgt.adb index 00fabbd4bfad..c5ec4fa59e89 100644 --- a/gcc/ada/mlib-tgt.adb +++ b/gcc/ada/mlib-tgt.adb @@ -7,7 +7,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 2001, Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/mlib-tgt.ads b/gcc/ada/mlib-tgt.ads index f1de7e3e7909..a84a989946ea 100644 --- a/gcc/ada/mlib-tgt.ads +++ b/gcc/ada/mlib-tgt.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 2001, Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/mlib-utl.adb b/gcc/ada/mlib-utl.adb index 7b5fa0283fe5..06ef897d0699 100644 --- a/gcc/ada/mlib-utl.adb +++ b/gcc/ada/mlib-utl.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 2002, Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/mlib-utl.ads b/gcc/ada/mlib-utl.ads index 72106a4eea66..41bf3de3c15c 100644 --- a/gcc/ada/mlib-utl.ads +++ b/gcc/ada/mlib-utl.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 2001-2002, Ada Core Technologies, Inc -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/mlib.adb b/gcc/ada/mlib.adb index 801181c72f28..1b2997fadc61 100644 --- a/gcc/ada/mlib.adb +++ b/gcc/ada/mlib.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1999-2001, Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/mlib.ads b/gcc/ada/mlib.ads index 6e52a7d2a276..396c0fbed1c5 100644 --- a/gcc/ada/mlib.ads +++ b/gcc/ada/mlib.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1999-2001, Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/namet.adb b/gcc/ada/namet.adb index fac2a94fca0d..22f3634b9743 100644 --- a/gcc/ada/namet.adb +++ b/gcc/ada/namet.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/namet.ads b/gcc/ada/namet.ads index e14fc2677746..092be4a7cc1e 100644 --- a/gcc/ada/namet.ads +++ b/gcc/ada/namet.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/nlists.adb b/gcc/ada/nlists.adb index 10065a973881..7a2d2fd407b4 100644 --- a/gcc/ada/nlists.adb +++ b/gcc/ada/nlists.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/nlists.ads b/gcc/ada/nlists.ads index f2355e35a2ae..2e89ff4ceb96 100644 --- a/gcc/ada/nlists.ads +++ b/gcc/ada/nlists.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2000 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/opt.adb b/gcc/ada/opt.adb index f0567729fb32..777b808d781d 100644 --- a/gcc/ada/opt.adb +++ b/gcc/ada/opt.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/opt.ads b/gcc/ada/opt.ads index c0b1b050f84c..83601c4c09fc 100644 --- a/gcc/ada/opt.ads +++ b/gcc/ada/opt.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2002, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/osint-b.adb b/gcc/ada/osint-b.adb index cebdc97ec48b..fc4941e95678 100644 --- a/gcc/ada/osint-b.adb +++ b/gcc/ada/osint-b.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/osint-b.ads b/gcc/ada/osint-b.ads index ea03764ffcdc..807082f5c055 100644 --- a/gcc/ada/osint-b.ads +++ b/gcc/ada/osint-b.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/osint-c.adb b/gcc/ada/osint-c.adb index 3eb6e0bcd3af..c7fd69569fa6 100644 --- a/gcc/ada/osint-c.adb +++ b/gcc/ada/osint-c.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/osint-c.ads b/gcc/ada/osint-c.ads index 78170d6ac9c9..62dac396dc25 100644 --- a/gcc/ada/osint-c.ads +++ b/gcc/ada/osint-c.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/osint-l.adb b/gcc/ada/osint-l.adb index adf4d5074d56..dd63e0e795da 100644 --- a/gcc/ada/osint-l.adb +++ b/gcc/ada/osint-l.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/osint-l.ads b/gcc/ada/osint-l.ads index 915d59dd10b1..f5c5accf293f 100644 --- a/gcc/ada/osint-l.ads +++ b/gcc/ada/osint-l.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/osint-m.adb b/gcc/ada/osint-m.adb index 1c77dc89def2..e0ea4d61713b 100644 --- a/gcc/ada/osint-m.adb +++ b/gcc/ada/osint-m.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/osint-m.ads b/gcc/ada/osint-m.ads index e904442a11b0..e4056ac62947 100644 --- a/gcc/ada/osint-m.ads +++ b/gcc/ada/osint-m.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/osint.adb b/gcc/ada/osint.adb index 8980fa9b5b20..5d90b1dd549d 100644 --- a/gcc/ada/osint.adb +++ b/gcc/ada/osint.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/osint.ads b/gcc/ada/osint.ads index e637b5ee3a3d..21505efdf144 100644 --- a/gcc/ada/osint.ads +++ b/gcc/ada/osint.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/output.adb b/gcc/ada/output.adb index 7ab1573dd56d..78f80f45c6fe 100644 --- a/gcc/ada/output.adb +++ b/gcc/ada/output.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/output.ads b/gcc/ada/output.ads index 2ade9b2d2b33..a62a5d19dbe0 100644 --- a/gcc/ada/output.ads +++ b/gcc/ada/output.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/par-ch10.adb b/gcc/ada/par-ch10.adb index 0f52757dd6b2..866feedd91ff 100644 --- a/gcc/ada/par-ch10.adb +++ b/gcc/ada/par-ch10.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/par-ch11.adb b/gcc/ada/par-ch11.adb index 53560050cff9..c475cc470a84 100644 --- a/gcc/ada/par-ch11.adb +++ b/gcc/ada/par-ch11.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/par-ch12.adb b/gcc/ada/par-ch12.adb index 88b20b7f4470..2b9adaf73ae4 100644 --- a/gcc/ada/par-ch12.adb +++ b/gcc/ada/par-ch12.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/par-ch13.adb b/gcc/ada/par-ch13.adb index 524bd0997498..cfcc3807fc09 100644 --- a/gcc/ada/par-ch13.adb +++ b/gcc/ada/par-ch13.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/par-ch2.adb b/gcc/ada/par-ch2.adb index 0c960ffedadd..ed96a7275b2d 100644 --- a/gcc/ada/par-ch2.adb +++ b/gcc/ada/par-ch2.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/par-ch3.adb b/gcc/ada/par-ch3.adb index bce40721c454..983ca8fe8882 100644 --- a/gcc/ada/par-ch3.adb +++ b/gcc/ada/par-ch3.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2002, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/par-ch4.adb b/gcc/ada/par-ch4.adb index f05390b332f1..c9244a2c3540 100644 --- a/gcc/ada/par-ch4.adb +++ b/gcc/ada/par-ch4.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/par-ch5.adb b/gcc/ada/par-ch5.adb index 3d3341546f43..e201d02b29df 100644 --- a/gcc/ada/par-ch5.adb +++ b/gcc/ada/par-ch5.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/par-ch6.adb b/gcc/ada/par-ch6.adb index 08c22582ca8a..52ccea85d225 100644 --- a/gcc/ada/par-ch6.adb +++ b/gcc/ada/par-ch6.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/par-ch7.adb b/gcc/ada/par-ch7.adb index f1a367761a39..4363a649f14f 100644 --- a/gcc/ada/par-ch7.adb +++ b/gcc/ada/par-ch7.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/par-ch8.adb b/gcc/ada/par-ch8.adb index 3f5186fa7395..5b1cd0a8f6f0 100644 --- a/gcc/ada/par-ch8.adb +++ b/gcc/ada/par-ch8.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/par-ch9.adb b/gcc/ada/par-ch9.adb index b9afa9495865..f80aadd2f611 100644 --- a/gcc/ada/par-ch9.adb +++ b/gcc/ada/par-ch9.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/par-endh.adb b/gcc/ada/par-endh.adb index 18eb6cac9a61..57561aab673e 100644 --- a/gcc/ada/par-endh.adb +++ b/gcc/ada/par-endh.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/par-labl.adb b/gcc/ada/par-labl.adb index 4f8bcd851019..f3fa8f5292d4 100644 --- a/gcc/ada/par-labl.adb +++ b/gcc/ada/par-labl.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1998, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/par-load.adb b/gcc/ada/par-load.adb index c09b47cf98e8..2b5e5cf9cfb3 100644 --- a/gcc/ada/par-load.adb +++ b/gcc/ada/par-load.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/par-prag.adb b/gcc/ada/par-prag.adb index 4184e0d71501..927664ad5a2b 100644 --- a/gcc/ada/par-prag.adb +++ b/gcc/ada/par-prag.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/par-sync.adb b/gcc/ada/par-sync.adb index 0e6417ab7e1c..a9646b0f7c36 100644 --- a/gcc/ada/par-sync.adb +++ b/gcc/ada/par-sync.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/par-tchk.adb b/gcc/ada/par-tchk.adb index 7cc850f034d5..cff60de50006 100644 --- a/gcc/ada/par-tchk.adb +++ b/gcc/ada/par-tchk.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/par-util.adb b/gcc/ada/par-util.adb index e21caaa92c67..3782ae62222f 100644 --- a/gcc/ada/par-util.adb +++ b/gcc/ada/par-util.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001, Free Software Foundation, Inc. -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/par.adb b/gcc/ada/par.adb index 96309e09b8a3..412759e80bf2 100644 --- a/gcc/ada/par.adb +++ b/gcc/ada/par.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/par.ads b/gcc/ada/par.ads index 2f057d10ca50..7c5ee0879c58 100644 --- a/gcc/ada/par.ads +++ b/gcc/ada/par.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992,1993,1994,1995 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/prj-attr.adb b/gcc/ada/prj-attr.adb index ade0b618f0fb..a7a0125dd0c0 100644 --- a/gcc/ada/prj-attr.adb +++ b/gcc/ada/prj-attr.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 2001-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/prj-attr.ads b/gcc/ada/prj-attr.ads index c30047403487..c19061f36f31 100644 --- a/gcc/ada/prj-attr.ads +++ b/gcc/ada/prj-attr.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/prj-com.adb b/gcc/ada/prj-com.adb index 7d867067bb1c..5c37b185bd42 100644 --- a/gcc/ada/prj-com.adb +++ b/gcc/ada/prj-com.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 2000 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/prj-com.ads b/gcc/ada/prj-com.ads index fe86c6649cc0..98baa446bbda 100644 --- a/gcc/ada/prj-com.ads +++ b/gcc/ada/prj-com.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2000 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/prj-dect.adb b/gcc/ada/prj-dect.adb index ca5f5483ab62..37513fe986bc 100644 --- a/gcc/ada/prj-dect.adb +++ b/gcc/ada/prj-dect.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 2001-2002 Free Software Foundation, Inc -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/prj-dect.ads b/gcc/ada/prj-dect.ads index 88eca538db6e..fdf8e94a3783 100644 --- a/gcc/ada/prj-dect.ads +++ b/gcc/ada/prj-dect.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/prj-env.adb b/gcc/ada/prj-env.adb index 392702196c0b..3faf0814b3ee 100644 --- a/gcc/ada/prj-env.adb +++ b/gcc/ada/prj-env.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 2001-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/prj-env.ads b/gcc/ada/prj-env.ads index 22357d17d6f5..ffcc39e4a239 100644 --- a/gcc/ada/prj-env.ads +++ b/gcc/ada/prj-env.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 2001-2002 Free Software Foundation, Inc -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/prj-ext.adb b/gcc/ada/prj-ext.adb index 424ab3201b77..0f9939b32199 100644 --- a/gcc/ada/prj-ext.adb +++ b/gcc/ada/prj-ext.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 2000 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/prj-ext.ads b/gcc/ada/prj-ext.ads index 4bb6b57405a7..f234ea0f5e64 100644 --- a/gcc/ada/prj-ext.ads +++ b/gcc/ada/prj-ext.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 2000 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/prj-makr.adb b/gcc/ada/prj-makr.adb index 850d3eaa7ab9..8278910825ef 100644 --- a/gcc/ada/prj-makr.adb +++ b/gcc/ada/prj-makr.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 2001-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/prj-makr.ads b/gcc/ada/prj-makr.ads index 7c0b09d4fc5f..868e9a918760 100644 --- a/gcc/ada/prj-makr.ads +++ b/gcc/ada/prj-makr.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 2001-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/prj-nmsc.adb b/gcc/ada/prj-nmsc.adb index 1162d4c037f0..38e5c579a47f 100644 --- a/gcc/ada/prj-nmsc.adb +++ b/gcc/ada/prj-nmsc.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 2000-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/prj-nmsc.ads b/gcc/ada/prj-nmsc.ads index 0d6efba316dc..33f380941396 100644 --- a/gcc/ada/prj-nmsc.ads +++ b/gcc/ada/prj-nmsc.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 2000-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/prj-pars.adb b/gcc/ada/prj-pars.adb index 8f7e40409a4a..426be05e6de7 100644 --- a/gcc/ada/prj-pars.adb +++ b/gcc/ada/prj-pars.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/prj-pars.ads b/gcc/ada/prj-pars.ads index 8b6889b11a3e..a928d3a5e297 100644 --- a/gcc/ada/prj-pars.ads +++ b/gcc/ada/prj-pars.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 2000-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/prj-part.adb b/gcc/ada/prj-part.adb index 360c6052811b..114f18539b16 100644 --- a/gcc/ada/prj-part.adb +++ b/gcc/ada/prj-part.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 2001-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/prj-part.ads b/gcc/ada/prj-part.ads index daa90ddc5105..c84e61275cae 100644 --- a/gcc/ada/prj-part.ads +++ b/gcc/ada/prj-part.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 2000-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/prj-pp.adb b/gcc/ada/prj-pp.adb index b90ba3e0c8d3..a6c243dece32 100644 --- a/gcc/ada/prj-pp.adb +++ b/gcc/ada/prj-pp.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 2001-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/prj-pp.ads b/gcc/ada/prj-pp.ads index 7d82b42289dd..b43c9a3498ae 100644 --- a/gcc/ada/prj-pp.ads +++ b/gcc/ada/prj-pp.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/prj-proc.adb b/gcc/ada/prj-proc.adb index ec7a0fa9ddf2..8ad23289b311 100644 --- a/gcc/ada/prj-proc.adb +++ b/gcc/ada/prj-proc.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 2001-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/prj-proc.ads b/gcc/ada/prj-proc.ads index bda95ca353cb..74845c3fe5a5 100644 --- a/gcc/ada/prj-proc.ads +++ b/gcc/ada/prj-proc.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/prj-strt.adb b/gcc/ada/prj-strt.adb index d6c89ab6fa54..0fda16feceb3 100644 --- a/gcc/ada/prj-strt.adb +++ b/gcc/ada/prj-strt.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 2001-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/prj-strt.ads b/gcc/ada/prj-strt.ads index 2800c4a62732..17b267c24a64 100644 --- a/gcc/ada/prj-strt.ads +++ b/gcc/ada/prj-strt.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/prj-tree.adb b/gcc/ada/prj-tree.adb index 9bfa70e4993d..a7cff09c2361 100644 --- a/gcc/ada/prj-tree.adb +++ b/gcc/ada/prj-tree.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/prj-tree.ads b/gcc/ada/prj-tree.ads index 309bf3d50880..e4c76fd91589 100644 --- a/gcc/ada/prj-tree.ads +++ b/gcc/ada/prj-tree.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/prj-util.adb b/gcc/ada/prj-util.adb index 02aa6b4487d9..15d7360c2a4f 100644 --- a/gcc/ada/prj-util.adb +++ b/gcc/ada/prj-util.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/prj-util.ads b/gcc/ada/prj-util.ads index b8095d87acf0..4f1f64d7ad73 100644 --- a/gcc/ada/prj-util.ads +++ b/gcc/ada/prj-util.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/prj.adb b/gcc/ada/prj.adb index fa642434239c..6a2c553bd277 100644 --- a/gcc/ada/prj.adb +++ b/gcc/ada/prj.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/prj.ads b/gcc/ada/prj.ads index 9bb3eb298f3e..3ac425ffacec 100644 --- a/gcc/ada/prj.ads +++ b/gcc/ada/prj.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 2001-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/repinfo.adb b/gcc/ada/repinfo.adb index 602585ca2644..f7315dbf242e 100644 --- a/gcc/ada/repinfo.adb +++ b/gcc/ada/repinfo.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1999-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/repinfo.ads b/gcc/ada/repinfo.ads index ee6ab65a5e37..02676dc305a7 100644 --- a/gcc/ada/repinfo.ads +++ b/gcc/ada/repinfo.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1999-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/restrict.adb b/gcc/ada/restrict.adb index 1893b7c6e029..06f0f9b3d9cb 100644 --- a/gcc/ada/restrict.adb +++ b/gcc/ada/restrict.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/restrict.ads b/gcc/ada/restrict.ads index f5d1b6db1165..6cbdb17790da 100644 --- a/gcc/ada/restrict.ads +++ b/gcc/ada/restrict.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/rident.ads b/gcc/ada/rident.ads index 24dbbbfe2a8f..c82c0fb8d4b4 100644 --- a/gcc/ada/rident.ads +++ b/gcc/ada/rident.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/rtsfind.adb b/gcc/ada/rtsfind.adb index f49b552b3bcc..b4876838eb13 100644 --- a/gcc/ada/rtsfind.adb +++ b/gcc/ada/rtsfind.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2002, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/rtsfind.ads b/gcc/ada/rtsfind.ads index 4b2c7aaf7f9b..8e675c551223 100644 --- a/gcc/ada/rtsfind.ads +++ b/gcc/ada/rtsfind.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2001, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-addima.adb b/gcc/ada/s-addima.adb index 8ec5bc110259..2df6dbd1e4d8 100644 --- a/gcc/ada/s-addima.adb +++ b/gcc/ada/s-addima.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992,1993,1994,1995,1996 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-addima.ads b/gcc/ada/s-addima.ads index b9fe527be6a3..ccc299104bbd 100644 --- a/gcc/ada/s-addima.ads +++ b/gcc/ada/s-addima.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2000 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-arit64.adb b/gcc/ada/s-arit64.adb index 0ee5e7f1be1d..6d2790f19593 100644 --- a/gcc/ada/s-arit64.adb +++ b/gcc/ada/s-arit64.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-arit64.ads b/gcc/ada/s-arit64.ads index 0ca3c254fa81..767c145b9d1f 100644 --- a/gcc/ada/s-arit64.ads +++ b/gcc/ada/s-arit64.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1994,1995,1996 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-assert.adb b/gcc/ada/s-assert.adb index 49c69edb1849..09afe0d5e3c6 100644 --- a/gcc/ada/s-assert.adb +++ b/gcc/ada/s-assert.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1997 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-assert.ads b/gcc/ada/s-assert.ads index 8ae4c15864ad..e51663c79cb0 100644 --- a/gcc/ada/s-assert.ads +++ b/gcc/ada/s-assert.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1998 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-asthan.adb b/gcc/ada/s-asthan.adb index 7718f21f7d4c..c6996da4e62f 100644 --- a/gcc/ada/s-asthan.adb +++ b/gcc/ada/s-asthan.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1996-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-asthan.ads b/gcc/ada/s-asthan.ads index 70f0575a22bd..31b3ca3d7c41 100644 --- a/gcc/ada/s-asthan.ads +++ b/gcc/ada/s-asthan.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1996 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-atacco.adb b/gcc/ada/s-atacco.adb index 97d96158a097..a249901613c4 100644 --- a/gcc/ada/s-atacco.adb +++ b/gcc/ada/s-atacco.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-atacco.ads b/gcc/ada/s-atacco.ads index 2921c9bf8a94..815a731245e5 100644 --- a/gcc/ada/s-atacco.ads +++ b/gcc/ada/s-atacco.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- This specification is derived from the Ada Reference Manual for use with -- diff --git a/gcc/ada/s-auxdec.adb b/gcc/ada/s-auxdec.adb index b94ee1f6914b..d29ff62172b5 100644 --- a/gcc/ada/s-auxdec.adb +++ b/gcc/ada/s-auxdec.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/Or modify it under -- diff --git a/gcc/ada/s-auxdec.ads b/gcc/ada/s-auxdec.ads index f9529f1fc63a..1a602843d1a0 100644 --- a/gcc/ada/s-auxdec.ads +++ b/gcc/ada/s-auxdec.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1996-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-bitops.adb b/gcc/ada/s-bitops.adb index 370d462abb56..2ec4c3e733fa 100644 --- a/gcc/ada/s-bitops.adb +++ b/gcc/ada/s-bitops.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1996-2000 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-bitops.ads b/gcc/ada/s-bitops.ads index a6eb80a406c7..5f4ed397de25 100644 --- a/gcc/ada/s-bitops.ads +++ b/gcc/ada/s-bitops.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1999, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-chepoo.ads b/gcc/ada/s-chepoo.ads index 85d3b1ff7d0b..0a7871a1c392 100644 --- a/gcc/ada/s-chepoo.ads +++ b/gcc/ada/s-chepoo.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992,1993,1994,1995,1996 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-crc32.adb b/gcc/ada/s-crc32.adb index df8e059cb058..6f7b5050041f 100644 --- a/gcc/ada/s-crc32.adb +++ b/gcc/ada/s-crc32.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-crc32.ads b/gcc/ada/s-crc32.ads index e1ba6862d83e..0acf0f96061e 100644 --- a/gcc/ada/s-crc32.ads +++ b/gcc/ada/s-crc32.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-direio.adb b/gcc/ada/s-direio.adb index 01feeaef9372..46a4eace2ddc 100644 --- a/gcc/ada/s-direio.adb +++ b/gcc/ada/s-direio.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-direio.ads b/gcc/ada/s-direio.ads index 60ed827d62de..fd61fc495743 100644 --- a/gcc/ada/s-direio.ads +++ b/gcc/ada/s-direio.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992,1993,1994,1995,1996 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-errrep.adb b/gcc/ada/s-errrep.adb index a9ec887be3c9..02e59cec48fb 100644 --- a/gcc/ada/s-errrep.adb +++ b/gcc/ada/s-errrep.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1991-2000 Florida State University -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-errrep.ads b/gcc/ada/s-errrep.ads index 1c5ddb9e7ecb..daba34e91052 100644 --- a/gcc/ada/s-errrep.ads +++ b/gcc/ada/s-errrep.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1991-1998 Florida State University -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-except.ads b/gcc/ada/s-except.ads index a1f48e15edba..d7b7f6d2415f 100644 --- a/gcc/ada/s-except.ads +++ b/gcc/ada/s-except.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2000 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-exctab.adb b/gcc/ada/s-exctab.adb index 4800009f720e..de9e9bdeadb9 100644 --- a/gcc/ada/s-exctab.adb +++ b/gcc/ada/s-exctab.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1996-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-exctab.ads b/gcc/ada/s-exctab.ads index d61aaf252930..10789dca8254 100644 --- a/gcc/ada/s-exctab.ads +++ b/gcc/ada/s-exctab.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1996-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-exnflt.ads b/gcc/ada/s-exnflt.ads index 952d5946e676..968dac485451 100644 --- a/gcc/ada/s-exnflt.ads +++ b/gcc/ada/s-exnflt.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992,1993,1994 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-exngen.adb b/gcc/ada/s-exngen.adb index 40fda2614214..247a65b7ecdb 100644 --- a/gcc/ada/s-exngen.adb +++ b/gcc/ada/s-exngen.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-exngen.ads b/gcc/ada/s-exngen.ads index 3099aea84581..fabdf491a334 100644 --- a/gcc/ada/s-exngen.ads +++ b/gcc/ada/s-exngen.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992,1993,1994,1995 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-exnint.ads b/gcc/ada/s-exnint.ads index 2cd993d54807..c2f3fea8e1c6 100644 --- a/gcc/ada/s-exnint.ads +++ b/gcc/ada/s-exnint.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992,1993 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-exnlfl.ads b/gcc/ada/s-exnlfl.ads index 30ca2f075907..7ede56d2ca03 100644 --- a/gcc/ada/s-exnlfl.ads +++ b/gcc/ada/s-exnlfl.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992,1993,1994 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-exnlin.ads b/gcc/ada/s-exnlin.ads index 5598ed78a3f1..aa249087308d 100644 --- a/gcc/ada/s-exnlin.ads +++ b/gcc/ada/s-exnlin.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992,1993,1994 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-exnllf.ads b/gcc/ada/s-exnllf.ads index fbd316281bae..20a91d3fb227 100644 --- a/gcc/ada/s-exnllf.ads +++ b/gcc/ada/s-exnllf.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992,1993,1994 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-exnlli.ads b/gcc/ada/s-exnlli.ads index a2e8a8401580..b583bda70086 100644 --- a/gcc/ada/s-exnlli.ads +++ b/gcc/ada/s-exnlli.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992,1993 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-exnsfl.ads b/gcc/ada/s-exnsfl.ads index 0ee35232d389..012d78542239 100644 --- a/gcc/ada/s-exnsfl.ads +++ b/gcc/ada/s-exnsfl.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992,1993,1994 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-exnsin.ads b/gcc/ada/s-exnsin.ads index a26ef3539074..55ea294c2fc8 100644 --- a/gcc/ada/s-exnsin.ads +++ b/gcc/ada/s-exnsin.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992,1993,1994 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-exnssi.ads b/gcc/ada/s-exnssi.ads index ed65b3436f44..61cb5a88299d 100644 --- a/gcc/ada/s-exnssi.ads +++ b/gcc/ada/s-exnssi.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992,1993,1994 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-expflt.ads b/gcc/ada/s-expflt.ads index c579ee036f1f..ff5febd52164 100644 --- a/gcc/ada/s-expflt.ads +++ b/gcc/ada/s-expflt.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992,1993,1994 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-expgen.adb b/gcc/ada/s-expgen.adb index aa3269e300e9..dea4340be409 100644 --- a/gcc/ada/s-expgen.adb +++ b/gcc/ada/s-expgen.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-expgen.ads b/gcc/ada/s-expgen.ads index 3f203571975d..6209abff8a7e 100644 --- a/gcc/ada/s-expgen.ads +++ b/gcc/ada/s-expgen.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992,1993,1994,1995 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-expint.ads b/gcc/ada/s-expint.ads index badda4fd9bfe..7c81a060e2a5 100644 --- a/gcc/ada/s-expint.ads +++ b/gcc/ada/s-expint.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992,1993 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-explfl.ads b/gcc/ada/s-explfl.ads index eff09973a30d..5ff8bbfc8af9 100644 --- a/gcc/ada/s-explfl.ads +++ b/gcc/ada/s-explfl.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992,1993,1994 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-explin.ads b/gcc/ada/s-explin.ads index 9b1d0cd54d72..aa1a442c52ff 100644 --- a/gcc/ada/s-explin.ads +++ b/gcc/ada/s-explin.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992,1993,1994 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-expllf.ads b/gcc/ada/s-expllf.ads index 124d284aaedd..8b91ce23f1a4 100644 --- a/gcc/ada/s-expllf.ads +++ b/gcc/ada/s-expllf.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992,1993,1994 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-explli.ads b/gcc/ada/s-explli.ads index c6c398e62f5f..0f7f46c36ecf 100644 --- a/gcc/ada/s-explli.ads +++ b/gcc/ada/s-explli.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992,1993 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-expllu.adb b/gcc/ada/s-expllu.adb index 17b911846012..84f2cff7f4a9 100644 --- a/gcc/ada/s-expllu.adb +++ b/gcc/ada/s-expllu.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992,1993,1994 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-expllu.ads b/gcc/ada/s-expllu.ads index 8ca64d4949e9..1d8d01df8673 100644 --- a/gcc/ada/s-expllu.ads +++ b/gcc/ada/s-expllu.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1997 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-expmod.adb b/gcc/ada/s-expmod.adb index e2c8c184a4b3..67c2bf148135 100644 --- a/gcc/ada/s-expmod.adb +++ b/gcc/ada/s-expmod.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992,1993,1994,1995 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-expmod.ads b/gcc/ada/s-expmod.ads index 00dabfaf9341..d485f15d5523 100644 --- a/gcc/ada/s-expmod.ads +++ b/gcc/ada/s-expmod.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992,1993,1994 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-expsfl.ads b/gcc/ada/s-expsfl.ads index e7d35e6e1e74..5e05d5708285 100644 --- a/gcc/ada/s-expsfl.ads +++ b/gcc/ada/s-expsfl.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992,1993,1994 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-expsin.ads b/gcc/ada/s-expsin.ads index a539f23627c6..b3baf54c636d 100644 --- a/gcc/ada/s-expsin.ads +++ b/gcc/ada/s-expsin.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992,1993,1994 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-expssi.ads b/gcc/ada/s-expssi.ads index 6acd83ee74b6..d570a9557c0a 100644 --- a/gcc/ada/s-expssi.ads +++ b/gcc/ada/s-expssi.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992,1993,1994 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-expuns.adb b/gcc/ada/s-expuns.adb index b52f1c351026..1b1987afcdef 100644 --- a/gcc/ada/s-expuns.adb +++ b/gcc/ada/s-expuns.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1997 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-expuns.ads b/gcc/ada/s-expuns.ads index f17ec4048c2a..7c5869ade31c 100644 --- a/gcc/ada/s-expuns.ads +++ b/gcc/ada/s-expuns.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1997 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-fatflt.ads b/gcc/ada/s-fatflt.ads index 17c31633b523..b69e7d0c25bd 100644 --- a/gcc/ada/s-fatflt.ads +++ b/gcc/ada/s-fatflt.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992,1993,1994,1995,1996 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-fatgen.adb b/gcc/ada/s-fatgen.adb index 3680fe387895..e3dcadc03d13 100644 --- a/gcc/ada/s-fatgen.adb +++ b/gcc/ada/s-fatgen.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-fatgen.ads b/gcc/ada/s-fatgen.ads index 0176a96d2f10..9db87e056b0e 100644 --- a/gcc/ada/s-fatgen.ads +++ b/gcc/ada/s-fatgen.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-fatlfl.ads b/gcc/ada/s-fatlfl.ads index 828733953d9e..452373c9775a 100644 --- a/gcc/ada/s-fatlfl.ads +++ b/gcc/ada/s-fatlfl.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992,1993,1994,1995,1996 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-fatllf.ads b/gcc/ada/s-fatllf.ads index 18950f95a5a2..a4b5e65ada75 100644 --- a/gcc/ada/s-fatllf.ads +++ b/gcc/ada/s-fatllf.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992,1993,1994,1995,1996 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-fatsfl.ads b/gcc/ada/s-fatsfl.ads index abcafdde3c03..6c4710a2c2d1 100644 --- a/gcc/ada/s-fatsfl.ads +++ b/gcc/ada/s-fatsfl.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992,1993,1994,1995,1996 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-ficobl.ads b/gcc/ada/s-ficobl.ads index be27354aed88..181755960d2d 100644 --- a/gcc/ada/s-ficobl.ads +++ b/gcc/ada/s-ficobl.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2000 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-fileio.adb b/gcc/ada/s-fileio.adb index 4ec66478fe37..dcac47f608ee 100644 --- a/gcc/ada/s-fileio.adb +++ b/gcc/ada/s-fileio.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-fileio.ads b/gcc/ada/s-fileio.ads index ac075c9620ba..54085186c66e 100644 --- a/gcc/ada/s-fileio.ads +++ b/gcc/ada/s-fileio.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2001, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-finimp.adb b/gcc/ada/s-finimp.adb index d7195dab665c..bc1a2f18e65d 100644 --- a/gcc/ada/s-finimp.adb +++ b/gcc/ada/s-finimp.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-finimp.ads b/gcc/ada/s-finimp.ads index 68dae998393e..2e959a238fd3 100644 --- a/gcc/ada/s-finimp.ads +++ b/gcc/ada/s-finimp.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1998 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-finroo.adb b/gcc/ada/s-finroo.adb index 4db5b38d5c39..15b7df0ed17e 100644 --- a/gcc/ada/s-finroo.adb +++ b/gcc/ada/s-finroo.adb @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-finroo.ads b/gcc/ada/s-finroo.ads index cdb0680cbec3..32ca1eece0f3 100644 --- a/gcc/ada/s-finroo.ads +++ b/gcc/ada/s-finroo.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2000 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-fore.adb b/gcc/ada/s-fore.adb index 6495f22222dd..4cde81ce1412 100644 --- a/gcc/ada/s-fore.adb +++ b/gcc/ada/s-fore.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992,1993,1994 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-fore.ads b/gcc/ada/s-fore.ads index 47e07d56d5fc..d2fe4a83d263 100644 --- a/gcc/ada/s-fore.ads +++ b/gcc/ada/s-fore.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992,1993,1994 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-gloloc.adb b/gcc/ada/s-gloloc.adb index b1fe1b3138bc..cd8b0ff2b36d 100644 --- a/gcc/ada/s-gloloc.adb +++ b/gcc/ada/s-gloloc.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1999-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-gloloc.ads b/gcc/ada/s-gloloc.ads index 82de44478530..99c57c600229 100644 --- a/gcc/ada/s-gloloc.ads +++ b/gcc/ada/s-gloloc.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1999-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-imgbiu.adb b/gcc/ada/s-imgbiu.adb index 83c24cad8d10..93f6e40ab4fc 100644 --- a/gcc/ada/s-imgbiu.adb +++ b/gcc/ada/s-imgbiu.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992,1993,1994,1995 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-imgbiu.ads b/gcc/ada/s-imgbiu.ads index d4f0007c9fcf..8093100fdb5f 100644 --- a/gcc/ada/s-imgbiu.ads +++ b/gcc/ada/s-imgbiu.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2000 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-imgboo.adb b/gcc/ada/s-imgboo.adb index eaf6bf865bde..eb65755dd191 100644 --- a/gcc/ada/s-imgboo.adb +++ b/gcc/ada/s-imgboo.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992,1993,1994 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-imgboo.ads b/gcc/ada/s-imgboo.ads index cbb8c9ae98c3..28ed13a1a409 100644 --- a/gcc/ada/s-imgboo.ads +++ b/gcc/ada/s-imgboo.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2000 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-imgcha.adb b/gcc/ada/s-imgcha.adb index ae0e06ee1f82..48f04d823527 100644 --- a/gcc/ada/s-imgcha.adb +++ b/gcc/ada/s-imgcha.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992,1993,1994,1995 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-imgcha.ads b/gcc/ada/s-imgcha.ads index cdb101783607..8721c140015e 100644 --- a/gcc/ada/s-imgcha.ads +++ b/gcc/ada/s-imgcha.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2000 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-imgdec.adb b/gcc/ada/s-imgdec.adb index aa9c7684e617..86a64b1ff72c 100644 --- a/gcc/ada/s-imgdec.adb +++ b/gcc/ada/s-imgdec.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-imgdec.ads b/gcc/ada/s-imgdec.ads index a41afd6e072f..f013e37e6dc2 100644 --- a/gcc/ada/s-imgdec.ads +++ b/gcc/ada/s-imgdec.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2000 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-imgenu.adb b/gcc/ada/s-imgenu.adb index 47ee29ea0d5c..17d8e74c6245 100644 --- a/gcc/ada/s-imgenu.adb +++ b/gcc/ada/s-imgenu.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 2000 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-imgenu.ads b/gcc/ada/s-imgenu.ads index 5fb164688c9b..9950cf6a76e9 100644 --- a/gcc/ada/s-imgenu.ads +++ b/gcc/ada/s-imgenu.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 2000 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-imgint.adb b/gcc/ada/s-imgint.adb index 88ecf79c3be9..94fdb3ace47b 100644 --- a/gcc/ada/s-imgint.adb +++ b/gcc/ada/s-imgint.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992,1993,1994 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-imgint.ads b/gcc/ada/s-imgint.ads index a36b6dce5897..b3a289f914ed 100644 --- a/gcc/ada/s-imgint.ads +++ b/gcc/ada/s-imgint.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2000 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-imgllb.adb b/gcc/ada/s-imgllb.adb index f0568ec62ee9..11193bebd41e 100644 --- a/gcc/ada/s-imgllb.adb +++ b/gcc/ada/s-imgllb.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992,1993,1994,1995 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-imgllb.ads b/gcc/ada/s-imgllb.ads index 6d8bcd2b4106..36b69d72cb54 100644 --- a/gcc/ada/s-imgllb.ads +++ b/gcc/ada/s-imgllb.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2000 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-imglld.adb b/gcc/ada/s-imglld.adb index b849800136d8..8c92b93e89ca 100644 --- a/gcc/ada/s-imglld.adb +++ b/gcc/ada/s-imglld.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992,1993,1994,1995,1996 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-imglld.ads b/gcc/ada/s-imglld.ads index 69b737e6ef43..33d9612fb46a 100644 --- a/gcc/ada/s-imglld.ads +++ b/gcc/ada/s-imglld.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2000 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-imglli.adb b/gcc/ada/s-imglli.adb index f5af2a77cb0d..cb1dc4feae0c 100644 --- a/gcc/ada/s-imglli.adb +++ b/gcc/ada/s-imglli.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992,1993,1994 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-imglli.ads b/gcc/ada/s-imglli.ads index 4d25bb2a2415..6b8898b27a52 100644 --- a/gcc/ada/s-imglli.ads +++ b/gcc/ada/s-imglli.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2000 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-imgllu.adb b/gcc/ada/s-imgllu.adb index cd79e5c82f60..f15dceda49f3 100644 --- a/gcc/ada/s-imgllu.adb +++ b/gcc/ada/s-imgllu.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992,1993,1994 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-imgllu.ads b/gcc/ada/s-imgllu.ads index 948b6f5e35b7..d9902b6ac51f 100644 --- a/gcc/ada/s-imgllu.ads +++ b/gcc/ada/s-imgllu.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2000 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-imgllw.adb b/gcc/ada/s-imgllw.adb index 17516fbf2b56..7266438287af 100644 --- a/gcc/ada/s-imgllw.adb +++ b/gcc/ada/s-imgllw.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992,1993,1994,1995 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-imgllw.ads b/gcc/ada/s-imgllw.ads index 675821bc425a..d15f05ff8fb2 100644 --- a/gcc/ada/s-imgllw.ads +++ b/gcc/ada/s-imgllw.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2000 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-imgrea.adb b/gcc/ada/s-imgrea.adb index 644e54e43849..89bbccef576a 100644 --- a/gcc/ada/s-imgrea.adb +++ b/gcc/ada/s-imgrea.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-imgrea.ads b/gcc/ada/s-imgrea.ads index 5180a5d69df0..71879bf70f4e 100644 --- a/gcc/ada/s-imgrea.ads +++ b/gcc/ada/s-imgrea.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2000 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-imguns.adb b/gcc/ada/s-imguns.adb index a434418c40cd..1fd8be83f130 100644 --- a/gcc/ada/s-imguns.adb +++ b/gcc/ada/s-imguns.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992,1993,1994 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-imguns.ads b/gcc/ada/s-imguns.ads index 2eeb56be9db1..2feb67605d8c 100644 --- a/gcc/ada/s-imguns.ads +++ b/gcc/ada/s-imguns.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2000 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-imgwch.adb b/gcc/ada/s-imgwch.adb index ef25ce9870e4..9765b6abf600 100644 --- a/gcc/ada/s-imgwch.adb +++ b/gcc/ada/s-imgwch.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1998, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-imgwch.ads b/gcc/ada/s-imgwch.ads index 8e7541c7100c..f6dc11fb477e 100644 --- a/gcc/ada/s-imgwch.ads +++ b/gcc/ada/s-imgwch.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2000 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-imgwiu.adb b/gcc/ada/s-imgwiu.adb index 0d507960de44..91fafa825d8b 100644 --- a/gcc/ada/s-imgwiu.adb +++ b/gcc/ada/s-imgwiu.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992,1993,1994,1995 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-imgwiu.ads b/gcc/ada/s-imgwiu.ads index 6ce6cdb1a9e2..8a4008554a77 100644 --- a/gcc/ada/s-imgwiu.ads +++ b/gcc/ada/s-imgwiu.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2000 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-inmaop.ads b/gcc/ada/s-inmaop.ads index 3722ff3435b0..42538f444d5c 100644 --- a/gcc/ada/s-inmaop.ads +++ b/gcc/ada/s-inmaop.ads @@ -7,7 +7,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1998, Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-interr.adb b/gcc/ada/s-interr.adb index 48a76dae4cc6..a0a1ad575523 100644 --- a/gcc/ada/s-interr.adb +++ b/gcc/ada/s-interr.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2002, Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-interr.ads b/gcc/ada/s-interr.ads index be4a16faa667..b91932162d5b 100644 --- a/gcc/ada/s-interr.ads +++ b/gcc/ada/s-interr.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-intman.ads b/gcc/ada/s-intman.ads index 1d758a5e3e0a..306df161741e 100644 --- a/gcc/ada/s-intman.ads +++ b/gcc/ada/s-intman.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1991-2001 Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-io.adb b/gcc/ada/s-io.adb index 157d42b72f9b..fdc8068fe855 100644 --- a/gcc/ada/s-io.adb +++ b/gcc/ada/s-io.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2000 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-io.ads b/gcc/ada/s-io.ads index 14d3773e5fae..e6432843d65f 100644 --- a/gcc/ada/s-io.ads +++ b/gcc/ada/s-io.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1998 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-maccod.ads b/gcc/ada/s-maccod.ads index 8f66ffdbba62..0be10349bf87 100644 --- a/gcc/ada/s-maccod.ads +++ b/gcc/ada/s-maccod.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2000 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-mantis.adb b/gcc/ada/s-mantis.adb index 460c3e94cf2d..ecf0c1208ea8 100644 --- a/gcc/ada/s-mantis.adb +++ b/gcc/ada/s-mantis.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1996 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-mantis.ads b/gcc/ada/s-mantis.ads index 8ae9954718eb..d92f43fc37f1 100644 --- a/gcc/ada/s-mantis.ads +++ b/gcc/ada/s-mantis.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1996 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-mastop.adb b/gcc/ada/s-mastop.adb index 0db066f004a8..fa77d641fda1 100644 --- a/gcc/ada/s-mastop.adb +++ b/gcc/ada/s-mastop.adb @@ -7,7 +7,6 @@ -- B o d y -- -- (Dummy version) -- -- -- --- -- -- Copyright (C) 1999-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-mastop.ads b/gcc/ada/s-mastop.ads index 20efa01903d0..53e11b4aea2a 100644 --- a/gcc/ada/s-mastop.ads +++ b/gcc/ada/s-mastop.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1999-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-memory.adb b/gcc/ada/s-memory.adb index 8eaed617b670..aff4623e31d4 100644 --- a/gcc/ada/s-memory.adb +++ b/gcc/ada/s-memory.adb @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 2001-2002 Free Software Foundation, Inc. -- -- -- -- This specification is derived from the Ada Reference Manual for use with -- diff --git a/gcc/ada/s-memory.ads b/gcc/ada/s-memory.ads index 1b95dd34a979..16742357209e 100644 --- a/gcc/ada/s-memory.ads +++ b/gcc/ada/s-memory.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 2001 Free Software Foundation, Inc. -- -- -- -- This specification is derived from the Ada Reference Manual for use with -- diff --git a/gcc/ada/s-osprim.ads b/gcc/ada/s-osprim.ads index 1e28d4f5f946..381dd5eb5faf 100644 --- a/gcc/ada/s-osprim.ads +++ b/gcc/ada/s-osprim.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1998-2001 Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack03.adb b/gcc/ada/s-pack03.adb index 1999f5d6dfa3..7e67dc183785 100644 --- a/gcc/ada/s-pack03.adb +++ b/gcc/ada/s-pack03.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack03.ads b/gcc/ada/s-pack03.ads index 6d41c89f9029..9bd31b848e14 100644 --- a/gcc/ada/s-pack03.ads +++ b/gcc/ada/s-pack03.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992,1993,1994,1995,1996 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack05.adb b/gcc/ada/s-pack05.adb index 6f9c3689c63f..806f4792540e 100644 --- a/gcc/ada/s-pack05.adb +++ b/gcc/ada/s-pack05.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack05.ads b/gcc/ada/s-pack05.ads index 733f9645cd3a..eec880c2d823 100644 --- a/gcc/ada/s-pack05.ads +++ b/gcc/ada/s-pack05.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack06.adb b/gcc/ada/s-pack06.adb index 0736b5bc9327..1e80ad14cf36 100644 --- a/gcc/ada/s-pack06.adb +++ b/gcc/ada/s-pack06.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack06.ads b/gcc/ada/s-pack06.ads index e48ddda819dc..9d09ac1c8a43 100644 --- a/gcc/ada/s-pack06.ads +++ b/gcc/ada/s-pack06.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack07.adb b/gcc/ada/s-pack07.adb index da1a02fc0ee8..66ea196e4ae3 100644 --- a/gcc/ada/s-pack07.adb +++ b/gcc/ada/s-pack07.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack07.ads b/gcc/ada/s-pack07.ads index aec86167d89a..5095bf07ec68 100644 --- a/gcc/ada/s-pack07.ads +++ b/gcc/ada/s-pack07.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack09.adb b/gcc/ada/s-pack09.adb index bf972e19cb81..0a0c61e4312c 100644 --- a/gcc/ada/s-pack09.adb +++ b/gcc/ada/s-pack09.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack09.ads b/gcc/ada/s-pack09.ads index a1e33097d045..ba5cf63cd991 100644 --- a/gcc/ada/s-pack09.ads +++ b/gcc/ada/s-pack09.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack10.adb b/gcc/ada/s-pack10.adb index 281447aa030a..9ff20f3bf569 100644 --- a/gcc/ada/s-pack10.adb +++ b/gcc/ada/s-pack10.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack10.ads b/gcc/ada/s-pack10.ads index a207dac4cc44..b881f7de1104 100644 --- a/gcc/ada/s-pack10.ads +++ b/gcc/ada/s-pack10.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack11.adb b/gcc/ada/s-pack11.adb index 1c803d376524..ecc76910deaa 100644 --- a/gcc/ada/s-pack11.adb +++ b/gcc/ada/s-pack11.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack11.ads b/gcc/ada/s-pack11.ads index d1a348f5eeea..34431ff0fde6 100644 --- a/gcc/ada/s-pack11.ads +++ b/gcc/ada/s-pack11.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack12.adb b/gcc/ada/s-pack12.adb index 5a1228db3670..f764640be258 100644 --- a/gcc/ada/s-pack12.adb +++ b/gcc/ada/s-pack12.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack12.ads b/gcc/ada/s-pack12.ads index 5dfc5645d821..e55a51c36e52 100644 --- a/gcc/ada/s-pack12.ads +++ b/gcc/ada/s-pack12.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack13.adb b/gcc/ada/s-pack13.adb index 8a8840e1128f..d16cfde1549d 100644 --- a/gcc/ada/s-pack13.adb +++ b/gcc/ada/s-pack13.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack13.ads b/gcc/ada/s-pack13.ads index bfd5563591fe..e8163d52d6f5 100644 --- a/gcc/ada/s-pack13.ads +++ b/gcc/ada/s-pack13.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack14.adb b/gcc/ada/s-pack14.adb index 8ecef36428c8..361c1b7b624c 100644 --- a/gcc/ada/s-pack14.adb +++ b/gcc/ada/s-pack14.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack14.ads b/gcc/ada/s-pack14.ads index 69aca522ee96..d00394e7a3a4 100644 --- a/gcc/ada/s-pack14.ads +++ b/gcc/ada/s-pack14.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack15.adb b/gcc/ada/s-pack15.adb index 58f6769aa911..16770a320568 100644 --- a/gcc/ada/s-pack15.adb +++ b/gcc/ada/s-pack15.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack15.ads b/gcc/ada/s-pack15.ads index 9cb1317fdef8..d9a90c17e459 100644 --- a/gcc/ada/s-pack15.ads +++ b/gcc/ada/s-pack15.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack17.adb b/gcc/ada/s-pack17.adb index 865efd6137c1..c8fe5d93e422 100644 --- a/gcc/ada/s-pack17.adb +++ b/gcc/ada/s-pack17.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack17.ads b/gcc/ada/s-pack17.ads index 156f5c8d5c27..da16bf117f5f 100644 --- a/gcc/ada/s-pack17.ads +++ b/gcc/ada/s-pack17.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack18.adb b/gcc/ada/s-pack18.adb index d39192b860ff..ba31d8562fa9 100644 --- a/gcc/ada/s-pack18.adb +++ b/gcc/ada/s-pack18.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack18.ads b/gcc/ada/s-pack18.ads index cce6ae10f700..00bc0e2da394 100644 --- a/gcc/ada/s-pack18.ads +++ b/gcc/ada/s-pack18.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack19.adb b/gcc/ada/s-pack19.adb index bc3d5a68b772..6253b20b0988 100644 --- a/gcc/ada/s-pack19.adb +++ b/gcc/ada/s-pack19.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack19.ads b/gcc/ada/s-pack19.ads index 9cf1913c77a7..69ddd8a868a1 100644 --- a/gcc/ada/s-pack19.ads +++ b/gcc/ada/s-pack19.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack20.adb b/gcc/ada/s-pack20.adb index 301e04c8fef2..da17e7526895 100644 --- a/gcc/ada/s-pack20.adb +++ b/gcc/ada/s-pack20.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack20.ads b/gcc/ada/s-pack20.ads index d8db4d1c317d..5086d67562f4 100644 --- a/gcc/ada/s-pack20.ads +++ b/gcc/ada/s-pack20.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack21.adb b/gcc/ada/s-pack21.adb index 904bbeb772ee..2815c44cb995 100644 --- a/gcc/ada/s-pack21.adb +++ b/gcc/ada/s-pack21.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack21.ads b/gcc/ada/s-pack21.ads index 3749993c0e68..5432aae00209 100644 --- a/gcc/ada/s-pack21.ads +++ b/gcc/ada/s-pack21.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack22.adb b/gcc/ada/s-pack22.adb index 3ae4402c24b5..39ed32d6a3ac 100644 --- a/gcc/ada/s-pack22.adb +++ b/gcc/ada/s-pack22.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack22.ads b/gcc/ada/s-pack22.ads index 57fbb76c515d..c2bffa7361cd 100644 --- a/gcc/ada/s-pack22.ads +++ b/gcc/ada/s-pack22.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack23.adb b/gcc/ada/s-pack23.adb index 1dd78eeedc73..0819f5a8e3d8 100644 --- a/gcc/ada/s-pack23.adb +++ b/gcc/ada/s-pack23.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack23.ads b/gcc/ada/s-pack23.ads index c06688229b24..c2c012f2336b 100644 --- a/gcc/ada/s-pack23.ads +++ b/gcc/ada/s-pack23.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack24.adb b/gcc/ada/s-pack24.adb index 93b0a07f3ff7..c6af19876da9 100644 --- a/gcc/ada/s-pack24.adb +++ b/gcc/ada/s-pack24.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack24.ads b/gcc/ada/s-pack24.ads index cceb7735adeb..4a995a41728d 100644 --- a/gcc/ada/s-pack24.ads +++ b/gcc/ada/s-pack24.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack25.adb b/gcc/ada/s-pack25.adb index 2e9498b51553..8c281e543454 100644 --- a/gcc/ada/s-pack25.adb +++ b/gcc/ada/s-pack25.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack25.ads b/gcc/ada/s-pack25.ads index 1b9882d797cc..fe404d246eb7 100644 --- a/gcc/ada/s-pack25.ads +++ b/gcc/ada/s-pack25.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack26.adb b/gcc/ada/s-pack26.adb index ba9c9af586e3..9a92fa83f00f 100644 --- a/gcc/ada/s-pack26.adb +++ b/gcc/ada/s-pack26.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack26.ads b/gcc/ada/s-pack26.ads index 4174355b8600..916cad3264f5 100644 --- a/gcc/ada/s-pack26.ads +++ b/gcc/ada/s-pack26.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack27.adb b/gcc/ada/s-pack27.adb index 6399fc0363dd..73b2e8b98036 100644 --- a/gcc/ada/s-pack27.adb +++ b/gcc/ada/s-pack27.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack27.ads b/gcc/ada/s-pack27.ads index 0bc99a794f20..16196938c9de 100644 --- a/gcc/ada/s-pack27.ads +++ b/gcc/ada/s-pack27.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack28.adb b/gcc/ada/s-pack28.adb index 97d82309e206..24a7b79a1b57 100644 --- a/gcc/ada/s-pack28.adb +++ b/gcc/ada/s-pack28.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack28.ads b/gcc/ada/s-pack28.ads index 89c18a1b38bf..644c0fdef623 100644 --- a/gcc/ada/s-pack28.ads +++ b/gcc/ada/s-pack28.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack29.adb b/gcc/ada/s-pack29.adb index b2b00d6b7d91..ccf1e94a4285 100644 --- a/gcc/ada/s-pack29.adb +++ b/gcc/ada/s-pack29.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack29.ads b/gcc/ada/s-pack29.ads index 9fb3e526022a..dd93fd5e60d6 100644 --- a/gcc/ada/s-pack29.ads +++ b/gcc/ada/s-pack29.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack30.adb b/gcc/ada/s-pack30.adb index 024f2f588c03..9d85bd0d6963 100644 --- a/gcc/ada/s-pack30.adb +++ b/gcc/ada/s-pack30.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack30.ads b/gcc/ada/s-pack30.ads index b552996113e6..c297c80c944d 100644 --- a/gcc/ada/s-pack30.ads +++ b/gcc/ada/s-pack30.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack31.adb b/gcc/ada/s-pack31.adb index 60714b644d12..c9b2c7fb12e7 100644 --- a/gcc/ada/s-pack31.adb +++ b/gcc/ada/s-pack31.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack31.ads b/gcc/ada/s-pack31.ads index ae97c0d505d0..61b2767fc401 100644 --- a/gcc/ada/s-pack31.ads +++ b/gcc/ada/s-pack31.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack33.adb b/gcc/ada/s-pack33.adb index b744a811d2c4..512a8a8a9aa5 100644 --- a/gcc/ada/s-pack33.adb +++ b/gcc/ada/s-pack33.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack33.ads b/gcc/ada/s-pack33.ads index 5bf1e9883229..caa69a555903 100644 --- a/gcc/ada/s-pack33.ads +++ b/gcc/ada/s-pack33.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack34.adb b/gcc/ada/s-pack34.adb index 13429de27aef..757380917261 100644 --- a/gcc/ada/s-pack34.adb +++ b/gcc/ada/s-pack34.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack34.ads b/gcc/ada/s-pack34.ads index 83c5ec2d8cf4..40359dbf5421 100644 --- a/gcc/ada/s-pack34.ads +++ b/gcc/ada/s-pack34.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack35.adb b/gcc/ada/s-pack35.adb index de5295650dc2..5ea7f0ef0e88 100644 --- a/gcc/ada/s-pack35.adb +++ b/gcc/ada/s-pack35.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack35.ads b/gcc/ada/s-pack35.ads index 96589fd78afe..2aa1ac340d46 100644 --- a/gcc/ada/s-pack35.ads +++ b/gcc/ada/s-pack35.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack36.adb b/gcc/ada/s-pack36.adb index bfb5d3e1afa5..a527e70d25b8 100644 --- a/gcc/ada/s-pack36.adb +++ b/gcc/ada/s-pack36.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack36.ads b/gcc/ada/s-pack36.ads index f2cf294252aa..4d8d4f407d1a 100644 --- a/gcc/ada/s-pack36.ads +++ b/gcc/ada/s-pack36.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack37.adb b/gcc/ada/s-pack37.adb index 8bacce975826..aebece5737f4 100644 --- a/gcc/ada/s-pack37.adb +++ b/gcc/ada/s-pack37.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack37.ads b/gcc/ada/s-pack37.ads index 4029f0de5e3b..80c5c847f925 100644 --- a/gcc/ada/s-pack37.ads +++ b/gcc/ada/s-pack37.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack38.adb b/gcc/ada/s-pack38.adb index 409798faa2b6..302e63b5e67a 100644 --- a/gcc/ada/s-pack38.adb +++ b/gcc/ada/s-pack38.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack38.ads b/gcc/ada/s-pack38.ads index 08de623b2bfd..674095e3ed79 100644 --- a/gcc/ada/s-pack38.ads +++ b/gcc/ada/s-pack38.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack39.adb b/gcc/ada/s-pack39.adb index 898de494a777..c10e548d1d51 100644 --- a/gcc/ada/s-pack39.adb +++ b/gcc/ada/s-pack39.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack39.ads b/gcc/ada/s-pack39.ads index 410661447874..dcb19ff7390d 100644 --- a/gcc/ada/s-pack39.ads +++ b/gcc/ada/s-pack39.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack40.adb b/gcc/ada/s-pack40.adb index 7f2e85020b1b..f4573d1bc6cf 100644 --- a/gcc/ada/s-pack40.adb +++ b/gcc/ada/s-pack40.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack40.ads b/gcc/ada/s-pack40.ads index 2f6fdb4f5a6f..e571ce705baa 100644 --- a/gcc/ada/s-pack40.ads +++ b/gcc/ada/s-pack40.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack41.adb b/gcc/ada/s-pack41.adb index f44b309d7d46..4e4d591e4614 100644 --- a/gcc/ada/s-pack41.adb +++ b/gcc/ada/s-pack41.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack41.ads b/gcc/ada/s-pack41.ads index ec5f2e2be81d..cbe638bf0d7e 100644 --- a/gcc/ada/s-pack41.ads +++ b/gcc/ada/s-pack41.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack42.adb b/gcc/ada/s-pack42.adb index 8d015b6b5bf8..c374dd9946f1 100644 --- a/gcc/ada/s-pack42.adb +++ b/gcc/ada/s-pack42.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack42.ads b/gcc/ada/s-pack42.ads index 7117c693cf5e..44f23a47d37d 100644 --- a/gcc/ada/s-pack42.ads +++ b/gcc/ada/s-pack42.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack43.adb b/gcc/ada/s-pack43.adb index c7fbb904cc16..64e41118bc91 100644 --- a/gcc/ada/s-pack43.adb +++ b/gcc/ada/s-pack43.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack43.ads b/gcc/ada/s-pack43.ads index 0c99d2cd4bf7..b9b73862a99b 100644 --- a/gcc/ada/s-pack43.ads +++ b/gcc/ada/s-pack43.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack44.adb b/gcc/ada/s-pack44.adb index 4f32829ceff6..3bc0f76042d5 100644 --- a/gcc/ada/s-pack44.adb +++ b/gcc/ada/s-pack44.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack44.ads b/gcc/ada/s-pack44.ads index 0a563d698f33..ca28c924d17f 100644 --- a/gcc/ada/s-pack44.ads +++ b/gcc/ada/s-pack44.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack45.adb b/gcc/ada/s-pack45.adb index 2aa16d0d5c6e..f4367c6345f5 100644 --- a/gcc/ada/s-pack45.adb +++ b/gcc/ada/s-pack45.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack45.ads b/gcc/ada/s-pack45.ads index 3230fde36c39..421f72c851ec 100644 --- a/gcc/ada/s-pack45.ads +++ b/gcc/ada/s-pack45.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack46.adb b/gcc/ada/s-pack46.adb index 7b2f132dc32c..dafa4f0f7ff9 100644 --- a/gcc/ada/s-pack46.adb +++ b/gcc/ada/s-pack46.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack46.ads b/gcc/ada/s-pack46.ads index 8f6c29fec49b..c10009fb19c8 100644 --- a/gcc/ada/s-pack46.ads +++ b/gcc/ada/s-pack46.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack47.adb b/gcc/ada/s-pack47.adb index 9400c9039276..5802a3709b1c 100644 --- a/gcc/ada/s-pack47.adb +++ b/gcc/ada/s-pack47.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack47.ads b/gcc/ada/s-pack47.ads index a9895885f7a1..9e0370a8cc20 100644 --- a/gcc/ada/s-pack47.ads +++ b/gcc/ada/s-pack47.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack48.adb b/gcc/ada/s-pack48.adb index 88a72bc5983f..f6fefe9d1ff1 100644 --- a/gcc/ada/s-pack48.adb +++ b/gcc/ada/s-pack48.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack48.ads b/gcc/ada/s-pack48.ads index 296def49545f..137a0081c2b0 100644 --- a/gcc/ada/s-pack48.ads +++ b/gcc/ada/s-pack48.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack49.adb b/gcc/ada/s-pack49.adb index c2b1629558e5..42c68c3cce22 100644 --- a/gcc/ada/s-pack49.adb +++ b/gcc/ada/s-pack49.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack49.ads b/gcc/ada/s-pack49.ads index fbf8dbf37f9a..efdb5dd4cfa0 100644 --- a/gcc/ada/s-pack49.ads +++ b/gcc/ada/s-pack49.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack50.adb b/gcc/ada/s-pack50.adb index e0f3a60876fe..d7f750f538ea 100644 --- a/gcc/ada/s-pack50.adb +++ b/gcc/ada/s-pack50.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack50.ads b/gcc/ada/s-pack50.ads index 53909e058e1b..32641b192b5f 100644 --- a/gcc/ada/s-pack50.ads +++ b/gcc/ada/s-pack50.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack51.adb b/gcc/ada/s-pack51.adb index 9c4ff298058c..35929866b91e 100644 --- a/gcc/ada/s-pack51.adb +++ b/gcc/ada/s-pack51.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack51.ads b/gcc/ada/s-pack51.ads index a3cc1ebbe08b..70808ebdb87f 100644 --- a/gcc/ada/s-pack51.ads +++ b/gcc/ada/s-pack51.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack52.adb b/gcc/ada/s-pack52.adb index bbfb5984b76a..683142e2bcbf 100644 --- a/gcc/ada/s-pack52.adb +++ b/gcc/ada/s-pack52.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack52.ads b/gcc/ada/s-pack52.ads index 59f93b40fbf3..75e427203754 100644 --- a/gcc/ada/s-pack52.ads +++ b/gcc/ada/s-pack52.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack53.adb b/gcc/ada/s-pack53.adb index bc9973bb2ec5..af4745e56fc0 100644 --- a/gcc/ada/s-pack53.adb +++ b/gcc/ada/s-pack53.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack53.ads b/gcc/ada/s-pack53.ads index d81861848eb8..df3834469ded 100644 --- a/gcc/ada/s-pack53.ads +++ b/gcc/ada/s-pack53.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack54.adb b/gcc/ada/s-pack54.adb index 69661189c4cc..64e1e1f38aee 100644 --- a/gcc/ada/s-pack54.adb +++ b/gcc/ada/s-pack54.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack54.ads b/gcc/ada/s-pack54.ads index ecb84315f81a..01b631d576d0 100644 --- a/gcc/ada/s-pack54.ads +++ b/gcc/ada/s-pack54.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack55.adb b/gcc/ada/s-pack55.adb index 44afca0529fc..6206f2dc4dc6 100644 --- a/gcc/ada/s-pack55.adb +++ b/gcc/ada/s-pack55.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack55.ads b/gcc/ada/s-pack55.ads index 6185d125c8c7..8fa19f3faf82 100644 --- a/gcc/ada/s-pack55.ads +++ b/gcc/ada/s-pack55.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack56.adb b/gcc/ada/s-pack56.adb index 7494798331bd..ef9350f95442 100644 --- a/gcc/ada/s-pack56.adb +++ b/gcc/ada/s-pack56.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack56.ads b/gcc/ada/s-pack56.ads index 8d7194133f67..8a9ccd762fc6 100644 --- a/gcc/ada/s-pack56.ads +++ b/gcc/ada/s-pack56.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack57.adb b/gcc/ada/s-pack57.adb index e9920adb713c..ccb4e055969b 100644 --- a/gcc/ada/s-pack57.adb +++ b/gcc/ada/s-pack57.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack57.ads b/gcc/ada/s-pack57.ads index 8e2e574f81f0..389ec7469148 100644 --- a/gcc/ada/s-pack57.ads +++ b/gcc/ada/s-pack57.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack58.adb b/gcc/ada/s-pack58.adb index 7313ef30bbf4..c7732f532aac 100644 --- a/gcc/ada/s-pack58.adb +++ b/gcc/ada/s-pack58.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack58.ads b/gcc/ada/s-pack58.ads index 3a5a486834de..c73c126e5b8f 100644 --- a/gcc/ada/s-pack58.ads +++ b/gcc/ada/s-pack58.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack59.adb b/gcc/ada/s-pack59.adb index 3e0cc06c26dd..4aa338a4f2d1 100644 --- a/gcc/ada/s-pack59.adb +++ b/gcc/ada/s-pack59.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack59.ads b/gcc/ada/s-pack59.ads index 64a463366ce2..0c245227cbf9 100644 --- a/gcc/ada/s-pack59.ads +++ b/gcc/ada/s-pack59.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack60.adb b/gcc/ada/s-pack60.adb index a114285e447e..438943d4bd36 100644 --- a/gcc/ada/s-pack60.adb +++ b/gcc/ada/s-pack60.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack60.ads b/gcc/ada/s-pack60.ads index 94d87efb6a34..2fcbd36540f3 100644 --- a/gcc/ada/s-pack60.ads +++ b/gcc/ada/s-pack60.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack61.adb b/gcc/ada/s-pack61.adb index 60b2da802986..4affb837213a 100644 --- a/gcc/ada/s-pack61.adb +++ b/gcc/ada/s-pack61.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack61.ads b/gcc/ada/s-pack61.ads index 17d663b8988c..f174db2678d3 100644 --- a/gcc/ada/s-pack61.ads +++ b/gcc/ada/s-pack61.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack62.adb b/gcc/ada/s-pack62.adb index 51697fd70782..3cfd6b6831ad 100644 --- a/gcc/ada/s-pack62.adb +++ b/gcc/ada/s-pack62.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack62.ads b/gcc/ada/s-pack62.ads index 674e250715db..ea8a9af7174c 100644 --- a/gcc/ada/s-pack62.ads +++ b/gcc/ada/s-pack62.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack63.adb b/gcc/ada/s-pack63.adb index 8fe9e4a512d9..55f12c1227a1 100644 --- a/gcc/ada/s-pack63.adb +++ b/gcc/ada/s-pack63.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pack63.ads b/gcc/ada/s-pack63.ads index bb60bea07688..56541eff0c20 100644 --- a/gcc/ada/s-pack63.ads +++ b/gcc/ada/s-pack63.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-parame.adb b/gcc/ada/s-parame.adb index a7665ba7ed9c..ce9ba09ea3ad 100644 --- a/gcc/ada/s-parame.adb +++ b/gcc/ada/s-parame.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1995-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-parame.ads b/gcc/ada/s-parame.ads index ed8506828816..87e6fa99a417 100644 --- a/gcc/ada/s-parame.ads +++ b/gcc/ada/s-parame.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-parint.adb b/gcc/ada/s-parint.adb index faaa55e62585..0f0484df0e9a 100644 --- a/gcc/ada/s-parint.adb +++ b/gcc/ada/s-parint.adb @@ -7,7 +7,6 @@ -- B o d y -- -- (Dummy body for non-distributed case) -- -- -- --- -- -- Copyright (C) 1995-2001 Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-parint.ads b/gcc/ada/s-parint.ads index 5623e9467279..34c873a55d85 100644 --- a/gcc/ada/s-parint.ads +++ b/gcc/ada/s-parint.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1995-2000 Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pooglo.adb b/gcc/ada/s-pooglo.adb index 2cf2837976f5..7b3e08fab5c6 100644 --- a/gcc/ada/s-pooglo.adb +++ b/gcc/ada/s-pooglo.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pooglo.ads b/gcc/ada/s-pooglo.ads index d51a7be11fdf..16e03de6c939 100644 --- a/gcc/ada/s-pooglo.ads +++ b/gcc/ada/s-pooglo.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992,1993,1994 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pooloc.adb b/gcc/ada/s-pooloc.adb index 1d3571aa15fc..8272ae333bb3 100644 --- a/gcc/ada/s-pooloc.adb +++ b/gcc/ada/s-pooloc.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-pooloc.ads b/gcc/ada/s-pooloc.ads index 639d469647a6..2c3c04550d58 100644 --- a/gcc/ada/s-pooloc.ads +++ b/gcc/ada/s-pooloc.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1998, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-poosiz.adb b/gcc/ada/s-poosiz.adb index ef3555023052..ad6f759f6692 100644 --- a/gcc/ada/s-poosiz.adb +++ b/gcc/ada/s-poosiz.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-poosiz.ads b/gcc/ada/s-poosiz.ads index cd80bf7afb73..508d7eaafe00 100644 --- a/gcc/ada/s-poosiz.ads +++ b/gcc/ada/s-poosiz.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992,1993,1994 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-powtab.ads b/gcc/ada/s-powtab.ads index 05f6e9e2a07b..40fe0ac72f64 100644 --- a/gcc/ada/s-powtab.ads +++ b/gcc/ada/s-powtab.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-proinf.adb b/gcc/ada/s-proinf.adb index c0d6024e4f36..996c3134a49d 100644 --- a/gcc/ada/s-proinf.adb +++ b/gcc/ada/s-proinf.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1996 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-proinf.ads b/gcc/ada/s-proinf.ads index 201fc0c019b3..99f0e3c2cb93 100644 --- a/gcc/ada/s-proinf.ads +++ b/gcc/ada/s-proinf.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1996 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-rpc.adb b/gcc/ada/s-rpc.adb index 5d918e70cbbc..33ab366f278e 100644 --- a/gcc/ada/s-rpc.adb +++ b/gcc/ada/s-rpc.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-rpc.ads b/gcc/ada/s-rpc.ads index 2c479a38463c..af778aa1fcf9 100644 --- a/gcc/ada/s-rpc.ads +++ b/gcc/ada/s-rpc.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1998 Free Software Foundation, Inc. -- -- -- -- This specification is derived from the Ada Reference Manual for use with -- diff --git a/gcc/ada/s-scaval.ads b/gcc/ada/s-scaval.ads index cfa41de092ae..07324b6724c2 100644 --- a/gcc/ada/s-scaval.ads +++ b/gcc/ada/s-scaval.ads @@ -5,7 +5,6 @@ -- S Y S T E M . S C A L A R _ V A L U E S -- -- S p e c -- -- -- --- -- -- Copyright (C) 2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-secsta.adb b/gcc/ada/s-secsta.adb index 6818bada9731..63182aa69720 100644 --- a/gcc/ada/s-secsta.adb +++ b/gcc/ada/s-secsta.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-secsta.ads b/gcc/ada/s-secsta.ads index 068b64582ad1..0530ed4761d9 100644 --- a/gcc/ada/s-secsta.ads +++ b/gcc/ada/s-secsta.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-sequio.adb b/gcc/ada/s-sequio.adb index 225c8ea10c49..7e66bbe45732 100644 --- a/gcc/ada/s-sequio.adb +++ b/gcc/ada/s-sequio.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-sequio.ads b/gcc/ada/s-sequio.ads index 9615fa55b6eb..3bc2f962ac05 100644 --- a/gcc/ada/s-sequio.ads +++ b/gcc/ada/s-sequio.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992,1993,1994 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-shasto.adb b/gcc/ada/s-shasto.adb index 263612edb243..2f7f0637ce85 100644 --- a/gcc/ada/s-shasto.adb +++ b/gcc/ada/s-shasto.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1998-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-shasto.ads b/gcc/ada/s-shasto.ads index c93dea0c3ccf..69ddebaf1580 100644 --- a/gcc/ada/s-shasto.ads +++ b/gcc/ada/s-shasto.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1998-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-soflin.adb b/gcc/ada/s-soflin.adb index 18f72507947d..f656714d3d33 100644 --- a/gcc/ada/s-soflin.adb +++ b/gcc/ada/s-soflin.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-soflin.ads b/gcc/ada/s-soflin.ads index c3379606a864..96d2155c21dc 100644 --- a/gcc/ada/s-soflin.ads +++ b/gcc/ada/s-soflin.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2001, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-sopco3.adb b/gcc/ada/s-sopco3.adb index e8f519892102..59ae6cfe88b4 100644 --- a/gcc/ada/s-sopco3.adb +++ b/gcc/ada/s-sopco3.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1998, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-sopco3.ads b/gcc/ada/s-sopco3.ads index 12301861f775..d9003a29c934 100644 --- a/gcc/ada/s-sopco3.ads +++ b/gcc/ada/s-sopco3.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2000, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-sopco4.adb b/gcc/ada/s-sopco4.adb index e079528f0748..5cbd028b1109 100644 --- a/gcc/ada/s-sopco4.adb +++ b/gcc/ada/s-sopco4.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1998, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-sopco4.ads b/gcc/ada/s-sopco4.ads index fc453a0f216a..e5bc81a3cfb9 100644 --- a/gcc/ada/s-sopco4.ads +++ b/gcc/ada/s-sopco4.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2000, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-sopco5.adb b/gcc/ada/s-sopco5.adb index 98215944128e..c8fa200a6f7c 100644 --- a/gcc/ada/s-sopco5.adb +++ b/gcc/ada/s-sopco5.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1998, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-sopco5.ads b/gcc/ada/s-sopco5.ads index 42d2c7f26180..ecbff60ab2ba 100644 --- a/gcc/ada/s-sopco5.ads +++ b/gcc/ada/s-sopco5.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2000, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-stache.adb b/gcc/ada/s-stache.adb index f5780be66365..f93f3fa7059e 100644 --- a/gcc/ada/s-stache.adb +++ b/gcc/ada/s-stache.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1999-2001 Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-stache.ads b/gcc/ada/s-stache.ads index 6d3e1f7075a7..d8bdbb35a131 100644 --- a/gcc/ada/s-stache.ads +++ b/gcc/ada/s-stache.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1999-2001 Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-stalib.adb b/gcc/ada/s-stalib.adb index 2913e522e8b4..096eac45b427 100644 --- a/gcc/ada/s-stalib.adb +++ b/gcc/ada/s-stalib.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1995-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-stalib.ads b/gcc/ada/s-stalib.ads index f31dc5e5c1da..e443239bdcaf 100644 --- a/gcc/ada/s-stalib.ads +++ b/gcc/ada/s-stalib.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-stoele.adb b/gcc/ada/s-stoele.adb index 5b2468af6cbe..fc69d1e1db88 100644 --- a/gcc/ada/s-stoele.adb +++ b/gcc/ada/s-stoele.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992,1993,1994 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-stoele.ads b/gcc/ada/s-stoele.ads index 7b4e3cd6524e..3d9f7c22b96a 100644 --- a/gcc/ada/s-stoele.ads +++ b/gcc/ada/s-stoele.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- This specification is adapted from the Ada Reference Manual for use with -- -- GNAT. In accordance with the copyright of that document, you can freely -- -- copy and modify this specification, provided that if you redistribute a -- diff --git a/gcc/ada/s-stopoo.ads b/gcc/ada/s-stopoo.ads index a4f5ac658577..4892e692383e 100644 --- a/gcc/ada/s-stopoo.ads +++ b/gcc/ada/s-stopoo.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- This specification is derived from the Ada Reference Manual for use with -- diff --git a/gcc/ada/s-stratt.adb b/gcc/ada/s-stratt.adb index 7ce931fbf130..897b6daa2c53 100644 --- a/gcc/ada/s-stratt.adb +++ b/gcc/ada/s-stratt.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1998, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-stratt.ads b/gcc/ada/s-stratt.ads index 7b95f4c4d504..926c6f6a0ebe 100644 --- a/gcc/ada/s-stratt.ads +++ b/gcc/ada/s-stratt.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2000 Free Software Foundation, Inc. -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-strops.adb b/gcc/ada/s-strops.adb index b3d882c9e994..01b431dc1be7 100644 --- a/gcc/ada/s-strops.adb +++ b/gcc/ada/s-strops.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1998 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-strops.ads b/gcc/ada/s-strops.ads index 0588be5276a9..b204a83a12e2 100644 --- a/gcc/ada/s-strops.ads +++ b/gcc/ada/s-strops.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2000 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-taasde.adb b/gcc/ada/s-taasde.adb index 16a94a60f550..2439c464357c 100644 --- a/gcc/ada/s-taasde.adb +++ b/gcc/ada/s-taasde.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1998-2002, Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-taasde.ads b/gcc/ada/s-taasde.ads index 4de73b2fcc63..76a9dff90375 100644 --- a/gcc/ada/s-taasde.ads +++ b/gcc/ada/s-taasde.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1998-2001 Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-tadeca.adb b/gcc/ada/s-tadeca.adb index 272227d27d7c..fb9c00731e67 100644 --- a/gcc/ada/s-tadeca.adb +++ b/gcc/ada/s-tadeca.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1998-2001 Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-tadeca.ads b/gcc/ada/s-tadeca.ads index 35824f012330..be4ed3e7824d 100644 --- a/gcc/ada/s-tadeca.ads +++ b/gcc/ada/s-tadeca.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1998-2001 Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-tadert.adb b/gcc/ada/s-tadert.adb index 54a78024fbeb..bb4f908a551f 100644 --- a/gcc/ada/s-tadert.adb +++ b/gcc/ada/s-tadert.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1998-2001 Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-tadert.ads b/gcc/ada/s-tadert.ads index 61231a285383..5e406271430e 100644 --- a/gcc/ada/s-tadert.ads +++ b/gcc/ada/s-tadert.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1998-2001 Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-taenca.adb b/gcc/ada/s-taenca.adb index e2b6a3c948ed..68ab1ae0da11 100644 --- a/gcc/ada/s-taenca.adb +++ b/gcc/ada/s-taenca.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001, Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-taenca.ads b/gcc/ada/s-taenca.ads index 67bcb4c7d144..2fef2cdfe8c8 100644 --- a/gcc/ada/s-taenca.ads +++ b/gcc/ada/s-taenca.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2001, Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-taprob.adb b/gcc/ada/s-taprob.adb index ee78b57d6e36..4663110652bc 100644 --- a/gcc/ada/s-taprob.adb +++ b/gcc/ada/s-taprob.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1991-2001 Florida State University -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-taprob.ads b/gcc/ada/s-taprob.ads index db3a74c91685..ea3a1ff65c9d 100644 --- a/gcc/ada/s-taprob.ads +++ b/gcc/ada/s-taprob.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2001, Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-taprop.ads b/gcc/ada/s-taprop.ads index 7cebb630f3d0..9f7c8f7e32bb 100644 --- a/gcc/ada/s-taprop.ads +++ b/gcc/ada/s-taprop.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2001, Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-tarest.adb b/gcc/ada/s-tarest.adb index daeaa811f7ef..2cd2e1617058 100644 --- a/gcc/ada/s-tarest.adb +++ b/gcc/ada/s-tarest.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1999-2001, Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-tarest.ads b/gcc/ada/s-tarest.ads index d14a1481677c..fb4f007fe5b4 100644 --- a/gcc/ada/s-tarest.ads +++ b/gcc/ada/s-tarest.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1999, Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-tasdeb.adb b/gcc/ada/s-tasdeb.adb index 3ee03749661c..c437117bc47c 100644 --- a/gcc/ada/s-tasdeb.adb +++ b/gcc/ada/s-tasdeb.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1997-2002 Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-tasdeb.ads b/gcc/ada/s-tasdeb.ads index 275f5cb77b74..a98575a170c5 100644 --- a/gcc/ada/s-tasdeb.ads +++ b/gcc/ada/s-tasdeb.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1997-2001, Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-tasinf.adb b/gcc/ada/s-tasinf.adb index cd932157badf..8ce2523b2f7a 100644 --- a/gcc/ada/s-tasinf.adb +++ b/gcc/ada/s-tasinf.adb @@ -7,7 +7,6 @@ -- S p e c -- -- (Compiler Interface) -- -- -- --- -- -- Copyright (C) 1998 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-tasinf.ads b/gcc/ada/s-tasinf.ads index bf3bd176a3ba..4ea77e462543 100644 --- a/gcc/ada/s-tasinf.ads +++ b/gcc/ada/s-tasinf.ads @@ -7,7 +7,6 @@ -- S p e c -- -- (Compiler Interface) -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-tasini.adb b/gcc/ada/s-tasini.adb index 77bc22ff8727..badf009b96e0 100644 --- a/gcc/ada/s-tasini.adb +++ b/gcc/ada/s-tasini.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001, Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-tasini.ads b/gcc/ada/s-tasini.ads index fba7bb1b4e69..2b5c39e4c983 100644 --- a/gcc/ada/s-tasini.ads +++ b/gcc/ada/s-tasini.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2001, Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-taskin.adb b/gcc/ada/s-taskin.adb index 5620684fe1f3..ba34a69f384b 100644 --- a/gcc/ada/s-taskin.adb +++ b/gcc/ada/s-taskin.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1991-2001 Florida State University -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-taskin.ads b/gcc/ada/s-taskin.ads index 501db1463683..6210a26a0bad 100644 --- a/gcc/ada/s-taskin.ads +++ b/gcc/ada/s-taskin.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2002, Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-tasque.adb b/gcc/ada/s-tasque.adb index 35209c51deac..092de11f1f29 100644 --- a/gcc/ada/s-tasque.adb +++ b/gcc/ada/s-tasque.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2002, Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-tasque.ads b/gcc/ada/s-tasque.ads index e7211add6b3c..d9d66ca5d97e 100644 --- a/gcc/ada/s-tasque.ads +++ b/gcc/ada/s-tasque.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2001, Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-tasren.adb b/gcc/ada/s-tasren.adb index 972356f2e46b..58ead84f6b3f 100644 --- a/gcc/ada/s-tasren.adb +++ b/gcc/ada/s-tasren.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001, Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-tasren.ads b/gcc/ada/s-tasren.ads index 4796cf957238..62dfedf458c4 100644 --- a/gcc/ada/s-tasren.ads +++ b/gcc/ada/s-tasren.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2001, Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-tasres.ads b/gcc/ada/s-tasres.ads index 64cc00418c67..ab178857a87a 100644 --- a/gcc/ada/s-tasres.ads +++ b/gcc/ada/s-tasres.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1998-1999, Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-tassta.adb b/gcc/ada/s-tassta.adb index e2dcaf0c49ca..6e73cde6b809 100644 --- a/gcc/ada/s-tassta.adb +++ b/gcc/ada/s-tassta.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2002, Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-tassta.ads b/gcc/ada/s-tassta.ads index c8bd2872bf5b..92084f097130 100644 --- a/gcc/ada/s-tassta.ads +++ b/gcc/ada/s-tassta.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1999, Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-tasuti.adb b/gcc/ada/s-tasuti.adb index fb345231252e..8b4bcfa6a663 100644 --- a/gcc/ada/s-tasuti.adb +++ b/gcc/ada/s-tasuti.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2002, Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-tasuti.ads b/gcc/ada/s-tasuti.ads index c63fd2a46570..712f68c37c3a 100644 --- a/gcc/ada/s-tasuti.ads +++ b/gcc/ada/s-tasuti.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2002, Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-tataat.adb b/gcc/ada/s-tataat.adb index 722e945cbd7c..d417da50e765 100644 --- a/gcc/ada/s-tataat.adb +++ b/gcc/ada/s-tataat.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1995-2001 Florida State University -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-tataat.ads b/gcc/ada/s-tataat.ads index c2631edab32c..3ed63ac090d2 100644 --- a/gcc/ada/s-tataat.ads +++ b/gcc/ada/s-tataat.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1995-2002 Florida State University -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-tpinop.adb b/gcc/ada/s-tpinop.adb index 920e52b10eaa..ac5bda3f8c41 100644 --- a/gcc/ada/s-tpinop.adb +++ b/gcc/ada/s-tpinop.adb @@ -7,7 +7,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1998-2001 Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-tpinop.ads b/gcc/ada/s-tpinop.ads index 382932392fad..763641e4aea8 100644 --- a/gcc/ada/s-tpinop.ads +++ b/gcc/ada/s-tpinop.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1998-2001 Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-tpoben.adb b/gcc/ada/s-tpoben.adb index 42b1e84936f8..8e90a9dc4902 100644 --- a/gcc/ada/s-tpoben.adb +++ b/gcc/ada/s-tpoben.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1998-2001, Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-tpoben.ads b/gcc/ada/s-tpoben.ads index 4a9aab34abcb..cd3fd57aa049 100644 --- a/gcc/ada/s-tpoben.ads +++ b/gcc/ada/s-tpoben.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2001, Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-tpobop.adb b/gcc/ada/s-tpobop.adb index b92c6af242c8..36e60b1b2122 100644 --- a/gcc/ada/s-tpobop.adb +++ b/gcc/ada/s-tpobop.adb @@ -7,7 +7,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1998-2001, Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-tpobop.ads b/gcc/ada/s-tpobop.ads index 86f696859519..c1498c63adef 100644 --- a/gcc/ada/s-tpobop.ads +++ b/gcc/ada/s-tpobop.ads @@ -7,7 +7,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2001, Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-tposen.adb b/gcc/ada/s-tposen.adb index b262add1efb4..df132a544ea1 100644 --- a/gcc/ada/s-tposen.adb +++ b/gcc/ada/s-tposen.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1998-2002, Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-tposen.ads b/gcc/ada/s-tposen.ads index b682e0383013..d5f48785fcdf 100644 --- a/gcc/ada/s-tposen.ads +++ b/gcc/ada/s-tposen.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1991-2001 Florida State University -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-traceb.adb b/gcc/ada/s-traceb.adb index 35ba180143ea..94cc6ff22c16 100644 --- a/gcc/ada/s-traceb.adb +++ b/gcc/ada/s-traceb.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1999-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-traceb.ads b/gcc/ada/s-traceb.ads index dd9c77edac5e..1f69c2dd8aa9 100644 --- a/gcc/ada/s-traceb.ads +++ b/gcc/ada/s-traceb.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1999-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-traces.adb b/gcc/ada/s-traces.adb index 78cc50f2e721..dcf856e22992 100644 --- a/gcc/ada/s-traces.adb +++ b/gcc/ada/s-traces.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 2001 Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-traces.ads b/gcc/ada/s-traces.ads index 9e600435413f..6202250dac1c 100644 --- a/gcc/ada/s-traces.ads +++ b/gcc/ada/s-traces.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 2001 Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-tratas.adb b/gcc/ada/s-tratas.adb index 738eab40f822..241fdaa1bbce 100644 --- a/gcc/ada/s-tratas.adb +++ b/gcc/ada/s-tratas.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 2001 Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-tratas.ads b/gcc/ada/s-tratas.ads index 9529cbc9bc97..c54399324eb4 100644 --- a/gcc/ada/s-tratas.ads +++ b/gcc/ada/s-tratas.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 2001 Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-unstyp.ads b/gcc/ada/s-unstyp.ads index 6215c21ec0b5..7ed1033553c2 100644 --- a/gcc/ada/s-unstyp.ads +++ b/gcc/ada/s-unstyp.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-vaflop.adb b/gcc/ada/s-vaflop.adb index ca7b14e43687..35b5353e06ac 100644 --- a/gcc/ada/s-vaflop.adb +++ b/gcc/ada/s-vaflop.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1997-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-vaflop.ads b/gcc/ada/s-vaflop.ads index 131bb1e5896b..529e0ef8c55b 100644 --- a/gcc/ada/s-vaflop.ads +++ b/gcc/ada/s-vaflop.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1997-1998 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-valboo.adb b/gcc/ada/s-valboo.adb index 6a7ddb30f991..20ac11b70e04 100644 --- a/gcc/ada/s-valboo.adb +++ b/gcc/ada/s-valboo.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992,1993,1994 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-valboo.ads b/gcc/ada/s-valboo.ads index 4cf39f2fe0cf..0bbdd2eae72e 100644 --- a/gcc/ada/s-valboo.ads +++ b/gcc/ada/s-valboo.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992,1993,1994 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-valcha.adb b/gcc/ada/s-valcha.adb index ad19a09fa9fe..10b4e4149dfd 100644 --- a/gcc/ada/s-valcha.adb +++ b/gcc/ada/s-valcha.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992,1993,1994 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-valcha.ads b/gcc/ada/s-valcha.ads index a1968431d585..ba2a40dcc16a 100644 --- a/gcc/ada/s-valcha.ads +++ b/gcc/ada/s-valcha.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2000 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-valdec.adb b/gcc/ada/s-valdec.adb index 4e77537ad566..2a6b5551ec7d 100644 --- a/gcc/ada/s-valdec.adb +++ b/gcc/ada/s-valdec.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992,1993,1994,1995,1996 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-valdec.ads b/gcc/ada/s-valdec.ads index 57fe18f1d634..60c55adff643 100644 --- a/gcc/ada/s-valdec.ads +++ b/gcc/ada/s-valdec.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992,1993,1994,1995,1996 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-valenu.adb b/gcc/ada/s-valenu.adb index cd805b5d3a81..969bd1cf3afd 100644 --- a/gcc/ada/s-valenu.adb +++ b/gcc/ada/s-valenu.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2000, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-valenu.ads b/gcc/ada/s-valenu.ads index 0c2de5909de3..15a5fbd90b77 100644 --- a/gcc/ada/s-valenu.ads +++ b/gcc/ada/s-valenu.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2000, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-valint.adb b/gcc/ada/s-valint.adb index 53313f533630..9d8b6b1fbea1 100644 --- a/gcc/ada/s-valint.adb +++ b/gcc/ada/s-valint.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992,1993,1994,1995,1996 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-valint.ads b/gcc/ada/s-valint.ads index f570095eee69..65124e6ccaa0 100644 --- a/gcc/ada/s-valint.ads +++ b/gcc/ada/s-valint.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992,1993,1994,1995,1996 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-vallld.adb b/gcc/ada/s-vallld.adb index 9e49b99d557d..8f1d445252d1 100644 --- a/gcc/ada/s-vallld.adb +++ b/gcc/ada/s-vallld.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992,1993,1994,1995,1996 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-vallld.ads b/gcc/ada/s-vallld.ads index 1a672196d8c4..f40a22492a72 100644 --- a/gcc/ada/s-vallld.ads +++ b/gcc/ada/s-vallld.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992,1993,1994,1995,1996 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-vallli.adb b/gcc/ada/s-vallli.adb index 77b906e91062..14ecb2b41722 100644 --- a/gcc/ada/s-vallli.adb +++ b/gcc/ada/s-vallli.adb @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992,1993,1994,1995,1996 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-vallli.ads b/gcc/ada/s-vallli.ads index 4e35cd9f1798..7b5222069fb4 100644 --- a/gcc/ada/s-vallli.ads +++ b/gcc/ada/s-vallli.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992,1993,1994,1995,1996 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-valllu.adb b/gcc/ada/s-valllu.adb index 5a1d46e33a4d..2403e9d2337e 100644 --- a/gcc/ada/s-valllu.adb +++ b/gcc/ada/s-valllu.adb @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1997 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-valllu.ads b/gcc/ada/s-valllu.ads index 015c5d4e6420..8311f524e08d 100644 --- a/gcc/ada/s-valllu.ads +++ b/gcc/ada/s-valllu.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992,1993,1994,1995,1996 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-valrea.adb b/gcc/ada/s-valrea.adb index 94c7231dbfdb..7d93472a5381 100644 --- a/gcc/ada/s-valrea.adb +++ b/gcc/ada/s-valrea.adb @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2000 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-valrea.ads b/gcc/ada/s-valrea.ads index c941c7b1139f..94e40584f596 100644 --- a/gcc/ada/s-valrea.ads +++ b/gcc/ada/s-valrea.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992,1993,1994,1995,1996 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-valuns.adb b/gcc/ada/s-valuns.adb index 2fe1a52009e5..837c0bc75080 100644 --- a/gcc/ada/s-valuns.adb +++ b/gcc/ada/s-valuns.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1997 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-valuns.ads b/gcc/ada/s-valuns.ads index ef610b5265b6..8fd9b385410b 100644 --- a/gcc/ada/s-valuns.ads +++ b/gcc/ada/s-valuns.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992,1993,1994,1995,1996 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-valuti.adb b/gcc/ada/s-valuti.adb index b204e4831ad2..dede3366081d 100644 --- a/gcc/ada/s-valuti.adb +++ b/gcc/ada/s-valuti.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-valuti.ads b/gcc/ada/s-valuti.ads index e50f4c7fa761..e8f9b783fb00 100644 --- a/gcc/ada/s-valuti.ads +++ b/gcc/ada/s-valuti.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992,1993,1994,1995,1996 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-valwch.adb b/gcc/ada/s-valwch.adb index c9a3a1fbc4e9..5e75a979d5a0 100644 --- a/gcc/ada/s-valwch.adb +++ b/gcc/ada/s-valwch.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1997, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-valwch.ads b/gcc/ada/s-valwch.ads index d66a9f6bc14c..d8d0a82e83ee 100644 --- a/gcc/ada/s-valwch.ads +++ b/gcc/ada/s-valwch.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2000 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-vercon.adb b/gcc/ada/s-vercon.adb index f66eb7798a24..65f5854ca4bf 100644 --- a/gcc/ada/s-vercon.adb +++ b/gcc/ada/s-vercon.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992,1993,1994,1995 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-vercon.ads b/gcc/ada/s-vercon.ads index c9e9f17dcb1a..d77ada75e655 100644 --- a/gcc/ada/s-vercon.ads +++ b/gcc/ada/s-vercon.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992,1993,1994,1995 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-vmexta.adb b/gcc/ada/s-vmexta.adb index ff3fc77f3cb9..2d144674130e 100644 --- a/gcc/ada/s-vmexta.adb +++ b/gcc/ada/s-vmexta.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1997-2001, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-vmexta.ads b/gcc/ada/s-vmexta.ads index c9c4f1acdfa6..7f2f08ed4969 100644 --- a/gcc/ada/s-vmexta.ads +++ b/gcc/ada/s-vmexta.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1997 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-wchcnv.adb b/gcc/ada/s-wchcnv.adb index f68c0806a19a..3da16f854eab 100644 --- a/gcc/ada/s-wchcnv.adb +++ b/gcc/ada/s-wchcnv.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-wchcnv.ads b/gcc/ada/s-wchcnv.ads index e39297483184..38ca113a6b2e 100644 --- a/gcc/ada/s-wchcnv.ads +++ b/gcc/ada/s-wchcnv.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2000 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-wchcon.ads b/gcc/ada/s-wchcon.ads index b1d750cb2132..e0665a5d22ad 100644 --- a/gcc/ada/s-wchcon.ads +++ b/gcc/ada/s-wchcon.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1998 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-wchjis.adb b/gcc/ada/s-wchjis.adb index 59987e03f054..f5e3929c3746 100644 --- a/gcc/ada/s-wchjis.adb +++ b/gcc/ada/s-wchjis.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992,1993,1994 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-wchjis.ads b/gcc/ada/s-wchjis.ads index a01d11c379af..5a325e0056e9 100644 --- a/gcc/ada/s-wchjis.ads +++ b/gcc/ada/s-wchjis.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992,1993,1994 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-wchstw.adb b/gcc/ada/s-wchstw.adb index f3a0d78972b2..6e8d5cb7b725 100644 --- a/gcc/ada/s-wchstw.adb +++ b/gcc/ada/s-wchstw.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2000 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-wchstw.ads b/gcc/ada/s-wchstw.ads index 379948bf9d50..c58066c1204e 100644 --- a/gcc/ada/s-wchstw.ads +++ b/gcc/ada/s-wchstw.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1998 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-wchwts.adb b/gcc/ada/s-wchwts.adb index 5db55e0133f4..c9894f7c0382 100644 --- a/gcc/ada/s-wchwts.adb +++ b/gcc/ada/s-wchwts.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2000 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-wchwts.ads b/gcc/ada/s-wchwts.ads index 4c8fcb61dafc..053d4132fcac 100644 --- a/gcc/ada/s-wchwts.ads +++ b/gcc/ada/s-wchwts.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1998 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-widboo.adb b/gcc/ada/s-widboo.adb index 969fdf2d2353..d41d574eaae5 100644 --- a/gcc/ada/s-widboo.adb +++ b/gcc/ada/s-widboo.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992,1993,1994 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-widboo.ads b/gcc/ada/s-widboo.ads index cf45a7dcc8d7..e62286671d3a 100644 --- a/gcc/ada/s-widboo.ads +++ b/gcc/ada/s-widboo.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992,1993,1994 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-widcha.adb b/gcc/ada/s-widcha.adb index 2a6bda213970..21e65512541f 100644 --- a/gcc/ada/s-widcha.adb +++ b/gcc/ada/s-widcha.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992,1993,1994 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-widcha.ads b/gcc/ada/s-widcha.ads index b64e9cb1e138..ccdb8c95a147 100644 --- a/gcc/ada/s-widcha.ads +++ b/gcc/ada/s-widcha.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992,1993,1994 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-widenu.adb b/gcc/ada/s-widenu.adb index f19d17b1775a..de4a711e74eb 100644 --- a/gcc/ada/s-widenu.adb +++ b/gcc/ada/s-widenu.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-widenu.ads b/gcc/ada/s-widenu.ads index b54508d4f30a..c0584764cba8 100644 --- a/gcc/ada/s-widenu.ads +++ b/gcc/ada/s-widenu.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2000 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-widlli.adb b/gcc/ada/s-widlli.adb index e4d6611665bf..86616cec0560 100644 --- a/gcc/ada/s-widlli.adb +++ b/gcc/ada/s-widlli.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992,1993,1994 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-widlli.ads b/gcc/ada/s-widlli.ads index 146c071dcb15..a9c608c7acbe 100644 --- a/gcc/ada/s-widlli.ads +++ b/gcc/ada/s-widlli.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992,1993,1994 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-widllu.adb b/gcc/ada/s-widllu.adb index 1fe714430c90..3bcf00b5cb1b 100644 --- a/gcc/ada/s-widllu.adb +++ b/gcc/ada/s-widllu.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992,1993,1994 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-widllu.ads b/gcc/ada/s-widllu.ads index 689213f452f4..357917510732 100644 --- a/gcc/ada/s-widllu.ads +++ b/gcc/ada/s-widllu.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992,1993,1994 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-widwch.adb b/gcc/ada/s-widwch.adb index 622817d9b735..a5eaa0451b39 100644 --- a/gcc/ada/s-widwch.adb +++ b/gcc/ada/s-widwch.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1998 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-widwch.ads b/gcc/ada/s-widwch.ads index 64c016efaf84..ab5649abf612 100644 --- a/gcc/ada/s-widwch.ads +++ b/gcc/ada/s-widwch.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992,1993,1994 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-wwdcha.adb b/gcc/ada/s-wwdcha.adb index 74f07c5468a8..e756b9d36101 100644 --- a/gcc/ada/s-wwdcha.adb +++ b/gcc/ada/s-wwdcha.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992,1993,1994 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-wwdcha.ads b/gcc/ada/s-wwdcha.ads index e14cafa17be0..9981cff710e1 100644 --- a/gcc/ada/s-wwdcha.ads +++ b/gcc/ada/s-wwdcha.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992,1993,1994 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-wwdenu.adb b/gcc/ada/s-wwdenu.adb index fefdf94975ca..9a942591d2b0 100644 --- a/gcc/ada/s-wwdenu.adb +++ b/gcc/ada/s-wwdenu.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2000 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-wwdenu.ads b/gcc/ada/s-wwdenu.ads index 7d3e2f645ae1..9bb400fefb38 100644 --- a/gcc/ada/s-wwdenu.ads +++ b/gcc/ada/s-wwdenu.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2000 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-wwdwch.adb b/gcc/ada/s-wwdwch.adb index 942548d7e549..b794cd5e68ba 100644 --- a/gcc/ada/s-wwdwch.adb +++ b/gcc/ada/s-wwdwch.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2000, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/s-wwdwch.ads b/gcc/ada/s-wwdwch.ads index 06f8fcc14e4d..e8f066798041 100644 --- a/gcc/ada/s-wwdwch.ads +++ b/gcc/ada/s-wwdwch.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992,1993,1994 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/scans.adb b/gcc/ada/scans.adb index 8c263d910e18..5622f7c61873 100644 --- a/gcc/ada/scans.adb +++ b/gcc/ada/scans.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/scans.ads b/gcc/ada/scans.ads index 4cd6a752e252..7ff80e9c5cd2 100644 --- a/gcc/ada/scans.ads +++ b/gcc/ada/scans.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/scn-nlit.adb b/gcc/ada/scn-nlit.adb index 4e766033b347..0f69a9905ca4 100644 --- a/gcc/ada/scn-nlit.adb +++ b/gcc/ada/scn-nlit.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/scn-slit.adb b/gcc/ada/scn-slit.adb index 2e7df48d0ccc..e1ded8758939 100644 --- a/gcc/ada/scn-slit.adb +++ b/gcc/ada/scn-slit.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/scn.adb b/gcc/ada/scn.adb index ba95fd579112..cc793d59d30a 100644 --- a/gcc/ada/scn.adb +++ b/gcc/ada/scn.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/scn.ads b/gcc/ada/scn.ads index e98cfade2220..ead6441fbb16 100644 --- a/gcc/ada/scn.ads +++ b/gcc/ada/scn.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2000 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/sdefault.ads b/gcc/ada/sdefault.ads index 4910452e17da..70029bbe975a 100644 --- a/gcc/ada/sdefault.ads +++ b/gcc/ada/sdefault.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/sem.adb b/gcc/ada/sem.adb index 30604989168a..d6d8a547043d 100644 --- a/gcc/ada/sem.adb +++ b/gcc/ada/sem.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/sem.ads b/gcc/ada/sem.ads index 0cfd7b6a2ae8..5d4ca4687e0f 100644 --- a/gcc/ada/sem.ads +++ b/gcc/ada/sem.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/sem_aggr.adb b/gcc/ada/sem_aggr.adb index 240a716bc898..6ddeaab6c91d 100644 --- a/gcc/ada/sem_aggr.adb +++ b/gcc/ada/sem_aggr.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/sem_aggr.ads b/gcc/ada/sem_aggr.ads index 3e9eb51663d8..f53e0739977e 100644 --- a/gcc/ada/sem_aggr.ads +++ b/gcc/ada/sem_aggr.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992,1993,1994 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/sem_attr.adb b/gcc/ada/sem_attr.adb index 0fb099b87e4f..ca6b3ea0204f 100644 --- a/gcc/ada/sem_attr.adb +++ b/gcc/ada/sem_attr.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2002, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/sem_attr.ads b/gcc/ada/sem_attr.ads index 06ec89901d4f..5818de6a8f1f 100644 --- a/gcc/ada/sem_attr.ads +++ b/gcc/ada/sem_attr.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2002, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/sem_case.adb b/gcc/ada/sem_case.adb index 0895356726b5..f854f392f418 100644 --- a/gcc/ada/sem_case.adb +++ b/gcc/ada/sem_case.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1996-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/sem_case.ads b/gcc/ada/sem_case.ads index 5fb3a1d8ff32..a1fdfc7f29cf 100644 --- a/gcc/ada/sem_case.ads +++ b/gcc/ada/sem_case.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1996-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/sem_cat.adb b/gcc/ada/sem_cat.adb index c28ace9b244f..3360f6e5db7e 100644 --- a/gcc/ada/sem_cat.adb +++ b/gcc/ada/sem_cat.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/sem_cat.ads b/gcc/ada/sem_cat.ads index 41f6a8dd09fc..bd3f395bd1a7 100644 --- a/gcc/ada/sem_cat.ads +++ b/gcc/ada/sem_cat.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2000 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/sem_ch10.adb b/gcc/ada/sem_ch10.adb index 16c3456bebaa..37d789e32c0d 100644 --- a/gcc/ada/sem_ch10.adb +++ b/gcc/ada/sem_ch10.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/sem_ch10.ads b/gcc/ada/sem_ch10.ads index 2ad294443591..1737bc1e976e 100644 --- a/gcc/ada/sem_ch10.ads +++ b/gcc/ada/sem_ch10.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/sem_ch11.adb b/gcc/ada/sem_ch11.adb index 428aaf427a76..52a620727a0e 100644 --- a/gcc/ada/sem_ch11.adb +++ b/gcc/ada/sem_ch11.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/sem_ch11.ads b/gcc/ada/sem_ch11.ads index 493cdd6173d9..263b15014e64 100644 --- a/gcc/ada/sem_ch11.ads +++ b/gcc/ada/sem_ch11.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/sem_ch12.adb b/gcc/ada/sem_ch12.adb index 35d7e0413212..e7b4f3644840 100644 --- a/gcc/ada/sem_ch12.adb +++ b/gcc/ada/sem_ch12.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2002, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/sem_ch12.ads b/gcc/ada/sem_ch12.ads index cf800b4c36ef..a39a2895fc8b 100644 --- a/gcc/ada/sem_ch12.ads +++ b/gcc/ada/sem_ch12.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2000 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/sem_ch13.adb b/gcc/ada/sem_ch13.adb index 6eb7b4f79d85..776aeb8342e8 100644 --- a/gcc/ada/sem_ch13.adb +++ b/gcc/ada/sem_ch13.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2002, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/sem_ch13.ads b/gcc/ada/sem_ch13.ads index e768d24ca444..3eab365915c6 100644 --- a/gcc/ada/sem_ch13.ads +++ b/gcc/ada/sem_ch13.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/sem_ch2.adb b/gcc/ada/sem_ch2.adb index 8395ee3b8239..cfe2e784cf02 100644 --- a/gcc/ada/sem_ch2.adb +++ b/gcc/ada/sem_ch2.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/sem_ch2.ads b/gcc/ada/sem_ch2.ads index 4c9067ce5273..cc5dd1dc383f 100644 --- a/gcc/ada/sem_ch2.ads +++ b/gcc/ada/sem_ch2.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1998, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/sem_ch3.adb b/gcc/ada/sem_ch3.adb index ee8472e72334..e57ddc7e7804 100644 --- a/gcc/ada/sem_ch3.adb +++ b/gcc/ada/sem_ch3.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2002, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/sem_ch3.ads b/gcc/ada/sem_ch3.ads index 3647edecbfbf..ebcd861dbe59 100644 --- a/gcc/ada/sem_ch3.ads +++ b/gcc/ada/sem_ch3.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/sem_ch4.adb b/gcc/ada/sem_ch4.adb index 828ad40eb480..23d17e9bdd93 100644 --- a/gcc/ada/sem_ch4.adb +++ b/gcc/ada/sem_ch4.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2002, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/sem_ch4.ads b/gcc/ada/sem_ch4.ads index eefe8333e173..ed10371c3c9e 100644 --- a/gcc/ada/sem_ch4.ads +++ b/gcc/ada/sem_ch4.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992,1993,1994,1995,1996 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/sem_ch5.adb b/gcc/ada/sem_ch5.adb index cd7df7b82a6a..10cdec474b20 100644 --- a/gcc/ada/sem_ch5.adb +++ b/gcc/ada/sem_ch5.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/sem_ch5.ads b/gcc/ada/sem_ch5.ads index 390676842ac4..9963b31b371e 100644 --- a/gcc/ada/sem_ch5.ads +++ b/gcc/ada/sem_ch5.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1998 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/sem_ch6.adb b/gcc/ada/sem_ch6.adb index c8e79b8376fc..89687887b11e 100644 --- a/gcc/ada/sem_ch6.adb +++ b/gcc/ada/sem_ch6.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2002, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/sem_ch6.ads b/gcc/ada/sem_ch6.ads index 26bfc82a5353..1db25e0a4fba 100644 --- a/gcc/ada/sem_ch6.ads +++ b/gcc/ada/sem_ch6.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/sem_ch7.adb b/gcc/ada/sem_ch7.adb index 8cd6c215e1fd..2aa339ee8263 100644 --- a/gcc/ada/sem_ch7.adb +++ b/gcc/ada/sem_ch7.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2002, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/sem_ch7.ads b/gcc/ada/sem_ch7.ads index 4ef0893ae807..040d3a383612 100644 --- a/gcc/ada/sem_ch7.ads +++ b/gcc/ada/sem_ch7.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992,1993,1994 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/sem_ch8.adb b/gcc/ada/sem_ch8.adb index 1dfddf64c778..243bcd8150ef 100644 --- a/gcc/ada/sem_ch8.adb +++ b/gcc/ada/sem_ch8.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/sem_ch8.ads b/gcc/ada/sem_ch8.ads index fd4b226135d1..e94a229479f0 100644 --- a/gcc/ada/sem_ch8.ads +++ b/gcc/ada/sem_ch8.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/sem_ch9.adb b/gcc/ada/sem_ch9.adb index 9a25e0c8a622..5c428aadda37 100644 --- a/gcc/ada/sem_ch9.adb +++ b/gcc/ada/sem_ch9.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2002, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/sem_ch9.ads b/gcc/ada/sem_ch9.ads index 651445f43229..017b6e426514 100644 --- a/gcc/ada/sem_ch9.ads +++ b/gcc/ada/sem_ch9.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/sem_disp.adb b/gcc/ada/sem_disp.adb index b1fe0dd28ae4..29b8e409e213 100644 --- a/gcc/ada/sem_disp.adb +++ b/gcc/ada/sem_disp.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/sem_disp.ads b/gcc/ada/sem_disp.ads index d486df880203..6245df244f17 100644 --- a/gcc/ada/sem_disp.ads +++ b/gcc/ada/sem_disp.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/sem_dist.adb b/gcc/ada/sem_dist.adb index d9f1997e7d6e..a94e59c731d1 100644 --- a/gcc/ada/sem_dist.adb +++ b/gcc/ada/sem_dist.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/sem_dist.ads b/gcc/ada/sem_dist.ads index 760d90247492..1ce18bfe9a63 100644 --- a/gcc/ada/sem_dist.ads +++ b/gcc/ada/sem_dist.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2000 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/sem_elab.adb b/gcc/ada/sem_elab.adb index 4ff0358efa24..f440f7d3cc93 100644 --- a/gcc/ada/sem_elab.adb +++ b/gcc/ada/sem_elab.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1997-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/sem_elab.ads b/gcc/ada/sem_elab.ads index 7a760263da32..c081a1f594b3 100644 --- a/gcc/ada/sem_elab.ads +++ b/gcc/ada/sem_elab.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1997-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/sem_elim.adb b/gcc/ada/sem_elim.adb index 7409ac93e370..bde2f9845f37 100644 --- a/gcc/ada/sem_elim.adb +++ b/gcc/ada/sem_elim.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1997-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/sem_elim.ads b/gcc/ada/sem_elim.ads index e7391df08a11..98d45d8ecdaf 100644 --- a/gcc/ada/sem_elim.ads +++ b/gcc/ada/sem_elim.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1997-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/sem_eval.adb b/gcc/ada/sem_eval.adb index 1d9c78b5b558..92bf0a14199a 100644 --- a/gcc/ada/sem_eval.adb +++ b/gcc/ada/sem_eval.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/sem_eval.ads b/gcc/ada/sem_eval.ads index e0efda3d972f..36553167b5e6 100644 --- a/gcc/ada/sem_eval.ads +++ b/gcc/ada/sem_eval.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/sem_intr.adb b/gcc/ada/sem_intr.adb index 54ae2d235853..b0a5579ba878 100644 --- a/gcc/ada/sem_intr.adb +++ b/gcc/ada/sem_intr.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/sem_intr.ads b/gcc/ada/sem_intr.ads index 54b002c96e1a..fcc26b077f45 100644 --- a/gcc/ada/sem_intr.ads +++ b/gcc/ada/sem_intr.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992,1993,1994 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/sem_maps.adb b/gcc/ada/sem_maps.adb index 91da4a844472..c0e1e125e871 100644 --- a/gcc/ada/sem_maps.adb +++ b/gcc/ada/sem_maps.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1996-1998 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/sem_maps.ads b/gcc/ada/sem_maps.ads index f9404febd9c7..ef491422f7b7 100644 --- a/gcc/ada/sem_maps.ads +++ b/gcc/ada/sem_maps.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1996-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/sem_mech.adb b/gcc/ada/sem_mech.adb index ed583c19f9c2..fb58aebc232e 100644 --- a/gcc/ada/sem_mech.adb +++ b/gcc/ada/sem_mech.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1996-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/sem_mech.ads b/gcc/ada/sem_mech.ads index 71a108273b51..2641e2bb173d 100644 --- a/gcc/ada/sem_mech.ads +++ b/gcc/ada/sem_mech.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1996-1997 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/sem_prag.adb b/gcc/ada/sem_prag.adb index a7e867aabefe..d8debec49906 100644 --- a/gcc/ada/sem_prag.adb +++ b/gcc/ada/sem_prag.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2002, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/sem_prag.ads b/gcc/ada/sem_prag.ads index 4aaa86c07b46..d1ec46e19a55 100644 --- a/gcc/ada/sem_prag.ads +++ b/gcc/ada/sem_prag.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1997 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/sem_res.adb b/gcc/ada/sem_res.adb index c1390ecd7604..6df80d225709 100644 --- a/gcc/ada/sem_res.adb +++ b/gcc/ada/sem_res.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2002, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/sem_res.ads b/gcc/ada/sem_res.ads index a88b3a6306b7..1205ce15f6bc 100644 --- a/gcc/ada/sem_res.ads +++ b/gcc/ada/sem_res.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/sem_smem.adb b/gcc/ada/sem_smem.adb index aab9f8ad19e9..0964f0c51dc4 100644 --- a/gcc/ada/sem_smem.adb +++ b/gcc/ada/sem_smem.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1998-2000, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/sem_smem.ads b/gcc/ada/sem_smem.ads index 1ca0b1f4c53f..8e6aebfe3de1 100644 --- a/gcc/ada/sem_smem.ads +++ b/gcc/ada/sem_smem.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1998-2000, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/sem_type.adb b/gcc/ada/sem_type.adb index 4c708322e195..8666ae706ee4 100644 --- a/gcc/ada/sem_type.adb +++ b/gcc/ada/sem_type.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/sem_type.ads b/gcc/ada/sem_type.ads index 2eb4cae2adb2..75908572e9b1 100644 --- a/gcc/ada/sem_type.ads +++ b/gcc/ada/sem_type.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/sem_util.adb b/gcc/ada/sem_util.adb index b05645e46e33..45c02c507677 100644 --- a/gcc/ada/sem_util.adb +++ b/gcc/ada/sem_util.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2002, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/sem_util.ads b/gcc/ada/sem_util.ads index ba1d3f1c3e72..f0f518c104cc 100644 --- a/gcc/ada/sem_util.ads +++ b/gcc/ada/sem_util.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2002, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/sem_vfpt.adb b/gcc/ada/sem_vfpt.adb index 917404aada27..a17a3314e320 100644 --- a/gcc/ada/sem_vfpt.adb +++ b/gcc/ada/sem_vfpt.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1997-2002, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/sem_vfpt.ads b/gcc/ada/sem_vfpt.ads index c2d7adcbab40..a3975661053f 100644 --- a/gcc/ada/sem_vfpt.ads +++ b/gcc/ada/sem_vfpt.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1997 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/sem_warn.adb b/gcc/ada/sem_warn.adb index 13b623188b8f..2e191b3e435f 100644 --- a/gcc/ada/sem_warn.adb +++ b/gcc/ada/sem_warn.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1999-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/sem_warn.ads b/gcc/ada/sem_warn.ads index 5994fbefdfa2..cab5c02c0f9f 100644 --- a/gcc/ada/sem_warn.ads +++ b/gcc/ada/sem_warn.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1999-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/sequenio.ads b/gcc/ada/sequenio.ads index 25b43f6f5b8a..9c205018d873 100644 --- a/gcc/ada/sequenio.ads +++ b/gcc/ada/sequenio.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- This specification is adapted from the Ada Reference Manual for use with -- -- GNAT. In accordance with the copyright of that document, you can freely -- -- copy and modify this specification, provided that if you redistribute a -- diff --git a/gcc/ada/sfn_scan.adb b/gcc/ada/sfn_scan.adb index 067c285ffc83..1652e6eb7321 100644 --- a/gcc/ada/sfn_scan.adb +++ b/gcc/ada/sfn_scan.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 2000-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/sfn_scan.ads b/gcc/ada/sfn_scan.ads index 1afb34691423..93e13bd8ce80 100644 --- a/gcc/ada/sfn_scan.ads +++ b/gcc/ada/sfn_scan.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 2000-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/sinfo-cn.adb b/gcc/ada/sinfo-cn.adb index 26fbbb56680f..e9af734e47f0 100644 --- a/gcc/ada/sinfo-cn.adb +++ b/gcc/ada/sinfo-cn.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/sinfo-cn.ads b/gcc/ada/sinfo-cn.ads index 53ecd6549f47..3105627a65b4 100644 --- a/gcc/ada/sinfo-cn.ads +++ b/gcc/ada/sinfo-cn.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2001, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/sinfo.adb b/gcc/ada/sinfo.adb index 0749987663cf..f782b3ddf45b 100644 --- a/gcc/ada/sinfo.adb +++ b/gcc/ada/sinfo.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2002, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/sinfo.ads b/gcc/ada/sinfo.ads index d5ea8ff3d968..7f3fe5cf6c4c 100644 --- a/gcc/ada/sinfo.ads +++ b/gcc/ada/sinfo.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2002, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/sinput-d.adb b/gcc/ada/sinput-d.adb index 0b30f4ac003d..36c80d17e200 100644 --- a/gcc/ada/sinput-d.adb +++ b/gcc/ada/sinput-d.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 2001, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/sinput-d.ads b/gcc/ada/sinput-d.ads index 36ee1e6867ef..2976ad4debd6 100644 --- a/gcc/ada/sinput-d.ads +++ b/gcc/ada/sinput-d.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 2001, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/sinput-l.adb b/gcc/ada/sinput-l.adb index df8c01e40614..fa5819ff30a2 100644 --- a/gcc/ada/sinput-l.adb +++ b/gcc/ada/sinput-l.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/sinput-l.ads b/gcc/ada/sinput-l.ads index a9734682a133..9297530e5bc2 100644 --- a/gcc/ada/sinput-l.ads +++ b/gcc/ada/sinput-l.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2001, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/sinput-p.adb b/gcc/ada/sinput-p.adb index b08fbf1962af..d0985c4eaaec 100644 --- a/gcc/ada/sinput-p.adb +++ b/gcc/ada/sinput-p.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/sinput-p.ads b/gcc/ada/sinput-p.ads index c183dc3196c6..1cc19b378b8e 100644 --- a/gcc/ada/sinput-p.ads +++ b/gcc/ada/sinput-p.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2001, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/sinput.adb b/gcc/ada/sinput.adb index c8a01982bb54..ec9659eb7c81 100644 --- a/gcc/ada/sinput.adb +++ b/gcc/ada/sinput.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/sinput.ads b/gcc/ada/sinput.ads index 0ce61d9fafd2..1bf1af330192 100644 --- a/gcc/ada/sinput.ads +++ b/gcc/ada/sinput.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/snames.adb b/gcc/ada/snames.adb index 9a1a1beb6ae9..4af080929241 100644 --- a/gcc/ada/snames.adb +++ b/gcc/ada/snames.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2002, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/snames.ads b/gcc/ada/snames.ads index 529de3bc85bf..0c3a8cb35571 100644 --- a/gcc/ada/snames.ads +++ b/gcc/ada/snames.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2002, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/sprint.adb b/gcc/ada/sprint.adb index a5a37974173e..4d1b4a4ac0b8 100644 --- a/gcc/ada/sprint.adb +++ b/gcc/ada/sprint.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2002, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/sprint.ads b/gcc/ada/sprint.ads index 612ad9d2280d..273d6a876c70 100644 --- a/gcc/ada/sprint.ads +++ b/gcc/ada/sprint.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2002, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/stand.adb b/gcc/ada/stand.adb index c38e2c7750b3..7b477f1268a6 100644 --- a/gcc/ada/stand.adb +++ b/gcc/ada/stand.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992,1993,1994,1995 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/stand.ads b/gcc/ada/stand.ads index c20cfcbeb1e3..912076957659 100644 --- a/gcc/ada/stand.ads +++ b/gcc/ada/stand.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/stringt.adb b/gcc/ada/stringt.adb index 2540d4866d4c..9b2bb57e32f3 100644 --- a/gcc/ada/stringt.adb +++ b/gcc/ada/stringt.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/stringt.ads b/gcc/ada/stringt.ads index 46a15c81bd17..ca68c2593470 100644 --- a/gcc/ada/stringt.ads +++ b/gcc/ada/stringt.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/style.adb b/gcc/ada/style.adb index cec3e367459d..a693569bb716 100644 --- a/gcc/ada/style.adb +++ b/gcc/ada/style.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/style.ads b/gcc/ada/style.ads index 97f50df49893..7d59b5579979 100644 --- a/gcc/ada/style.ads +++ b/gcc/ada/style.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2000 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/stylesw.adb b/gcc/ada/stylesw.adb index fbdbd28620a3..1213da8987e0 100644 --- a/gcc/ada/stylesw.adb +++ b/gcc/ada/stylesw.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/stylesw.ads b/gcc/ada/stylesw.ads index 36a5a72434da..5a7a62d0e15a 100644 --- a/gcc/ada/stylesw.ads +++ b/gcc/ada/stylesw.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2001, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/switch-b.adb b/gcc/ada/switch-b.adb index 4819cfccd67b..08ad27329326 100644 --- a/gcc/ada/switch-b.adb +++ b/gcc/ada/switch-b.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 2001-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/switch-b.ads b/gcc/ada/switch-b.ads index 5bef704531da..f8c7d32f4f3d 100644 --- a/gcc/ada/switch-b.ads +++ b/gcc/ada/switch-b.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/switch-c.adb b/gcc/ada/switch-c.adb index 5502290f00af..4052db70d037 100644 --- a/gcc/ada/switch-c.adb +++ b/gcc/ada/switch-c.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 2001-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/switch-c.ads b/gcc/ada/switch-c.ads index e6f9d7f84bf7..101eebf84bde 100644 --- a/gcc/ada/switch-c.ads +++ b/gcc/ada/switch-c.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/switch-m.adb b/gcc/ada/switch-m.adb index 52c473bb9102..b04672b5ffc1 100644 --- a/gcc/ada/switch-m.adb +++ b/gcc/ada/switch-m.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 2001-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/switch-m.ads b/gcc/ada/switch-m.ads index a16dd18840f3..e63ad66e5fd6 100644 --- a/gcc/ada/switch-m.ads +++ b/gcc/ada/switch-m.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/switch.adb b/gcc/ada/switch.adb index 63cde50198cf..4601e927e0ce 100644 --- a/gcc/ada/switch.adb +++ b/gcc/ada/switch.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/switch.ads b/gcc/ada/switch.ads index eccfdb7452f7..6e5e4c2f1023 100644 --- a/gcc/ada/switch.ads +++ b/gcc/ada/switch.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/system.ads b/gcc/ada/system.ads index 8374f5658b20..0f001c2fdbdb 100644 --- a/gcc/ada/system.ads +++ b/gcc/ada/system.ads @@ -7,7 +7,6 @@ -- S p e c -- -- (Compiler Version) -- -- -- --- -- -- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- -- -- -- This specification is derived from the Ada Reference Manual for use with -- diff --git a/gcc/ada/table.adb b/gcc/ada/table.adb index e9acfc278ef9..60f185b0d964 100644 --- a/gcc/ada/table.adb +++ b/gcc/ada/table.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/table.ads b/gcc/ada/table.ads index 205aac306ac6..7c78a30da425 100644 --- a/gcc/ada/table.ads +++ b/gcc/ada/table.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/targparm.adb b/gcc/ada/targparm.adb index 4e1719f31348..2621dbf2045b 100644 --- a/gcc/ada/targparm.adb +++ b/gcc/ada/targparm.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1999-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/targparm.ads b/gcc/ada/targparm.ads index 4184ba577ffe..7aff79d53f35 100644 --- a/gcc/ada/targparm.ads +++ b/gcc/ada/targparm.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1999-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/tbuild.adb b/gcc/ada/tbuild.adb index 8bc32f7182db..1548a41cf164 100644 --- a/gcc/ada/tbuild.adb +++ b/gcc/ada/tbuild.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2002, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/tbuild.ads b/gcc/ada/tbuild.ads index c535334d7325..ef321a149400 100644 --- a/gcc/ada/tbuild.ads +++ b/gcc/ada/tbuild.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2002, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/text_io.ads b/gcc/ada/text_io.ads index 75ffe4fdcc25..90e4ac479c67 100644 --- a/gcc/ada/text_io.ads +++ b/gcc/ada/text_io.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- This specification is adapted from the Ada Reference Manual for use with -- -- GNAT. In accordance with the copyright of that document, you can freely -- -- copy and modify this specification, provided that if you redistribute a -- diff --git a/gcc/ada/trans.c b/gcc/ada/trans.c index 4155eecfd6e7..797671de7d3a 100644 --- a/gcc/ada/trans.c +++ b/gcc/ada/trans.c @@ -435,11 +435,13 @@ tree_transform (gnat_node) here since GNU_RESULT may be a CONST_DECL. */ if (DECL_P (gnu_result) && (DECL_BY_REF_P (gnu_result) - || DECL_BY_COMPONENT_PTR_P (gnu_result))) + || (TREE_CODE (gnu_result) == PARM_DECL + && DECL_BY_COMPONENT_PTR_P (gnu_result)))) { int ro = DECL_POINTS_TO_READONLY_P (gnu_result); - if (DECL_BY_COMPONENT_PTR_P (gnu_result)) + if (TREE_CODE (gnu_result) == PARM_DECL + && DECL_BY_COMPONENT_PTR_P (gnu_result)) gnu_result = convert (build_pointer_type (gnu_result_type), gnu_result); diff --git a/gcc/ada/tree_gen.adb b/gcc/ada/tree_gen.adb index ca97b7f99678..8aba1ceb1eab 100644 --- a/gcc/ada/tree_gen.adb +++ b/gcc/ada/tree_gen.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/tree_gen.ads b/gcc/ada/tree_gen.ads index b143d44e3fd0..81905f978c3c 100644 --- a/gcc/ada/tree_gen.ads +++ b/gcc/ada/tree_gen.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992,1993,1994,1995 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/tree_in.adb b/gcc/ada/tree_in.adb index d0442a3c7563..5c469bd5a295 100644 --- a/gcc/ada/tree_in.adb +++ b/gcc/ada/tree_in.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-1999, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/tree_in.ads b/gcc/ada/tree_in.ads index 43c90380c923..5a16c7289fec 100644 --- a/gcc/ada/tree_in.ads +++ b/gcc/ada/tree_in.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992,1993,1994,1995 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/tree_io.adb b/gcc/ada/tree_io.adb index 42d1783d75fb..d0170dcb59fe 100644 --- a/gcc/ada/tree_io.adb +++ b/gcc/ada/tree_io.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/tree_io.ads b/gcc/ada/tree_io.ads index e0624ee0c0c3..5f72c69cb83d 100644 --- a/gcc/ada/tree_io.ads +++ b/gcc/ada/tree_io.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/treepr.adb b/gcc/ada/treepr.adb index 6685ba9439c7..e77729eff18a 100644 --- a/gcc/ada/treepr.adb +++ b/gcc/ada/treepr.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/treepr.ads b/gcc/ada/treepr.ads index e8d812da55dd..40422305a2b5 100644 --- a/gcc/ada/treepr.ads +++ b/gcc/ada/treepr.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/ttypef.ads b/gcc/ada/ttypef.ads index 9ef4186c2446..0afac4b6e938 100644 --- a/gcc/ada/ttypef.ads +++ b/gcc/ada/ttypef.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/ttypes.ads b/gcc/ada/ttypes.ads index edce7a01cdf5..fb9f5c2d8cc7 100644 --- a/gcc/ada/ttypes.ads +++ b/gcc/ada/ttypes.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/types.adb b/gcc/ada/types.adb index 04ec4e5dc2f8..69b019ed0865 100644 --- a/gcc/ada/types.adb +++ b/gcc/ada/types.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/types.ads b/gcc/ada/types.ads index e2e1cc726c17..65731227c651 100644 --- a/gcc/ada/types.ads +++ b/gcc/ada/types.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/uintp.adb b/gcc/ada/uintp.adb index a583d82f6cf7..5326b9c3da6e 100644 --- a/gcc/ada/uintp.adb +++ b/gcc/ada/uintp.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/uintp.ads b/gcc/ada/uintp.ads index cdb65601eb5d..c982f1bb2a86 100644 --- a/gcc/ada/uintp.ads +++ b/gcc/ada/uintp.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2002, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/uname.adb b/gcc/ada/uname.adb index 48292f5814c3..e0471ea89bc6 100644 --- a/gcc/ada/uname.adb +++ b/gcc/ada/uname.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/uname.ads b/gcc/ada/uname.ads index 568d4a14c6ed..2439b9d4211e 100644 --- a/gcc/ada/uname.ads +++ b/gcc/ada/uname.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1998, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/unchconv.ads b/gcc/ada/unchconv.ads index bcbebbdc8bbe..3ffd43182d5c 100644 --- a/gcc/ada/unchconv.ads +++ b/gcc/ada/unchconv.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- This specification is adapted from the Ada Reference Manual for use with -- -- GNAT. In accordance with the copyright of that document, you can freely -- -- copy and modify this specification, provided that if you redistribute a -- diff --git a/gcc/ada/unchdeal.ads b/gcc/ada/unchdeal.ads index a7f4a87f6c56..663e5e521524 100644 --- a/gcc/ada/unchdeal.ads +++ b/gcc/ada/unchdeal.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- This specification is adapted from the Ada Reference Manual for use with -- -- GNAT. In accordance with the copyright of that document, you can freely -- -- copy and modify this specification, provided that if you redistribute a -- diff --git a/gcc/ada/urealp.adb b/gcc/ada/urealp.adb index 69a81adb2976..4c745093efdb 100644 --- a/gcc/ada/urealp.adb +++ b/gcc/ada/urealp.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/urealp.ads b/gcc/ada/urealp.ads index 9361ac37a3ae..21bda9234cfb 100644 --- a/gcc/ada/urealp.ads +++ b/gcc/ada/urealp.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/usage.adb b/gcc/ada/usage.adb index 283a5d1dabed..9da5bda3750d 100644 --- a/gcc/ada/usage.adb +++ b/gcc/ada/usage.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2002, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/usage.ads b/gcc/ada/usage.ads index cb882b5b1e72..685fc35c9e6b 100644 --- a/gcc/ada/usage.ads +++ b/gcc/ada/usage.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992,1993,1994 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/validsw.adb b/gcc/ada/validsw.adb index 43942b870e75..11ef50029c3f 100644 --- a/gcc/ada/validsw.adb +++ b/gcc/ada/validsw.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 2001-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/validsw.ads b/gcc/ada/validsw.ads index 0632be695879..7a7b4d4fcd4e 100644 --- a/gcc/ada/validsw.ads +++ b/gcc/ada/validsw.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/widechar.adb b/gcc/ada/widechar.adb index 0c14ceb69062..f0d5771486d9 100644 --- a/gcc/ada/widechar.adb +++ b/gcc/ada/widechar.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/widechar.ads b/gcc/ada/widechar.ads index 1d495e612bbc..5126d4c758aa 100644 --- a/gcc/ada/widechar.ads +++ b/gcc/ada/widechar.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1992-1998 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/xeinfo.adb b/gcc/ada/xeinfo.adb index f648678c2a4d..e3137211c675 100644 --- a/gcc/ada/xeinfo.adb +++ b/gcc/ada/xeinfo.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/xnmake.adb b/gcc/ada/xnmake.adb index f2c279296779..32600baa2f65 100644 --- a/gcc/ada/xnmake.adb +++ b/gcc/ada/xnmake.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/xr_tabls.adb b/gcc/ada/xr_tabls.adb index 2f43edb5f07f..93be4f869007 100644 --- a/gcc/ada/xr_tabls.adb +++ b/gcc/ada/xr_tabls.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1998-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/xr_tabls.ads b/gcc/ada/xr_tabls.ads index b0124898021b..f15ebd7e7f8b 100644 --- a/gcc/ada/xr_tabls.ads +++ b/gcc/ada/xr_tabls.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1998-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/xref_lib.adb b/gcc/ada/xref_lib.adb index f9bec6cfe766..fcdac58f2258 100644 --- a/gcc/ada/xref_lib.adb +++ b/gcc/ada/xref_lib.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1998-2002 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/xref_lib.ads b/gcc/ada/xref_lib.ads index 24c87832a7e1..dcbc59076595 100644 --- a/gcc/ada/xref_lib.ads +++ b/gcc/ada/xref_lib.ads @@ -6,7 +6,6 @@ -- -- -- S p e c -- -- -- --- -- -- Copyright (C) 1998-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/xsinfo.adb b/gcc/ada/xsinfo.adb index 891f981ebe96..011a27595945 100644 --- a/gcc/ada/xsinfo.adb +++ b/gcc/ada/xsinfo.adb @@ -6,8 +6,7 @@ -- -- -- B o d y -- -- -- --- -- --- Copyright (C) 1992-2000 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- -- diff --git a/gcc/ada/xsnames.adb b/gcc/ada/xsnames.adb index 358d3480f5d9..bf145004a6ef 100644 --- a/gcc/ada/xsnames.adb +++ b/gcc/ada/xsnames.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- diff --git a/gcc/ada/xtreeprs.adb b/gcc/ada/xtreeprs.adb index a9cff6164449..014d1d85e97e 100644 --- a/gcc/ada/xtreeprs.adb +++ b/gcc/ada/xtreeprs.adb @@ -6,7 +6,6 @@ -- -- -- B o d y -- -- -- --- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- GNAT is free software; you can redistribute it and/or modify it under --