aboutsummaryrefslogtreecommitdiff
path: root/gcc/ada/nlists.adb
diff options
context:
space:
mode:
authorRobert Dewar <dewar@adacore.com>2014-08-01 09:57:04 +0000
committerArnaud Charlet <charlet@gcc.gnu.org>2014-08-01 11:57:04 +0200
commit37368818b9b039ebdb177c483b0d563e128952ba (patch)
treed10a18c9ffde695836bbb4f6aea82a4ae8cd0a9a /gcc/ada/nlists.adb
parente08add8ea93dfa94541f2d20c0b56614ef0a2449 (diff)
downloadgcc-37368818b9b039ebdb177c483b0d563e128952ba.zip
gcc-37368818b9b039ebdb177c483b0d563e128952ba.tar.gz
gcc-37368818b9b039ebdb177c483b0d563e128952ba.tar.bz2
sem_aggr.adb, [...]: Minor reformatting & code reorganization.
2014-08-01 Robert Dewar <dewar@adacore.com> * sem_aggr.adb, exp_atag.adb, layout.adb, nlists.adb, nlists.ads, exp_attr.adb, exp_ch9.adb, par-ch12.adb, exp_aggr.adb, exp_ch3.adb: Minor reformatting & code reorganization. From-SVN: r213439
Diffstat (limited to 'gcc/ada/nlists.adb')
-rw-r--r--gcc/ada/nlists.adb4
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/ada/nlists.adb b/gcc/ada/nlists.adb
index 41b5ac2..dcb5dd4 100644
--- a/gcc/ada/nlists.adb
+++ b/gcc/ada/nlists.adb
@@ -6,7 +6,7 @@
-- --
-- B o d y --
-- --
--- Copyright (C) 1992-2013, Free Software Foundation, Inc. --
+-- Copyright (C) 1992-2014, 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- --
@@ -744,8 +744,8 @@ package body Nlists is
else
NL := New_List;
- E := First (List);
+ E := First (List);
while Present (E) loop
if Comes_From_Source (E) then
Append (New_Copy (E), NL);