Re: [Ada-mode-users] Issues with tests on latest MTN

[Stephen Leake]

Thanks for these reports.

Simon Wright <address@hidden> writes:

> I've just been re-running the tests, and found some problems. Emacs 25.2.1, 
> ada-mode 5.2.1, (ada-gps-size-threshold 10000)
>
> 1) at test/ada_mode-generic_instantiation.ads:5, we have
>
> --EMACSRESULT:(eq ada-xref-tool 'gnat)
>
> which I think should be
>
> --EMACSRESULT:(or (eq ada-xref-tool 'gnat)(eq ada-xref-tool 'gpr_query))
>
> 2) at test/ada_mode-library_function.ads:7, the test fails because 
> (forward-word 2) treats '_' as a word separator, so that point ends up on the 
> M of Ada_Mode rather than the L of Library_Function
>
> 3) at ada_mode-library_function.ads:3, same problem
>
> 4) at ada_mode-nominal.adb:371, the test stops, probably because the test is 
> --EMACSRESUT: t (should be --EMACSRESULT: t, works OK with that change)
>
> 5)
> $ more aspects.ads.diff 
> --- ../../test/aspects.ads      2017-05-28 17:55:23.000000000 +0100
> +++ aspects.ads.tmp     2017-06-02 12:27:42.000000000 +0100
> @@ -21,7 +21,7 @@
>                                   Y : out Integer)
>     with Pre => X > 10 and
>                 X < 50 and
> -               F (X),
> +     F (X),
>       Post =>
>         Y >= X and
>         Some_Very_Verbose_Predicate (X, Y);
>
>
> 6) (this one didn't show the difference when run in my normal environment)
> $ more g-comlin.adb.diff 
> --- ../../test/g-comlin.adb     2017-05-28 17:55:23.000000000 +0100
> +++ g-comlin.adb.tmp    2017-06-02 12:27:47.000000000 +0100
> @@ -346,7 +346,7 @@
>  
>                 if Arg (Index) = '*'
>                   or else Arg (Index) = '?'
> -                 or else Arg (Index) = '['
> +                   or else Arg (Index) = '['
>                 then
>                    In_Expansion := True;
>                    Start_Expansion (Expansion_It, Arg);
>
>
>

-- 
-- Stephe