Re: Ada202X : Adding functors

[Simon Wright <simon@pushface.org>]

"Dmitry A. Kazakov" <mailbox@dmitry-kazakov.de> writes:

> On Wed, 14 Nov 2012 08:54:09 -0800 (PST), Adam Beneschan wrote:
>
>> A new way to write obfuscated code?
>
> I don't understand the point. If there is any obfuscation then on the
> Ada's side which does not support straightforward declaration of
> user-defined arrays/indexing operation.

This is Martin's code:

   procedure Test is
      F1 : constant Algorithm := C_To_F.Create (10.0);
      F2 : constant Algorithm := C_To_F.Create (20.0);
   begin
      Put_Line ("F1 := " & Long_Float'Image (F1(X)));
      Put_Line ("F2 := " & Long_Float'Image (F2(X)));
   end Test;

F1(X) is a user-defined array indexing which returns the Fahrenheit
equivalent of the 10.0 Celsius that F1 was created with *no matter what
index you supply* because the only purpose of making it look like an
array indexing was to avoid making it look like what it is - a
subprogram call.

There may be some point in this in C++, if the templating mechanism only
cares about the syntactic feature of ()-represents-invocation. I'm not
sure I want to know.