comp.lang.ada
 help / color / mirror / Atom feed
From: Paul Rubin <no.email@nospam.invalid>
Subject: Re: Toy computational "benchmark" in Ada (new blog post)
Date: Thu, 06 Jun 2019 23:42:44 -0700
Date: 2019-06-06T23:42:44-07:00	[thread overview]
Message-ID: <87ef45x5ej.fsf@nightsong.com> (raw)
In-Reply-To: 79e178f1-3aae-444a-a3d1-8414f9d2434e@googlegroups.com

David Trudgett <dktrudgett@gmail.com> writes:
> If you used the project file, it should be optimised, but it obviously
> isn't, so I don't know what you did. Try GNAT Community 2019 instead,
> perhaps?

With -O3 removed from the .gpr, I see this:

    .L58:
            movq    -72(%rbp), %rax
            cmpq    %rax, -40(%rbp)
            jg      .L69
            movq    -40(%rbp), %rax
            movq    432(%rbx), %rdx
            leaq    0(,%rax,8), %rcx
            subq    $8, %rcx
            addq    %rcx, %rdx
            movq    %rdx, -80(%rbp)
            movq    432(%rbx), %rdx
            movsd   -8(%rdx,%rax,8), %xmm1
            movq    432(%rbx), %rdx
            movsd   -8(%rdx,%rax,8), %xmm0
    .LEHE26:
            mulsd   %xmm1, %xmm0
            movsd   -112(%rbp), %xmm1
            addsd   %xmm1, %xmm0
            movsd   %xmm0, -112(%rbp)
            addq    $1, -40(%rbp)
            jmp     .L58

I probably can't do much more tonight, but might try a newer GNAT
version in the coming days.  I'll also try GCC 9 for the C++ version.


  reply	other threads:[~2019-06-07  6:42 UTC|newest]

Thread overview: 27+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2019-06-06 11:05 Toy computational "benchmark" in Ada (new blog post) David Trudgett
2019-06-06 17:48 ` Olivier Henley
2019-06-06 23:14   ` David Trudgett
2019-06-06 23:27     ` Paul Rubin
2019-06-07  5:24       ` David Trudgett
2019-06-07  5:36         ` Paul Rubin
2019-06-06 20:31 ` Jeffrey R. Carter
2019-06-06 23:02   ` David Trudgett
2019-06-07  0:13     ` Paul Rubin
2019-06-07  4:50       ` Paul Rubin
2019-06-07  5:41         ` David Trudgett
2019-06-07  6:00           ` Paul Rubin
2019-06-07  6:25             ` David Trudgett
2019-06-07  6:38               ` Paul Rubin
2019-06-07  5:28       ` David Trudgett
2019-06-07  5:57         ` Paul Rubin
2019-06-07  6:21           ` David Trudgett
2019-06-07  6:22             ` Paul Rubin
2019-06-07  6:29               ` David Trudgett
2019-06-07  6:42                 ` Paul Rubin [this message]
2019-06-07 17:55     ` Jeffrey R. Carter
2019-06-08 11:00       ` David Trudgett
2019-06-07  1:42 ` johnscpg
2019-06-07  5:34   ` David Trudgett
2019-06-08 10:17     ` David Trudgett
2019-06-08  1:14 ` johnscpg
2019-06-08 10:56   ` David Trudgett
replies disabled

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox