My recent changes are in monotone at org.emacs.ada-mode.sjw at
279a675319535670119e771355becbf6170cb22d - this includes the gpr-mode changes I
wrote about earlier.
Also minor changes in build/common.make and build/wisi/Makefile - you may
disapprove of the former, but I have yet to work out how to run just one test,
and this way one can run through all the tests and collect the failures at the
end.
I noticed that there are some failing tests, diffs at end.
autoloads.el calls up ada-project, project-menu, project patches; I don't think
anything uses ada-project, and the other two are missing (I dummied them).
nidhoggr:wisi simon$ find . -name \*.diff -not -size 0
./ada_mode-parens.adb.diff
./aspects.ads.diff
./gpr-skel.gpr.diff
nidhoggr:wisi simon$ more ada_mode-parens.adb.diff
--- ../../test/ada_mode-parens.adb 2016-01-10 18:53:46.000000000 +0000
+++ ada_mode-parens.adb.tmp 2016-01-14 20:04:29.000000000 +0000
@@ -446,14 +446,14 @@
procedure If_Expr_As_Actual_Parameter is
- function Id (X : Boolean) return Boolean is
+ function ID (X : Boolean) return Boolean is
begin
return X;
- end Id;
+ end ID;
-- ARM 4.5.7(7) allows removing the doubled parens
-- around a conditional_expression
- Tmp : Boolean := Id (if True then True else True);
+ Tmp : Boolean := ID (if True then True else True);
begin
null;
end If_Expr_As_Actual_Parameter;
nidhoggr:wisi simon$ more aspects.ads.diff
--- ../../test/aspects.ads 2016-01-07 12:04:43.000000000 +0000
+++ aspects.ads.tmp 2016-01-14 20:05:16.000000000 +0000
@@ -12,10 +12,10 @@
Iterator_Element => Element_Type;
type Date_Set is new Iterator_Interfaces.Forward_Iterator with private
- with
- Constant_Indexing => Element,
- Default_Iterator => Iterate,
- Iterator_Element => Ada.Calendar.Time;
+ with
+ Constant_Indexing => Element,
+ Default_Iterator => Iterate,
+ Iterator_Element => Ada.Calendar.Time;
procedure Foo (X : Integer;
Y : out Integer)
nidhoggr:wisi simon$ more gpr-skel.gpr.diff
--- ../../test/gpr/gpr-skel.gpr 2015-04-26 08:48:01.000000000 +0100
+++ gpr-skel.gpr.tmp 2016-01-14 20:06:47.000000000 +0000
@@ -8,7 +8,7 @@
case foo is
when =>
end case;
- -- Copyright (C) 2015 gpr-skel All Rights Reserved.
+ -- Copyright (C) 2016 gpr-skel All Rights Reserved.
--
-- This program is free software; you can redistribute it and/or
-- modify it under terms of the GNU General Public License as
@@ -22,7 +22,7 @@
-- the Free Software Foundation, 51 Franklin Street, Suite 500, Boston,
-- MA 02110-1335, USA.
- -- Copyright (C) 2015 gpr-skel All Rights Reserved.
+ -- Copyright (C) 2016 gpr-skel All Rights Reserved.
package foo is
end foo;
_______________________________________________
Emacs-ada-mode mailing list
[email protected]
http://host114.hostmonster.com/mailman/listinfo/emacs-ada-mode_stephe-leake.org